打开QQ并且让它自己输入用户名和密码的vbs脚本
时间:2021-09-11 08:09:37|栏目:VBS|点击: 次
可以定时打开QQ并且让它自己输入用户名和密码的脚本
dim program
program="c:\Program Files\Tencent\qq\QQ.exe" '你的qq路径
set Wshell=CreateObject("Wscript.Shell")
set oexec=Wshell.Exec(program)
wscript.Sleep 2000
Wshell.AppActivate "QQTang"
Wshell.SendKeys "+{TAB}"
Wshell.SendKeys "QQ号码"
wscript.Sleep 1000
Wshell.SendKeys "{TAB}"
Wshell.SendKeys "QQ密码"
wscript.Sleep 1000
Wshell.SendKeys "{ENTER}"
复制代码 代码如下:
dim program
program="c:\Program Files\Tencent\qq\QQ.exe" '你的qq路径
set Wshell=CreateObject("Wscript.Shell")
set oexec=Wshell.Exec(program)
wscript.Sleep 2000
Wshell.AppActivate "QQTang"
Wshell.SendKeys "+{TAB}"
Wshell.SendKeys "QQ号码"
wscript.Sleep 1000
Wshell.SendKeys "{TAB}"
Wshell.SendKeys "QQ密码"
wscript.Sleep 1000
Wshell.SendKeys "{ENTER}"
栏 目:VBS
本文地址:http://www.codeinn.net/misctech/174222.html