论坛 › 『 提问交流 』 › 请教,如何删除自身外的所有ABC目录?

木头人 发表于 2011-8-28 00:17:38

请教,如何删除自身外的所有ABC目录?

搜索硬盘上的所有分区根目录下(只要跟目录下)是否存在 ABC 文件夹, 如果存在的话就删除除了脚本本身目录以外(注意:脚本目录也存在根目录下,并且也是以ABC文件夹名名)的所有根目录下的 ABC 文件夹,请问应该如何实现呢?谢谢

sunafter 发表于 2011-8-28 03:42:56

多看下帮助文件其实很简单的
$var = DriveGetDrive("all")

If Not @error Then
        For $i = 1 To $var
                Dim $Dir = $var[$i] & "\ABC"
                MsgBox(0, "", $Dir)
                If FileExists($Dir) And $Dir <> @ScriptDir Then
                        DirRemove($Dir,1)
                EndIf
        Next
EndIf

llssky2003 发表于 2011-8-28 22:20:01

很像我以前写的删除U盘病毒的代码，哈哈。。{:face (356):}

查看完整版本: 请教,如何删除自身外的所有ABC目录?