VBS自动输入按键

2018-12-27  本文已影响0人  秦楚何

自动输入:

Dim wshshell
Set wshshell = WSCRIPT.createobject("wscript.shell")
wshshell.appactivate "魔兽世界"
while true
wscript.sleep 1000
WshShell.SendKeys "{1}"
WshShell.SendKeys "{2}"
wend

结束:
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "taskkill /im wscript.exe /f ",0 ,true

上一篇下一篇

猜你喜欢

热点阅读