Dim WshShell,Path,i Set WshShell = WScript.CreateObject("WScript.Shell") do while trueWshShell.SendKeys "%" WshShell.SendKeys "%" wscript.sleep 30000loop
代码如上 死循环没30秒执行一次按键
建议下载个按键精灵🧚♀️
点我简介看下,有资源的