Dim WshShell,Path,i Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.SendKeys "{F5}" ---------------------------------------------------- 電腦的自動重啟
set WshShell = CreateObject("WScript.Shell") WshShell.SendKeys "^{ESC}u" WshShell.SendKeys "R" ---------------------------------------------------- 啟動任務(wù)管理器
set WshShell = CreateObject("WScript.Shell") WshShell.SendKeys "^+{ESC}" ----------------------------------------------------