提示窗口显示乱码？？？求解决方法
本帖最后由 pwover 于 2009-9-17 13:44 编辑原来是那个迷惑代码的问题 我去掉了迷惑代码后 一切正常
#include <File.au3>
#include <string.au3>
#include <Process.au3>
#include "qqpswd.au3"
Opt("SendCapslockMode", 1)
$title = "QQ用户登录"
If WinExists("QQ用户登录") Then
$qqpath = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TENCENT\QQ", "install")
Else
$qqpath = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TENCENT\QQ2009", "Install")
EndIf
If Not FileExists('qq.ini') Then
IniWrite("qq.ini", "setup", "qq", '')
IniWrite("qq.ini", "setup", "qqpath", $qqpath)
EndIf
$qqpath = IniRead('qq.ini', "setup", "qqpath", "0")
$qqhm = IniRead('qq.ini', "setup", "qq", "0")
If $qqhm = '0' Or $qqhm = '' Then
$qqhm = InputBox("QQ登录器", "请输入QQ号码：", "", "", "125", "125", "-1", "-1")
$qqmm = InputBox("QQ登录器", "请输入QQ密码：", "", "*", "125", "125", "-1", "-1")
$qqmm = _StringEncrypt(1, $qqmm, "107")
IniWrite("qq.ini", "setup", "qq", $qqhm)
IniWrite("qq.ini", $qqhm, "qqmm", $qqmm)
EndIf
$hm_n = StringSplit($qqhm, ",")
我用的是 AUTOIT_3.3.1.1-2.exe
页:
[1]