演示:
操作:快捷键wind+delete 删除选中文件夹释放里面所有内容
; win+Delete删除文件夹释放里面的文件和文件夹
#Delete::
clipboard :=""
Sleep, 200
Send ^c
删除文件夹 := clipboard
RegExMatch(clipboard, "(.*)(\\.+$)", 目录)
上级目录 := 目录1
; 下面的例子复制一个文件夹中所有文件和文件夹到另一个文件夹中:
ErrorCount := CopyFilesAndFolders(删除文件夹 "\*.*", 上级目录)
if ErrorCount <> 0
MsgBox %ErrorCount% files/folders could not be copied.
CopyFilesAndFolders(SourcePattern, DestinationFolder, DoOverwrite = false)
; 复制匹配 SourcePattern 的所有文件和文件夹到 DestinationFolder 文件夹中且
; 返回无法复制的文件/文件夹的数目.
{
; 首先复制所有文件 (不是文件夹):
FileCopy, %SourcePattern%, %DestinationFolder%, %DoOverwrite%
ErrorCount := ErrorLevel
; 现在复制所有文件夹:
Loop, %SourcePattern%, 2 ; 2 表示 "只获取文件夹".
{
FileCopyDir, %A_LoopFileFullPath%, %DestinationFolder%\%A_LoopFileName%, %DoOverwrite%
ErrorCount += ErrorLevel
if ErrorLevel ; 报告每个出现问题的文件夹名称.
MsgBox Could not copy %A_LoopFileFullPath% into %DestinationFolder%.
}
return ErrorCount
}
FileRemoveDir, %删除文件夹%,1
Return