#include <File.au3>
#include <FileConstants.au3>
#include <Array.au3>
$flag = "explorer.exe";更换成你想检查的文件名
Local $do = _FileListToArrayRec ( "c:" , $flag ,$FLTAR_FILES , $FLTAR_RECUR , $FLTAR_NOSORT , $FLTAR_FULLPATH )
If @error Then MsgBox(0,"",@extended )
;-- _ArrayDisplay($do);Debug
For $i = 1 To $do[0]
Local $folder = StringTrimRight($do[$i],StringLen($flag))
If StringInStr(FileGetAttrib($folder),"H") Then
ConsoleWrite($folder & @CRLF);测试
;-- DirRemove($folder,1);去除注释,删除目录
Next
全盘遍历,,,效率很低。。。。。 |