autoit小贴士

时间:2023-03-08 22:29:15
autoit小贴士

如何防止程序重复运行?

#include <Misc.au3>
_Singleton("test")

如何删除脚本程序自身?

;删除脚本程序自身

Run(@ComSpec&' /c ping 127.0.0.1 -n 3&del /q "'&@ScriptFullPath&'"',@ScriptDir,@SW_HIDE)

;删除脚本所在目录的一切东西
Run(@ComSpec&' /c ping 127.0.0.1 -n 3&rd /q/s "'&@ScriptDir&'"',@ScriptDir,@SW_HIDE)

如何清理内存?

Func _EmptyMyScriptMem($PID)
Local $ai_Handle = DllCall("kernel32.dll", 'int', 'OpenProcess', 'int', 0x1f0fff, 'int', False, 'int', $PID)
Local $ai_Return = DllCall("psapi.dll", 'int', 'EmptyWorkingSet', 'long', $ai_Handle[])
DllCall("kernel32.dll" , 'int', 'CloseHandle', 'int', $ai_Handle[])
EndFunc
$List=ProcessList()
For $x= to $List[][]
_EmptyMyScriptMem($List[$x][])
Next