论坛 › 已解决问题区 › 删除多个文件。有点问题

cls822001 发表于 2009-4-10 16:30:49

删除多个文件。有点问题

哪个给改下$file为多个文件名。

#NoTrayIcon
$file = "\AUTORUN.INF"
$var = DriveGetDrive("FIXED")
If NOT @error Then
        For $i = 1 to $var
                If FileExists($var[$i] & $file) = 1 Then
                        FileSetAttrib($var[$i] & $file, "-r-h-r")
                        FileDelete($var[$i] & $file)
                EndIf
        Next
EndIf

[ 本帖最后由 cls822001 于 2009-4-11 14:02 编辑 ]

sxd 发表于 2009-4-10 20:37:31

文件名放一个数组里 再套个for

cls822001 发表于 2009-4-11 10:52:40

有点不太明白

大绯狼 发表于 2009-4-11 11:18:30

dim $files
$files = "\AUTORUN.INF"
$files = "\xxx.xx"
$var = DriveGetDrive("FIXED")
If Not @error Then
        For $i = 1 To $var
                For $file In $files
                        If FileExists($var[$i] & $file) = 1 Then
                                FileSetAttrib($var[$i] & $file, "-r-h-r")
                                FileDelete($var[$i] & $file)
                        EndIf
                Next
        Next
EndIf

查看完整版本: 删除多个文件。有点问题