无法抓包实现成功登录，求大神帮助改下，拜托

学易未精

  

子程序名	返回值类型	公开	备 注
_超级按钮1_被单击

变量名	类 型	静态	数组	备 注
局_提交地址	文本型
局_提交数据	文本型
局_返回文本	文本型

局_提交地址 ＝ “http://meiyunyou.howbbs.com/”
局_提交数据 ＝ “module=user&” ＋ 编辑框1.内容 ＋ “&returnPath=” ＋ 编辑框2.内容 ＋ “&username=%E6%A2%85%E8%BF%90%E5%8F%8B”
局_返回文本 ＝ 到文本 (网页_访问 (局_提交地址, 1, , , 局_提交数据, )) ' 最后一个参数为返回的编码方式
局_返回文本 ＝ 到文本 (网页_访问 (“http://meiyunyou.howbbs.com/usergroup/permissions/64824.html”))
输出调试文本 (局_返回文本)
判断 (寻找文本 (局_返回文本, “论坛全局相关权限 :”, , 假) ≠ -1)
信息框 (“登录成功！”, 0, )
信息框 (“登录失败”, 0, )

.版本 2<br /> <br /> .子程序 _超级按钮1_被单击<br /> .局部变量 局_提交地址, 文本型<br /> .局部变量 局_提交数据, 文本型<br /> .局部变量 局_返回文本, 文本型<br /> <br /> 局_提交地址 ＝ “http://meiyunyou.howbbs.com/”<br /> 局_提交数据 ＝ “module=user&” ＋ 编辑框1.内容 ＋ “&returnPath=” ＋ 编辑框2.内容 ＋ “&username=%E6%A2%85%E8%BF%90%E5%8F%8B”<br /> 局_返回文本 ＝ 到文本 (网页_访问 (局_提交地址, 1, , , 局_提交数据, )) ' 最后一个参数为返回的编码方式<br /> 局_返回文本 ＝ 到文本 (网页_访问 (“http://meiyunyou.howbbs.com/usergroup/permissions/64824.html”))<br /> 输出调试文本 (局_返回文本)<br /> .判断开始 (寻找文本 (局_返回文本, “论坛全局相关权限 :”, , 假) ≠ -1)<br /> 信息框 (“登录成功！”, 0, )<br /> .默认<br /> 信息框 (“登录失败”, 0, )<br /> .判断结束

学易未精

黑月 发表于 2014-11-1 12:36
测试账号呢。。

帐号：霉运有
米：520520

黑月

时尚凌少 发表于 2014-11-1 13:20
咋不说话了呢

源码.rar (1.49 MB, 下载次数: 6)

2014-11-1 13:25 上传

点击文件名下载附件 刚吃饭忘记发你了。。

黑月

测试账号呢。。

学易未精

黑月 发表于 2014-11-1 12:36
测试账号呢。。

咋不说话了呢