保存为xxx.vbs文件,双击就可以运行了
Set WS=CreateObject("WScript.Shell")
WS.Run """D:\Program Files (x86)\Tencent\QQLite\Bin\QQScLauncher.exe""",0
WScript.Sleep 3000
WS.AppActivate "QQ"
WS.SendKeys "12345{TAB}123456{ENTER}"
- Prev: PHP 正则取图片地址
- Next: JavaScript 倒计时
保存为xxx.vbs文件,双击就可以运行了
Set WS=CreateObject("WScript.Shell")
WS.Run """D:\Program Files (x86)\Tencent\QQLite\Bin\QQScLauncher.exe""",0
WScript.Sleep 3000
WS.AppActivate "QQ"
WS.SendKeys "12345{TAB}123456{ENTER}"