回复 1# cool8 #include<file.au3>
#include<array.au3>
;注册表写入,开机自动运行该脚本
;RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run","xxxxx", "REG_SZ", "D:\xxxxx.exe")
Local $FilesArray, $date_today, $FileCreateDate
$FilesArray = _FileListToArray(@ScriptDir,"*.*",1)
_ArrayDisplay($FilesArray)
For $i = 1 To $FilesArray[0]
$FileCreateDate = FileGetTime(@ScriptDir&"\"&$FilesArray[$i],1,0)
If Not @error Then
_ArrayDisplay($FileCreateDate)
If $FileCreateDate[0] == @YEAR And $FileCreateDate[1] == @MON And $FileCreateDate[2] == @MDAY Then FileDelete(@ScriptDir&"\"&$FilesArray[$i])
EndIf
Next
|