windows - 如何使用 VBScript 强制重启 Windows 机器？

Question

我正在尝试寻找一种强制 Windows 重新启动的方法，但我遇到了问题。我试过了

<code>Set OpSysSet = GetObject("winmgmts:{authenticationlevel=Pkt," _
     & "(Shutdown)}").ExecQuery("select * from Win32_OperatingSystem where "_
     & "Primary=true")
for each OpSys in OpSysSet
    retVal = OpSys.Reboot()
next</code>

我也尝试过使用 shutdown -f -r 命令，在这两种情况下，我有时都得不到任何响应，如果我再次尝试，我会收到一条错误消息，提示“操作无法完成，因为系统正在关闭”，即使我离开它多久它都没有关闭，它仍然允许我启动新程序，并且执行 shutdown -a 会给出同样的错误。如何使用脚本强制 Windows 重新启动？

Answer 1

尝试替换:

retVal = OpSys.Reboot()

与:

retVal = OpSys.Win32Shutdown(6)