1.论坛登录器怎么写加载WebBrowser DLL并打开登录页面然后使用自动填表填入用户名和密码,并点击按钮 这种方法适用于无验证码的登录页 。还有一种方法是打开登录页面后,使用sendkeys 发送按钮信息登录比较简单!
新建一个登录按钮,名称为按钮1
新建一个账号编辑框,名称为编辑框1
新建一个密码编辑框,名称为编辑框2
.版本 2
.支持库 internet
.子程序 _按钮1_被单击
.局部变量 a, 文本型
【怎么写登陆器】a = 到文本 (HTTP读文件 (“/handleLogin?r=324925183&qq=” + 组合框1.内容 + “&pwd=” + 编辑框2.内容 + “&toQQchat=true&q_from=&modifySKey=0&loginType=1”, “POST”)).默认返回文本 = UTF8转ANSI (彗星HTTP读文件 (“ /handleLogin?r=324925183&qq=” + 组合框1.内容 + “&pwd=” + 编辑框2.内容 + “&toQQchat=true&q_from=&modifySKey=0&loginType=2”, “POST”)).判断结束.判断循环首 (返回文本 ≠ “”) .判断开始 (寻找文本 (返回文本, “看不清,换一张”, , 假) ≠ -1) QQLogin.SID = 取指定内容 (返回文本, “sid=”, #引号) 输出调试文本 (QQLogin.SID) QQLogin.hexpwd = 取指定内容 (返回文本, “hexpwd” + #引号 + “ value=http://www.xuexi88.com/zhishi/” + #引号, #引号) 输出调试文本 (QQLogin.hexpwd) QQLogin.logintitle = “手机腾讯网” QQLogin.extend = 取指定内容 (返回文本, “extend” + #引号 + “ value=” + #引号, #引号) 输出调试文本 (QQLogin.extend) QQLogin.r_sid = 取指定内容 (返回文本, “r_sid” + #引号 + “ value=” + #引号, #引号) 输出调试文本 (QQLogin.r_sid) QQLogin.rip = 取指定内容 (返回文本, “rip” + #引号 + “ value=” + #引号, #引号) 输出调试文本 (QQLogin.rip) QQLogin.验证码地址 = 取指定内容 (返回文本, “
文章插图