|
发表于 2012-12-19 22:45:07
|
显示全部楼层
广东省揭阳市
[e]
.版本 2
.子程序 子程序_注册, 文本型
.参数 账号, 文本型
.参数 密码, 文本型
.参数 邮箱, 文本型
.局部变量 post地址, 文本型
.局部变量 post数据, 文本型
.局部变量 返回数据, 文本型
post地址 = “http://bbs.edvip.info/member.php?mod=register&inajax=1”
post数据 = “regsubmit=yes&formhash=cd9f2fb1&referer=http://bbs.edvip.info/forum.php&activationauth=&cZ0WTE=” + 账号 + “&ipNOO6=” + 密码 + “&v4IE6u=” + 密码 + “&w6KXrO=” + 邮箱
返回数据 = 到文本 (网页_访问 (post地址, 1, , , 到字节集 (post数据)))
.判断开始 (寻找文本 (返回数据, “该用户名已被注册”, , 假) ≠ -1)
返回 (“该用户名已被注册”)
.判断 (寻找文本 (返回数据, “该 Email 地址已被注册”, , 假) ≠ -1)
返回 (“该 Email 地址已被注册”)
.默认
.判断结束
.如果真 (寻找文本 (返回数据, “感谢您注册”, , 假) ≠ -1)
返回 (“感谢您注册”)
.如果真结束
返回 (“注册失败,返回信息为:” + #换行符 + 返回数据)
[/e] |
|