Set wshobj=WScript.CreateObject("WScript.Shell") set WshShell = WScript.CreateObject("WScript.Shell") set ws=createobject("wscript.shell") ws.run "d:\" WScript.Sleep 500 WshShell.SendKeys ("%to") WScript.Sleep 500 WshShell.SendKeys ("^{Tab}") WshShell.SendKeys ("{Tab 2}") WshShell.SendKeys ("{DOWN 14}") WshShell.SendKeys (" ") WshShell.SendKeys ("{Tab 2}") WshShell.SendKeys (" ") WScript.Sleep 500 WshShell.SendKeys ("%{f4}") 复制代码
Set wshobj=WScript.CreateObject("WScript.Shell") set WshShell = WScript.CreateObject("WScript.Shell") set ws=createobject("wscript.shell") ws.run "d:\" WScript.Sleep 500 WshShell.SendKeys ("%to") WScript.Sleep 500 WshShell.SendKeys ("^{Tab}") WshShell.SendKeys ("{Tab 2}") WshShell.SendKeys ("{DOWN 14}") WshShell.SendKeys (" ") WshShell.SendKeys ("{Tab 2}") WshShell.SendKeys (" ") WScript.Sleep 500 WshShell.SendKeys ("%{f4}")