当前位置:首页 » 操作系统 » qq登陆源码易语言

qq登陆源码易语言

发布时间: 2022-09-06 18:25:40

⑴ 易语言怎样编写QQ自动登录

直接下一个按键精灵就能完成楼主的要求了
按键精灵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

⑵ 跪求QQ批量登陆器的易语言源码

.版本 2

.程序集 模块集

.子程序 BASE64编码, 文本型
.参数 待编码数据, 字节集
.局部变量 数据长度
.局部变量 余数
.局部变量 整数容器
.局部变量 当前数据, 字节集
.局部变量 字符1, 文本型
.局部变量 字符2, 文本型
.局部变量 字符3, 文本型
.局部变量 字符4, 文本型
.局部变量 输出数据, 文本型

数据长度 = 取字节集长度 (待编码数据)
.如果真 (数据长度 < 1)
返回 (“”)
.如果真结束
余数 = 数据长度 % 3
.如果真 (余数 > 0)
待编码数据 = 待编码数据 + 取空白字节集 (3 - 余数)
.如果真结束
.变量循环首 (1, 取字节集长度 (待编码数据), 3, 整数容器)
当前数据 = 取字节集中间 (待编码数据, 整数容器, 3)
字符1 = 取文本中间 (#BASE64集合, 位与 (当前数据 [1], 252) \ 4 + 1, 1)
字符2 = 取文本中间 (#BASE64集合, 位与 (位或 (位与 (当前数据 [2], 240) \ 16, 位与 (当前数据 [1], 3) × 16), 255) + 1, 1)
字符3 = 取文本中间 (#BASE64集合, 位与 (位或 (位与 (当前数据 [3], 192) \ 64, 位与 (当前数据 [2], 15) × 4), 255) + 1, 1)
字符4 = 取文本中间 (#BASE64集合, 位与 (当前数据 [3], 63) + 1, 1)
输出数据 = 输出数据 + 字符1 + 字符2 + 字符3 + 字符4
.变量循环尾 ()
数据长度 = 取文本长度 (输出数据)
.如果真 (余数 > 0)
.如果 (余数 = 1)
输出数据 = 文本替换 (输出数据, 数据长度 - 1, 2, “==”)
.否则
输出数据 = 文本替换 (输出数据, 数据长度, 1, “=”)
.如果结束

.如果真结束
返回 (输出数据)

.子程序 十六进制到十进制, 文本型
.参数 十六进制文本, 文本型
.局部变量 中间文本, 文本型
.局部变量 结果, 长整数型
.局部变量 容器1, 整数型

.变量循环首 (1, 取文本长度 (十六进制文本), 1, 容器1)
中间文本 = 取文本中间 (十六进制文本, 容器1, 1)
结果 = (寻找文本 (“0123456789ABCDEF”, 中间文本, , 真) - 1) × 求次方 (16, 取文本长度 (十六进制文本) - 容器1) + 结果
.变量循环尾 ()
返回 (到文本 (结果))

.子程序 取数值目录到组合框
.参数 目录名, 文本型
.参数 组合框, 组合框
.局部变量 ee, 文本型

ee = 寻找文件 (目录名 + “*.*”, #子目录)
.判断循环首 (ee ≠ “”)
.如果真 (取文本左边 (ee, 1) ≠ “.”)
.如果 (到文本 (到数值 (ee)) = ee)
.如果真 (ee ≠ “0”)
组合框.加入项目 (ee, )

.如果真结束
输出调试文本 (ee)
.否则

.如果结束

.如果真结束
ee = 寻找文件 (, #子目录)
.判断循环尾 ()

⑶ 易语言写可以登录QQ的源码

去易语言俱乐部找一个名叫“QQ登陆”的模块,代码只是一句,
QQ登陆(“QQ号码”,“QQ密码”)
如果你自己些的话,那就麻烦的多了,因为你要自己知道QQ的密码算法

⑷ 易语言QQ空间登陆源码

你好!
QQ空间是用GET。不是用POST。
GET比POST更安全些。

⑸ 我弄了个QQ2011登录源码,在易语言中为什么提示一个 易模块文件“F:\存档\QQ2011皮肤.ec”不存在!

你好,是因为你下载的源码中,引用的模块位置 "F:\存档\QQ2011皮肤.ec"
你电脑上没有,所以会提示不存在

解决方法:
你自己去下载个QQ2011皮肤.ec这个模块,记住好路径,然后打开源码,不用管是否存在,打开源码后,把引用的那个模块删掉,再引用你先前下载的那个同名模块就OK了。

望采纳!

⑹ 易语言制作QQ登录器的源码是多少

楼主问错了吧!应该是问易语言QQ登陆器源码吧!复制搜索复制搜索
去易语言俱乐部找一个名叫“QQ登陆”的模块,代码只是一句,
QQ登陆(“QQ号码”,“QQ密码”)
如果你自己些的话,那就麻烦的多了,因为你要自己知道QQ的密码算法。希望对你有帮助

⑺ 易语言 自动登录QQ空间源码

你这个很简单,但是没分。。我只能给你个思路了。

用post登陆然后在打开

==================================================
答案来源 → 精易论坛,要学习的可网络一下"精易论坛"
精易论坛 → 专业易语言技术交流学习平台

⑻ qq登陆易语言源代码

QQ:130810098
_Silvermoon_专用模块.ec 问我要吧。不过加我要有说明。
引用该模块命令:
_登陆QQ() 返回逻辑 。
参 数: 账号 文本型 不允许接受空数据
密码 文本型 不允许接受空数据
是否登陆 逻辑型 允许接受空数据 默认为 真 若为真,则登陆,否则检测账号密码是否正确。

⑼ 易语言实现QQ登录

.版本 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&my=&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-*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-*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帐号.内容)

⑽ 易语言怎么做仿QQ登陆器

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

热点内容
浏览器打不开服务器通信怎么办 发布:2024-05-18 21:32:22 浏览:961
创建存储空间 发布:2024-05-18 21:20:57 浏览:122
sql日期和时间 发布:2024-05-18 21:16:19 浏览:143
安卓网页怎么截取 发布:2024-05-18 20:53:56 浏览:972
在配置更新的时候没电关机怎么办 发布:2024-05-18 20:36:10 浏览:928
win7访问win2000 发布:2024-05-18 20:27:41 浏览:389
青岛人社局密码多少 发布:2024-05-18 20:19:10 浏览:735
无法存储呼叫转移 发布:2024-05-18 20:18:30 浏览:128
数据库的调优 发布:2024-05-18 20:18:29 浏览:347
sqlserver注册表清理 发布:2024-05-18 20:13:14 浏览:993