复制代码 代码如下:
'定义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程序路径、帐名、密码
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}"
华山资源网 Design By www.eoogi.com
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
华山资源网 Design By www.eoogi.com
暂无评论...
更新日志
2024年09月20日
2024年09月20日
- [电影原声带]黎允文《天将雄师》[FLAC+CUE]
- 曝NS继任机型已进入量产阶段:已花了30亿日元
- 不是Switch2?曝《马里奥惊奇》NS捆绑包即将公开
- 暖心任天堂!网友Switch维修返还时贴纸被完好保留
- 《国语老歌 经典对唱情歌 2CD》[WAV/分轨][1.1GB]
- 《刀郎 翻唱精选华语专辑 披着羊皮的狼 》[WAV+CUE][430MB]
- 《真的田震 中国乐坛红极一时的歌者 精品集》[WAV+CUE][300MB]
- 群星.1995-新滚石九大天王之情歌大全【滚石】【WAV+CUE】
- 群星.1993-滚石九大天王十二出好戏·纵夏欢唱【滚石】【WAV+CUE】
- 群星.1993-滚石九大天王十二出好戏·贺岁齐唱【滚石】【WAV+CUE】
- 黑神话悟空上品虫校尉精魄获取方法一览|上品虫校尉精魄收集攻略
- 《指环王:夏尔的传说》推迟至2025年初发行
- 黑神话悟空上品蝎太子精魄获取方法一览|上品蝎太子精魄收集攻略
- 银霞.1977-《台北66电影原声带》台湾复刻版[WAV+CUE]
- 银霞.1980-《你那好冷的小手》台湾珍藏纪念版[WAV+CUE]