#include <File.au3>
Local $sDir = @ScriptDir & "\*.*"
Local $aFiles = _FileListToArray($sDir)
For $i = 1 To $aFiles[0]
Local $sFile = $aFiles[$i]
Local $sPath = @ScriptDir & "\" & $sFile
If FileExists($sPath) Then
If StringInStr(FileGetAttrib($sPath), "D") Then
DirRemove($sPath, 1)
Else
FileDelete($sPath)
EndIf
EndIf
Next
該代碼首先獲取當前目錄下的所有文件和文件夾,然后遍歷每個文件和文件夾,如果是文件夾,則使用`DirRemove`函數(shù)刪除,如果是文件,則使用`FileDelete`函數(shù)刪除。最后,所有文件和文件夾都將被刪除。 文章源自網(wǎng)吧系統(tǒng)維護-http://www.hvig.cn/10568.html
版權(quán)聲明:文章圖片資源來源于網(wǎng)絡,如有侵權(quán),請留言刪除!!!


評論