如何实现QQ多帐号自动登录批处理脚本

这篇文章将为大家详细讲解有关如何实现QQ多帐号自动登录批处理脚本,小编觉得挺实用的,因此分享给大家做个参考,希望大家阅读完这篇文章后可以有所收获。

代码如下:

'定义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}"

关于“如何实现QQ多帐号自动登录批处理脚本”这篇文章就分享到这里了,希望以上内容可以对大家有一定的帮助,使各位可以学到更多知识,如果觉得文章不错,请把它分享出去让更多的人看到。