易语言实现QQ登录

易语言如何实现！先载入登录窗口再自动登录？例如像qq先出现登录窗口，再自动登录~

_启动窗口可见为 "假"..
载入窗口1,登录..如果用户名密码正确销毁窗口1, _启动窗口可见为 "真"....这样就不用等加载代码了..
如果用户名密码错误就等待用户输入到正确为止..如果用户退出登录窗口就退出全部程序.

直接下一个按键精灵就能完成楼主的要求了
按键精灵8是最新版

楼主你最起码给点分吧

按键精灵和vb一样（差不了太多）

这是我很久以前写的代码


代码
---------------------------------------------


//判断文件是否存在如果存在将在下次运行无需手动输入账号以及密码!
aa = Plugin.File.IsFileExit("c:\c.txt")
If aa = true then
Call haha
Else
k=inputbox("QQ路径:",麦兜Terran)
y= inputbox("用户名:",麦兜Terran)
m= inputbox("密码:",麦兜Terran)

//创建一个文件,作为记录
RunApp "cmd /c cd.>c:\c.txt&",0
Call Plugin.File.WriteFileEx("c:\c.txt", y)
Call Plugin.File.WriteFileEx("c:\c.txt", m)
Call Plugin.File.WriteFileEx("c:\c.txt", k)
Call haha
End if

//开始工作
Sub haha
l = Plugin.File.ReadFileEx("c:\c.txt")
x = Split(l,"|")
RunApp x(2)
KeyPress 9,9
SayString x(0)
KeyPress 9,1
SayString x(1)
KeyPress 9,5
KeyPress 13,1
End Sub

.版本 2
.支持库 spec
.支持库 internet
.支持库 dp1

.子程序 _编辑框_QQ帐号_列表项被选择
.局部变量 密码, 文本型

.如果真 (寻找文本 (帐号密码, 编辑框_QQ帐号.内容, 1, 假) ≠ -1)
密码 ＝ 文本_取出中间文本 (帐号密码, “&username=” ＋ 编辑框_QQ帐号.内容 ＋ “&password=”, #换行符)
编辑框_QQ密码.内容 ＝ 文本_解密 (密码, 编辑框_QQ帐号.内容 ＋ “123456789”)
是否需要验证码 (删首尾空 (编辑框_QQ帐号.内容))
.如果真结束

.子程序 _按钮_登录_被单击
.局部变量 QQ帐号, 文本型
.局部变量 QQ密码, 文本型
.局部变量 验证码, 文本型

QQ帐号 ＝ 删首尾空 (编辑框_QQ帐号.内容)
QQ密码 ＝ 编辑框_QQ密码.内容
验证码 ＝ 编辑框_验证码.内容
登录QQ空间 (QQ帐号, QQ密码, 验证码)

.子程序 登录QQ空间
.参数 QQ帐号, 文本型
.参数 QQ密码, 文本型
.参数 验证码, 文本型
.局部变量 登录地址, 文本型
.局部变量 登录返回, 文本型
.局部变量 读入文件, 字节集
.局部变量 保存值, 字节集

登录地址 ＝ “http://ptlogin2.qq.com/login?u=” ＋ QQ帐号 ＋ “&p=” ＋ QQ密码加密 (QQ密码, 验证码判断码, QQ密码加密值) ＋ “&verifycode=” ＋ 验证码 ＋ “&aid=549000912&u1=http%3A%2F%2Fqzs.qq.com%2Fqzone%2Fv5%2Floginsucc.html%3Fpara%3Dizone&h=1&ptredirect=0&ptlang=2052&from_ui=1&dumy=&low_login_enable=0®master=&fp=loginerroralert&action=16-57-1375238731962&mibao_css=&t=1&g=1&js_ver=10036&js_type=1&login_sig=6Nl0dpHM2EGOuS-5uxCZVZM9rSjLcg60hMZq5qsx2DDh526fhVs*5kozukn1mvyI”
登录返回 ＝ 编码_utf8到gb2312 (到文本 (网页_访问 (登录地址, 0, , , , , , , , , g_tk)))
g_tk ＝ 计算G_tk (g_tk)
.如果 (寻找文本 (登录返回, “登录成功！”, 1, 假) ≠ -1)
读入文件 ＝ 读入文件 (取运行目录 () ＋ “\Flash.is”)
.如果真 (寻找文本 (到文本 (读入文件), 删首尾空 (编辑框_QQ帐号.内容), , 假) ≠ -1)
文本_删除指定文本行 (到文本 (读入文件), 文本_取文本所在行 (到文本 (读入文件), 删首尾空 (编辑框_QQ帐号.内容), ))
.如果真结束
保存值 ＝ 到字节集 (“&username=” ＋ 删首尾空 (编辑框_QQ帐号.内容) ＋ “&password=” ＋ 文本_加密 (编辑框_QQ密码.内容, 删首尾空 (编辑框_QQ帐号.内容) ＋ “123456789”) ＋ #换行符)
.如果 (寻找文本 (到文本 (读入文件), 到文本 (保存值), , 假) ≠ -1)

.否则
写到文件 (取运行目录 () ＋ “\Flash.is”, 读入文件 ＋ 保存值)
.如果结束
编辑框_QQ帐号.禁止 ＝ 真
编辑框_QQ密码.禁止 ＝ 真
编辑框_验证码.禁止 ＝ 真
载入 (窗口1, , 假)
_启动窗口.可视 ＝ 假
.否则
信息框 (“登录失败！”, #信息图标, “ ”)
获取验证码 ()
.如果结束

.子程序 是否需要验证码
.参数 QQ帐号, 文本型
.局部变量 验证地址, 文本型
.局部变量 验证访问, 文本型

验证地址 ＝ “http://check.ptlogin2.qq.com/check?regmaster=&uin=” ＋ QQ帐号 ＋ “&appid=549000912&js_ver=10036&js_type=1&login_sig=6Nl0dpHM2EGOuS-5uxCZVZM9rSjLcg60hMZq5qsx2DDh526fhVs*5kozukn1mvyI&u1=http%3A%2F%2Fqzs.qq.com%2Fqzone%2Fv5%2Floginsucc.html%3Fpara%3Dizone&r=0.45562692366007007”
验证访问 ＝ 编码_utf8到gb2312 (到文本 (网页_访问 (验证地址, 0)))
验证码判断码 ＝ 文本_取出中间文本 (验证访问, “','”, “','”)
QQ密码加密值 ＝ “\” ＋ 文本_取出中间文本 (到文本 (验证访问), “','\”, “'”)
调试输出 (验证码判断码, QQ密码加密值)
.如果 (取文本长度 (验证码判断码) ≠ 4 且 编辑框_QQ帐号.内容 ≠ “”)
编辑框_验证码.禁止 ＝ 假
编辑框_QQ密码.内容 ＝ “”
编辑框_验证码.内容 ＝ “”
图片框1.禁止 ＝ 假
获取验证码 ()
.否则
编辑框_验证码.禁止 ＝ 真
编辑框_验证码.内容 ＝ 验证码判断码
图片框1.禁止 ＝ 真
图片框1.图片 ＝ 到字节集 (“”)
.如果结束

.子程序 获取验证码

.如果真 (编辑框_QQ帐号.内容 ≠ “”)
图片框1.图片 ＝ HTTP读文件 (“http://captcha.qq.com/getimage?uin=” ＋ 删首尾空 (编辑框_QQ帐号.内容) ＋ “&aid=549000912&0.5757994162771172”)
.如果真结束

.子程序 _图片框1_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型

获取验证码 ()

.子程序 QQ密码加密, 文本型
.参数 密码, 文本型
.参数 验证码, 文本型
.参数 值1, 文本型
.局部变量 a, 字节集
.局部变量 b, 文本型
.局部变量 c, 文本型

a ＝ 字节集_还原 (取数据摘要 (到字节集 (密码)))
b ＝ 到大写 (取数据摘要 (a ＋ 字节集_还原 (子文本替换 (值1, “\x”, , , , 真))))
c ＝ 到大写 (取数据摘要 (到字节集 (b ＋ 验证码)))
返回 (c)

.子程序 _编辑框_QQ密码_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型

.如果真 (键代码 ＝ #回车键)
_按钮_登录_被单击 ()
.如果真结束

.子程序 _编辑框_验证码_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型

.如果真 (键代码 ＝ #回车键)
_按钮_登录_被单击 ()
.如果真结束

.子程序 _选择框1_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型

.如果真 (键代码 ＝ #回车键)
_按钮_登录_被单击 ()
.如果真结束

.子程序 _按钮_登录_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型

.如果真 (键代码 ＝ #回车键)
_按钮_登录_被单击 ()
.如果真结束

.子程序 _编辑框_QQ密码_获得焦点

是否需要验证码 (编辑框_QQ帐号.内容)

找个POST登陆QQ空间的源码来看看吧

---

德阳市17147949035： 易语言怎么做仿QQ登陆器 - ？
斐庾九味： 易语言源码:易语言自己简单编写QQ登陆器.这个源码非常简单,非常适合易语言入门初学的童鞋们学习,大家有兴趣可以下载本文附件的源码.本文附件下载:(QQ登陆器易语言源码) 这里给大家说一下如何编写吧,太简单了本程序都不用编写代码,只需要一个超文本浏览框即可实现.打开易语言主程序,新建一个Windows空白程序,然后添加一个超文本浏览框控件,地址就是利用了mini webQQ来实现的,然后调整好窗口的大小就搞定了,编写好了编译出来就成了一个独立的exe程序,界面如下:(大家可以自己美化)

德阳市17147949035： 易语言如何制作QQ登录器 - ？
斐庾九味： 用 sendmessage()命令

德阳市17147949035： 易语言制作登陆QQ - ？
斐庾九味： 程序集 窗口程序集1.程序集变量 临时记录, 文本型.子程序 _按钮2_被单击.如果真 (编辑框1.内容 = “”) 信息框 (“请输入您的帐号!”, #错误图标, “系统提示:“”) 返回 ().如果真结束.如果真 (编辑框3.内容 = “”) 信息框 (...

德阳市17147949035： 如何用易语言编写网页游戏QQ快捷登录? - ？
斐庾九味： 1、找到网页游戏的qq登录界面2、用抓包工具,抓取你登录时的数据包3、再在易语言里面写post登录的子程序 大概就是这个方法,你可以百度详细的post教程

德阳市17147949035： 我想用易语言模拟QQ登录界面: 登录界面 帐号密码输入正确 点击 确定 载入 ——正在登录——主界面 - ？
斐庾九味： 登录界面 帐号密码输入正确 点击 确定 载入 ——正在登录——主界面

德阳市17147949035： 用易语言做一个记录QQ号和密码然后点击自动打开QQ登录 - ？
斐庾九味： QQ的编辑框和按钮句柄是取不到的,方法只能是模拟按键 运行QQ登陆界面后 模拟按键tab选到账号编辑框 模拟按键输入账号 模拟按键tab到密码编辑框 模拟按键输入密码 模拟回车键 登陆 望采纳

德阳市17147949035： 用易语言做的QQ登陆器是怎么做的呀?？
斐庾九味： 在窗口的属性里,有背景图片,你截取qq登陆窗口,然后,添加到其背景上就行了!

德阳市17147949035： 请问易语言怎么实现QQ登陆呢？
斐庾九味： 用 运行命令

德阳市17147949035： 易语言QQ登陆模块怎么使用?详细 - ？
斐庾九味： 用易语言打开模块,然后选择静态编译就成了可以运行的程序了.

德阳市17147949035： 易语言怎么实现登陆QQ和验证码 - ？
斐庾九味： 验证码恐怕是不行的了~~ QQ登陆的话可以模拟鼠标单击和模拟按键 满意请采纳