精易论坛

标题: 自动登录TIM - QQ [打印本页]

作者: 帅气与大侠    时间: 2023-4-19 18:02
标题: 自动登录TIM - QQ
每天电脑开机都要登TIM,数量有点多,每次都要手动一个一个选择账hao,写了一个循环操作,解放双手。源码中使用了“精易模块11.0.5”,请前往:ec.125.la 自行下载
  
窗口程序集名保 留  保 留备 注
程序集1   
子程序名返回值类型公开备 注
_启动子程序整数型 本子程序在程序启动后最先执行
变量名类 型静态数组备 注
TIM文本型 
窗口类名文本型 
窗口标题文本型 
进程结构精易_进程结构 
窗口句柄整数型 
userName文本型0
i整数型 
j整数型 
键代码整数型 
登录成功后窗口句柄整数型 
关闭所有TIM窗口 (“TIM”, “TXGuiFoundation”, 725, 548, -1777860608, 524800)  ' 关闭所有未登录的
加入成员 (userName, “xxx”)
加入成员 (userName, “xxx”)
加入成员 (userName, “xxx”)
加入成员 (userName, “xxx”)
加入成员 (userName, “xxx”)
TIM= “TIM文件路径”
计次循环首 (取数组成员数 (userName), i)
如果真 (运行 (TIM, 假, ))
窗口句柄 = 等待TIM登录窗口出现 (“TIM”, “TXGuiFoundation”, 725, 548, -1777860608, 524800, )
如果真 (窗口句柄 ≠ 0)
' 等待1秒,让窗口完全激活显示,不同电脑配置显示速度可能有差异,可适当加大延迟,保证稳定
程序_延时 (1000)
窗口_激活 (窗口句柄)
' 模拟按Tab键9次,让账号输入框获得焦点
计次循环首 (9, )
键盘_消息 (窗口句柄, #Tab键, 5, )
程序_延时 (100)
计次循环尾 ()
' 取出TIM账hao对应键代码,发送键盘消息。仅支持单字节字符
调试输出 (“正在登录:”, userName [i])
计次循环首 (取文本长度 (userName [i]), j)
键代码 = 取代码 (userName [i], j)
键盘_消息 (窗口句柄, 键代码)
计次循环尾 ()
' 输入完TIM账hao后,按回车键登录
程序_延时 (1000)
键盘_消息 (窗口句柄, #回车键, 5, )
' 最多等待30秒,等窗口属性发生改变
登录成功后窗口句柄 = 等待TIM登录窗口出现 (“TIM”, “TXGuiFoundation”, -1, -1, -1777401856, 525056, 30 × 1000)
窗口句柄 = 选择 (登录成功后窗口句柄 = 0, 窗口句柄, 登录成功后窗口句柄)
' 登录成功后要做个延迟等待TIM主动将登录窗口关闭动作,然后我们再关闭登录后的窗口(也可能是登陆前窗口)
程序_延时 (2000)
窗口_关闭 (窗口句柄)


计次循环尾 ()
返回 (0)  ' 可以根据您的需要返回任意数值
子程序名返回值类型公开备 注
等待TIM登录窗口出现整数型 返回窗口句柄
参数名类 型参考可空数组备 注
窗口标题文本型固定:TIM
窗口类名文本型固定:TXGuiFoundation
窗口宽度整数型未登录:725,登陆后:变动
窗口高度整数型未登录:548,登陆后:变动
窗口风格整数型未登录:-1777860608,登录后:-1777401856
窗口扩展风格整数型未登录:524800,登录后:525056
超时整数型默认为:3000
变量名类 型静态数组备 注
启动时间整数型 
窗口信息精易_窗口信息0
窗口数量整数型 
i整数型 
位置和大小精易_位置和大小 
超时 = 选择 (是否为空 (超时), 3000, 超时)
启动时间 = 取启动时间 ()
循环判断首 ()
窗口数量 = 窗口_枚举 (窗口信息)
计次循环首 (窗口数量, i)
如果真 (窗口信息 [i].窗口标题 = 窗口标题 窗口信息 [i].窗口类名 = 窗口类名)
如果真 (窗口_取窗口属性 (窗口信息 [i].窗口句柄, #GWL_STYLE ) = 窗口风格 窗口_取窗口属性 (窗口信息 [i].窗口句柄, #GWL_EXSTYLE ) = 窗口扩展风格)
如果真 (窗口宽度 = -1 窗口高度 = -1)
返回 (窗口信息 [i].窗口句柄)

位置和大小 = 窗口_取位置和大小 (窗口信息 [i].窗口句柄)
如果真 (位置和大小.宽度 = 窗口宽度 位置和大小.高度 = 窗口高度)
返回 (窗口信息 [i].窗口句柄)


处理事件 ()
计次循环尾 ()
程序_延时 (1)
循环判断尾 (取启动时间 () - 启动时间 ≤ 超时)
返回 (0)
子程序名返回值类型公开备 注
关闭所有TIM窗口  
参数名类 型参考可空数组备 注
窗口标题文本型固定:TIM
窗口类名文本型固定:TXGuiFoundation
窗口宽度整数型未登录:725,登陆后:变动
窗口高度整数型未登录:548,登陆后:变动
窗口风格整数型未登录:-1777860608,登录后:-1777401856
窗口扩展风格整数型未登录:524800,登录后:525056
变量名类 型静态数组备 注
窗口数量整数型 
窗口信息精易_窗口信息0
i整数型 
位置和大小精易_位置和大小 
窗口数量 = 窗口_枚举 (窗口信息)
计次循环首 (窗口数量, i)
如果真 (窗口信息 [i].窗口标题 = 窗口标题 窗口信息 [i].窗口类名 = 窗口类名)
如果真 (窗口_取窗口属性 (窗口信息 [i].窗口句柄, #GWL_STYLE ) = 窗口风格 窗口_取窗口属性 (窗口信息 [i].窗口句柄, #GWL_EXSTYLE ) = 窗口扩展风格)
如果真 (窗口宽度 = -1 窗口高度 = -1)
进程_结束 (窗口信息 [i].进程ID)
到循环尾 ()

位置和大小 = 窗口_取位置和大小 (窗口信息 [i].窗口句柄)
如果真 (位置和大小.宽度 = 窗口宽度 位置和大小.高度 = 窗口高度)
调试输出 (进程_结束 (窗口信息 [i].进程ID))


处理事件 ()
计次循环尾 ()


i支持库列表   支持库注释   
spec特殊功能支持库


作者: winxsj    时间: 2023-4-19 18:03
66666666666666
作者: pipicool    时间: 2023-4-19 19:26
学习一下
作者: 新梦想    时间: 2023-4-19 19:28
666666666666666
作者: xiaoniu1230    时间: 2023-4-19 20:35
感谢分享 支持开源 !
作者: 大今今    时间: 2023-4-19 20:35
看看...........
作者: 小牛咪咪    时间: 2023-4-19 21:13

作者: 龙傲天f    时间: 2023-4-20 00:24
感谢分享 支持开源 !
作者: 一指温柔    时间: 2023-4-20 09:04
感谢分享 支持开源 !
作者: wjswzj0    时间: 2023-4-20 09:53
感谢分享,很给力!~
作者: kyo9766    时间: 2023-4-20 10:05
直接贴代码 好评啊,感谢分享
作者: yamiedie    时间: 2023-4-20 14:33
感谢发布原创作品,精易因你更精彩!
作者: 396384183    时间: 2023-4-20 18:13
回复一下你就等于免费下载了
作者: 滑稽被我吃了    时间: 2023-4-20 21:22
感谢分享
作者: ZHuanR    时间: 2023-4-21 17:58
6666666666666666666666
作者: 依旧破晓    时间: 2023-4-21 19:30
感谢分享 支持开源
作者: 亿万    时间: 2023-4-21 21:54
        支持开源~!感谢分享
作者: 学习小米I    时间: 2023-5-7 17:19
  感谢分享!!~
作者: Tckya    时间: 2023-5-28 09:54
走过路过别错过
作者: aszxcv    时间: 2023-6-8 16:29
#在这里快速回复#https://github.com/snlie/WeChat-Hook
作者: czk2    时间: 2023-7-12 17:16
#在这里快速回复#感谢分享,很给力!~
作者: 窥伺    时间: 2023-8-19 10:22
        感谢发布原创作品,精易因你更精彩!
作者: 放飞梦想321    时间: 2024-1-13 21:51
感谢发布原创作品,精易因你更精彩!
作者: aa731118539    时间: 2024-1-26 15:24
牛逼啊正找这个呢




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4