POST百度帐号注册的问题

IceSnow

我的每次都成功  我跟你的代码不一样  给你我的看看  比较乱  希望你能看懂   还有就是验证码读取必须读取两次 第一次读取的是错误的  不知道为何 但是也能解决


.版本 2
.支持库 spec

.子程序 _按钮1_被单击
.局部变量 https, 类_XMLHTTP
.局部变量 返回信息, 文本型
.局部变量 crypt, 文本型
.局部变量 k, 文本型
.局部变量 用户名, 文本型
.局部变量 fhwb, 文本型

https.打开 (“POST”, “https://passport.baidu.com/?reg&tpl=mn”, , , )
https.发送请求 ()
返回信息 ＝ https.取responseText ()
用户名 ＝ 文本_到小写 (文本_取随机字符 (8))
crypt ＝ 文本_取出中间文本 (文本_取指定变量文本行 (返回信息, 文本_取文本所在行 (返回信息, “crypt”, )), “value=” ＋ #引号, #引号)
k ＝ 文本_取出中间文本 (文本_取指定变量文本行 (返回信息, 文本_取文本所在行 (返回信息, “crypt”, ) ＋ 1), “name=” ＋ #引号, #引号 ＋ “>”)
k ＝ “&” ＋ 子文本替换 (k, #引号 ＋ “ value=” ＋ #引号, “=”, , , 真)
图片框1.可视 ＝ 假
图片框1.图片 ＝ 网页_验证码读取 (“https://passport.baidu.com/?verifypic”)
图片框1.图片 ＝ 网页_验证码读取 (“https://passport.baidu.com/?verifypic”)
图片框1.可视 ＝ 真
.判断循环首 (文本_取长度 (编辑框2.内容) ≠ 4)
    编辑框1.内容 ＝ 到文本 (文本_取长度 (编辑框2.内容))
    延迟 (200)
.判断循环尾 ()
fhwb ＝ 到文本 (网页_访问 (“https://passport.baidu.com/?reg”, 1, , , 到字节集 (“tpl=mn&tpl_ok=&skip_ok=&aid=&need_pay=&need_coin=&pay_method=&u=http%3A%2F%2Fwww.baidu.com%2F&next_target=&return_method=get&more_param=&friend=&uid=&rand=&nick=&crypt=” ＋ crypt ＋ k ＋ “&regin=0&username=” ＋ 用户名 ＋ “&loginpass=asd123&verifypass=asd123&sex=1&email=” ＋ 用户名 ＋ “@163.com&verifycode=” ＋ 编辑框2.内容), , , , ))
.如果真 (寻找文本 (fhwb, “正在检查用户名，请稍候”, , 假) ＝ -1)
    编辑框1.加入文本 (用户名 ＋ #换行符)
.如果真结束
' 输出调试文本 (fhwb)


补充内容 (2012-2-3 19:33):
变量解释：
k           是提取百度页面一个属性字段，用来提交数据的时候用的（虽然我也不清楚是啥。。。）
crypt      同上
fhwb     是提交post信息后的返回文本  

IceSnow

顺便附上源码吧  我这个还没写代理使用代理注册   不过可以实现   以后再加上多线程的话估计就可以了  
借鉴了楼主的源码  感谢

补充内容 (2012-2-3 19:56):
不好意思  源码有点问题  下载的请不要直接使用  
.判断循环首 (文本_取长度 (编辑框2.内容) ≠ 4)
    编辑框1.内容 ＝ 到文本 (文本_取长度 (编辑框2.内容))
    延迟 (200)
.判断循环尾 ()
去掉 编辑框1.内容 ＝*

讲不出再见

论坛有人写过源码的，你去查一下

瘦瘦的小四

加个代理吧。论坛有源码、
一个IP=三个至五个注册（也许是）

万隆

IceSnow 发表于 2012-2-3 19:20
顺便附上源码吧  我这个还没写代理使用代理注册   不过可以实现   以后再加上多线程的话估计就可以了  
借 ...

呵呵我已经研究出来了