|
发表于 2013-7-7 08:49:47
|
显示全部楼层
;-------------------------------------
$reg_var_1 = 12345;条件
;-------------------------------------
$reg_var = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\LOG", "REG_LOG");先读注册表值
If $reg_var = 0 Then;判断读出来的值,若什么都没有
$value = InputBox("提示", "输入[12345]", "", "", 230, 100, @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, 20)
If Abs($value) = 12345 Then
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\LOG", "REG_LOG", "REG_SZ", $value);将12345写到注册表中
EndIf
EndIf
$reg_var = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\LOG", "REG_LOG");在读一次
If $reg_var = $reg_var_1 Then
MsgBox(48,"提示", "输入的值正确", 2)
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\LOG", "REG_LOG", "REG_SZ", "0");清除注册表中的值
TrayTip("", "", 0)
Else
MsgBox(48, "错误", "请重新输入12345", 2)
Exit
EndIf |
|