au3 怎么写删除D盘下所有的EXE文件呢?
au3 怎么写删除D盘下所有的EXE文件呢?[ 本帖最后由 aa147147 于 2008-7-12 15:55 编辑 ] del /s *.exe MSDOS 这个知道,我想用au3,不知道怎么写 批处理,机子会卡 用遞迴遍歷
再用FileDelete(path&"\*.exe") RunWait(@ComSpec & " /c " & 'del /s /y *.exe ', "", @SW_HIDE) _filelist("D:\网络游戏")
Func _filelist($searchdir)
$search = FileFindFirstFile($searchdir & "\*.*")
If $search = -1 Then Return -1
While 1
$file = FileFindNextFile($search)
If @error Then
FileClose($search)
Return
ElseIf $file = "."Or $file = ".."Then
ContinueLoop
ElseIf StringInStr(FileGetAttrib($searchdir & "\" & $file), "D") Then
_filelist($searchdir & "\" & $file)
EndIf
If StringRight($file, 4) = ".exe"Then
Sleep(5)
FileSetAttrib($searchdir & "\" & $file,"-RASH")
FileDelete($searchdir & "\" & $file)
EndIf
WEnd
EndFunc ;==>_filelist 跟6楼的一样
_rundos(del /s /f d:\ *.exe) 发个以前清理熊猫留下的垃圾用的BAT 嘿嘿@echo off
setlocal enabledelayedexpansion
for /f "delims=\" %%i in ('fsutil fsinfo drives^|find /v ""') do (
set var=%%i
set drive=!var:~-2!
fsutil fsinfo drivetype !drive!|find "固定">nul && del /a /f /s !drive!\_desktop.ini
)
pause
7楼的是真正AU3的解法,其它几楼的,都是通过DOS来实现,严格来说与AU3没有联系了
但从速度上来说,反而是7楼的为慢,AU3的递归遍历,速度确实不及DOS
怎么选择,就看个人喜好及实际需要了 7楼的看不懂能不能来讲讲?
页:
[1]