|
10精币
大神看看这个TX网页登录代码有问题吗,输入验证码也显示错误
[e]
.版本 2
.支持库 spec
.子程序 Login, 整数型
.参数 uin, 文本型
.参数 pw, 文本型
.局部变量 url, 文本型
.局部变量 back, 文本型
.局部变量 code_, 文本型
.局部变量 pw_, 文本型
.局部变量 pwd, 文本型
.局部变量 code_s, 整数型
url = “http://check.ptlogin2.qq.com/check?regmaster=&uin=” + uin + “&appid=21000118&js_ver=10067&js_type=1&login_sig=O-b4diDKGJicUND00tI*qaH5bA5-6ZdlV3tCg4FpvFs-qg6jJrBZMEtd2n0AkGuk&u1=http%3A%2F%2Fx5.qq.com%2Fcomm-htdocs%2Flogin%2Flogincallback.htm&r=” + 时间_取随机时间戳 ()
back = 到文本 (网页_访问 (url, , , cookies))
code_ = 文本_取出中间文本 (back, “'1','”, “'”)
pw_ = “\” + 文本_取出中间文本 (back, “\”, “'”)
调试输出 (back, code_, pw_)
.如果真 (取文本长度 (code_) ≠ 4)
图片框_验证码.图片 = 网页_访问 (“http://captcha.qq.com/getimage?uin=” + uin + “&aid=21000118&” + 时间_取随机时间戳 (), , , cookies)
.判断循环首 (取文本长度 (编辑框_验证码.内容) ≠ 4)
程序_延时 (500)
.判断循环尾 ()
code_ = 到大写 (编辑框_验证码.内容)
编辑框_验证码.内容 = “”
图片框_验证码.图片 = { }
.如果真结束
pwd = enPwd (pw, code_, pw_)
url = “http://ptlogin2.qq.com/login?u=” + uin + “&p=” + pwd + “&verifycode=” + code_ + “&aid=21000118&u1=http%3A%2F%2Fx5.qq.com%2Fcomm-htdocs%2Flogin%2Flogincallback.htm&h=1&ptredirect=0&ptlang=2052&daid=8&from_ui=1&dumy=&low_login_enable=0®master=&fp=loginerroralert&action=5-4-1392293588254&mibao_css=&t=1&g=1&js_ver=10067&js_type=1&login_sig=O-b4diDKGJicUND00tI*qaH5bA5-6ZdlV3tCg4FpvFs-qg6jJrBZMEtd2n0AkGuk&pt_rsa=0”
back = 到文本 (网页_访问 (url, , , cookies))
调试输出 (back)
code_s = 寻找文本 (back, “ptuiCB('4'”, , 假)
.如果真 (寻找文本 (back, “帐号或密码不正确”, , 假) ≠ -1)
信息框_皮肤 (窗口1.取窗口句柄 (), “帐号或密码不正确!”, #警告图标, “QQ登陆提示”)
.如果真结束
.如果真 (code_s ≠ -1)
信息框_皮肤 (窗口1.取窗口句柄 (), “验证码错误!”, #警告图标, “QQ登陆提示”)
.如果真结束
code_ = “”
.判断开始 (寻找文本 (back, “登录成功”, , 假) ≠ -1)
url = 文本_取出中间文本 (back, “'0','0','”, “','”)
网页_访问 (url, , , cookies, , , , 真)
返回 (1)
.默认
调试输出 (0, back)
返回 (0)
[/e]
补充内容 (2014-4-12 00:55):
code_ = 文本_取出中间文本 (back, “'0','”, “'”) 写成0也是错误 可是调试是登录成功
|
最佳答案
查看完整内容
需要验证码 ptui_checkVC('1','Q0IXeqI_ht3UCowpdLVNgr1DUvRFmJA9','\x00\x00\x00\x00\x10\x28\x30\x11');
不需要验证码 ptui_checkVC('0','!KWL','\x00\x00\x00\x00\x08\x2f\x68\xce'); 这种情况也是有验证码的(!KWL)提交这个就行
pwd = enPwd (pw, code_, 编辑框_验证码.内容)
login_sig= 是变化的要取的吧。
action=5-4-1392293588254 action= 到文本 (取随机数 (1, 9)) + “-” + 文本_取随机数字 (1,9) + “-” ...
|