|
发表于 2011-11-19 13:35:14
|
显示全部楼层
广东省惠州市
.版本 2
.支持库 spec
.子程序 _按钮_注册_被单击
.局部变量 POST数据, 文本型
.局部变量 text2, 文本型
.如果真 (删首尾空 (编辑框1.内容) = “” 或 删首尾空 (编辑框2.内容) = “” 或 删首尾空 (编辑框3.内容) = “”)
信息框 (“输入有误,请检查!”, #警告图标, “输入有误!”)
返回 ()
.如果真结束
编辑框4.内容 = “”
text1 = 到文本 (网页_访问 (“zc.qq.com/cgi-bin/chs/numreg/get_acc?r=0.12092” + 到文本 (取随机数 (1111, 9999)) + 到文本 (取随机数 (1111, 9999)) + 到文本 (取随机数 (1111, 9999)), 1, , “Referer: http://zc.qq.com/chs/index.html” + #换行符, 到字节集 (“&verifycode=” + 删首尾空 (编辑框3.内容) + “&qzone_flag=1&country=1&province=51&city=13&isnongli=0&year=1991&month=1&day=2&isrunyue=0&password=” + rsa加密 (删首尾空 (编辑框2.内容)) + “&nick=” + 删首尾空 (编辑框1.内容) + “&email=false&other_email=false&elevel=1&sex=1&qzdate=&a2d5c2j0=u8o0p9l&jumpfrom=58030&csloginstatus=1”), , , ))
调试输出 (text1) ' {"ec":0,"safeverifyResult":"0","type":"0","uin":"2665310925"}
text2 = 文本_取出中间文本 (text1, #F, #B)
.如果真 (text2 = “0”)
编辑框4.内容 = 文本_取出中间文本 (text1, #NF, #NB)
.如果真结束
.如果真 (text2 = “2”)
编辑框4.内容 = “验证码错误!”
.如果真结束
.如果真 (text2 = “20”)
编辑框4.内容 = “需要手机验证!”
.如果真结束
.如果真 (text2 = “21”)
编辑框4.内容 = “恶意注册,暂时停止!”
.如果真结束
.如果真 (text2 = “26”)
编辑框4.内容 = “需要手机激活!”
.如果真结束
编辑框1.内容 = “”
初始化 ()
|
评分
-
参与人数 1 | 荣誉 +1 |
收起
理由
|
笨潴
| + 1 |
热心帮助他人,荣誉+1,希望继续努力(*^__^*) 嘻嘻! |
查看全部评分
|