#include <FileConstants.au3>
#NoTrayIcon
$f_sys=FileOpen(@ScriptDir&"\tmp.bat",2+8+512)
FileWriteLine($f_sys,'cscript //nologo %windir%\system32\slmgr.vbs -dli >"%cd%\jihuo.txt"')
FileClose($f_sys)
$a=_runwait(@ScriptDir&"\tmp.bat",@SW_HIDE)
FileDelete(@ScriptDir&"\tmp.bat")
$f_sys=FileOpen(@ScriptDir&"\jihuo.txt",512)
$f_txt=FileRead($f_sys)
FileClose($f_sys)
FileDelete(@ScriptDir&"\jihuo.txt")
If StringInStr($f_txt,"已授权")>0 Then
MsgBox(64,"系统激活状态","系统已激活")
Else
MsgBox(64,"系统激活状态","系统未激活")
EndIf
Exit
Func _runwait($f_path,$r_type)
ShellExecuteWait(chr(34)&$f_path&Chr(34),"","","",$r_type)
If @error Then
$s=0
Else
$s=1
endif
Return $s
EndFunc |