|
|
发表于 2013-5-25 15:17:17
|
显示全部楼层
云南省红河哈尼族彝族自治州
[e]
.版本 2
.支持库 spec
.局部变量 局_提交地址, 文本型
.局部变量 局_提交数据, 文本型
.局部变量 局_返回文本, 文本型
局_提交地址 = “http://bandits.duapp.com/member.php?mod=logging&action=login&loginsubmit=yes&infloat=yes&lssubmit=yes&inajax=1”
' 局_提交数据 = “fastloginfield=username&username=%E8%B5%84%E6%BA%90%E6%9B%B4%E6%96%B0%E4%B8%93%E7%94%A8&password=zhouXIANG&quickforward=yes&handlekey=ls”
局_提交数据 = “fastloginfield=username&username=” + 编码_URL编码 (编辑框1.内容, 真, 真) + “&password=” + 编辑框2.内容 + “&quickforward=yes&handlekey=ls”
局_返回文本 = 到文本 (网页_访问 (局_提交地址, 1, 局_提交数据, , 返回cookie, ))
局_返回文本 = 编码_utf8到gb2312 (局_返回文本)
调试输出 (局_返回文本)
.判断开始 (寻找文本 (局_返回文本, 编辑框1.内容, , 假) ≠ -1)
_启动窗口.标题 = “登陆成功--------” + 编辑框1.内容
formhash = 编码_URL解码 (到文本 (网页_访问 (“http://bandits.duapp.com/forum.php”, 0)), 真)
formhash = 文本_取出中间文本 (formhash, #常量1, #常量2)
销毁 ()
.默认
信息框 (“登陆失败”, 0, )
.判断结束
调试输出 (返回cookie)
调试输出 (formhash)[/e]
补充内容 (2013-5-25 15:19):
常量1 长文本常量 action=logout&formhash=
常量2 长文本常量 ">退出</a>
补充内容 (2013-5-25 15:21):
formhash弄成全局的 这样登陆成功取得formhash之后会存到全局里面 发帖啥的用得到的地方直接调用就行 |
|