如何使用VBScript强制重启Windows框？

Question

我正试图找到一种方法来强制Windows重新启动,我遇到了问题.我试过了

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

我也试过使用这个shutdown -f -r命令,在这两种情况下我有时都没有得到任何响应,如果我再试一次,我会收到一条错误,说"行动无法完成,因为系统正在关闭",即使我留下了多久它没有关闭,它仍然允许我启动新程序,并做一个shutdown -a给出相同的错误.如何使用脚本强制Windows重新启动？

Answer 1

尝试更换:

retVal = OpSys.Reboot()

附:

retVal = OpSys.Win32Shutdown(6)