源码网商城,靠谱的源码在线交易网站 我的订单 购物车 帮助

源码网商城

QQ多帐号自动登录批处理脚本

  • 时间:2020-12-06 08:12 编辑: 来源: 阅读:
  • 扫一扫,手机访问
摘要:QQ多帐号自动登录批处理脚本
[u]复制代码[/u] 代码如下:
'定义QQ程序路径、帐名、密码 Dim Program1,a,b Program1= "C:\Program Files\Tencent\QQ\Bin\QQ.exe" Set WshShell=createobject("wscript.shell") '运行QQ主程序 Set oExec=WshShell.Exec(Program1) WScript.Sleep 1000 '激活QQ窗口 WshShell.AppActivate "QQ2010" wshShell.SendKeys "+{TAB}" '输入帐号 a="QQ帐号" WshShell.SendKeys a WScript.Sleep 200 WshShell.SendKeys "{TAB}" '输入密码 b="你的密码" WshShell.SendKeys b WScript.Sleep 200 WshShell.SendKeys "{ENTER}"
  • 全部评论(0)
联系客服
客服电话:
400-000-3129
微信版

扫一扫进微信版
返回顶部