20分 求一个批处理 坐等!

来源：百度知道 编辑：UC知道 时间：2024/06/05 16:11:51
执行后 可自动在当前光标处输入字符(用于游戏,QQ 登陆 )
要是这个功能难以实现。也可一给我推荐一个可以实现这功能软件

VBS可以模拟键盘输入 写好了保存为.vbs后缀的运行
Set objShell = CreateObject("Wscript.Shell")
strCommandLine = "ttpsetup.exe" '启动安装程序
objShell.Run(strCommandLine)
set WshShell = CreateObject("WScript.Shell")
WScript.Sleep 3000 '延时3秒
WshShell.SendKeys "s" '模拟按下 S 键开始安装
WScript.Sleep 300 '延时0.3秒
WshShell.SendKeys "a" '模拟按下 A 键同意协议
WScript.Sleep 300
WshShell.SendKeys "{ENTER}" '模拟按下回车键执行下一步
WScript.Sleep 300
WshShell.SendKeys "{ENTER}" '模拟按下回车键执行下一步
WScript.Sleep 300
WshShell.SendKeys "{ENTER}" '模拟按下回车键执行下一步
WScript.Sleep 2000
WshShell.SendKeys "{TAB}" '模拟按下 Tab 键选择安装项目
WScript.Sleep 300
WshShell.SendKeys "{TAB}"
WScript.Sleep 300
WshShell.SendKeys " " '模拟按下空格键去除安装百度超级搜霸一行前的√号
WScript.