网站 › 『编程语言区』 › 百度发帖 回帖 源码

大D 发表于 2013-8-28 23:58

百度发帖 回帖 源码

本帖最后由 大D 于 2013-8-29 00:01 编辑

折腾一晚上 搞不明白怎么发帖的回帖的
下了个登录的源码看了好多教程
然后测试下 这个 发帖 完全不行易语言的 看看哪里错了哇

.版本 2
.支持库 spec

.程序集 窗口程序集1
.程序集变量 Cookies, 文本型, , , 全局cookies
.程序集变量 协议头, 文本型

.子程序 _按钮1_被单击
.局部变量 用户名, 文本型
.局部变量 用户密码, 文本型
.局部变量 验证码, 文本型
.局部变量 临时文本, 文本型
.局部变量 token, 文本型

.如果真 (编辑框1.内容 ＝ “” 或 编辑框2.内容 ＝ “”)
    返回 ()
.如果真结束

用户名 ＝ 编码_URL编码 (编辑框1.内容, 真, 真)
用户密码 ＝ 编码_URL编码 (编辑框2.内容, 真, 真)
验证码 ＝ 编码_URL编码 (编辑框2.内容, 真, 真)' 验证码没有分析。。。
' 验证码部分没有处理。我这边登录不需要验证码 所以就没有分析了。
临时文本 ＝ 网页_访问s (“https://passport.baidu.com/v2/api/?getapi&class=login&tpl=mn&tangram=true”, 0, , , , , , , , , )' 获取token 这个地址是点击登录后 访问的地址
token ＝ 文本_取出中间文本 (临时文本, “'”, “';”, 1, 真)


网页_访问s (“https://passport.baidu.com/v2/api/?getapi&class=login&tpl=mn&tangram=true”, 0, , Cookies, , , , , , , )' 为了记录cookis，方便下面调用


网页_访问s (“https://passport.baidu.com/v2/api/?login”, 1, “ppui_logintime=13437&charset=utf-8&codestring=&token=” ＋ token ＋ “&isPhone=false&index=0&u=&safeflg=0&staticpage=http%3A%2F%2Fwww.baidu.com%2Fcache%2Fuser%2Fhtml%2Fjump.html&loginType=1&tpl=mn&callback=parent.bdPass.api.login._postCallback&username=” ＋ 用户名 ＋ “&password=” ＋ 用户密码 ＋ “&verifycode=&mem_pass=on”, , Cookies, , , , , , )

输出调试文本 (Cookies)' 如果返回cookies为空 那么就是没有登陆成功
临时文本 ＝ 网页_访问s (“http://passport.baidu.com/center?_t=”, 0, Cookies, , , , , , , , )' 测试是否成功登录地址
输出调试文本 (临时文本)
.如果真 (寻找文本 (临时文本, “修改资料”, 1, 假) ≠ -1)
    标签1.标题 ＝ “登录成功”
    信息框 (“登录成功”, 0, “提示”)
    返回 ()
.如果真结束
标签1.标题 ＝ “登录失败”
信息框 (“登录失败”, 0, “提示”)
标签1.标题 ＝ “等待用户登录...”
返回 ()


.子程序 __启动窗口_创建完毕


---------------------------------------------------------下面是自己加的测试-----------------------------------------------------------
.子程序 _按钮2_被单击
.局部变量 tbsok, 文本型
.局部变量 tbs, 文本型

tbs ＝ 网页_访问s (“http://tieba.baidu.com/dc/common/tbs”)
tbsok ＝ 文本_取出中间文本 (tbs, “:#引号”, “#引号,”, 1, 真)
' 调试输出 (tbs)
网页_访问s (“http://tieba.baidu.com/p/2558273581”, 1, “kw=%E4%B8%89%E5%9B%BD%E4%BA%89%E9%9C%B8&ie=utf-8&rich_text=1&fid=472743&tid=2558273581&mouse_pwd_isclick=1&content=%E5%93%8E%EF%BD%9E%EF%BD%9E+%E8%BF%99%E5%87%84%E5%87%89%E7%9A%84%EF%BD%9E&anonymous=0&tbs=” ＋ tbsok, Cookies, , , , , , , )
调试输出 (Cookies)
---------------------------------------------具体要POST过去哪些变量 不清楚----------------------------------------------------------------------------

大D 发表于 2013-8-29 11:44

我晕 问i 问题呢！

waphkj 发表于 2013-8-29 06:47

收藏 感谢分享

1305651694 发表于 2013-8-29 03:07

这个也很给力，先收藏啦

wo1004774811 发表于 2013-8-29 02:12

和那个抢二楼的一样不？

kv305 发表于 2013-8-29 00:12

好东西学习了，就要给LZ顶贴

1006706246 发表于 2013-9-1 22:58

帮顶去易语言看看

948413534 发表于 2013-9-1 23:01

干嘛总是易语言呢？？不会是支持国产吧

法国猪 发表于 2014-12-8 03:13

好贴啊，哈哈哈哈哈哈学习了

查看完整版本: 百度发帖 回帖 源码