8

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 を強制的に再起動するにはどうすればよいですか?

4

5 に答える 5

10

交換してみてください：

retVal = OpSys.Reboot()

と：

retVal = OpSys.Win32Shutdown(6)
于 2008-10-09T19:32:47.070 に答える
4

これは VBScript を使用していますが、実際には、実行しようとしているのと同じコマンド ライン シャットダウンが呼び出されます。私はそれをテストしましたが、動作します。

Dim oShell 
Set oShell = CreateObject("WScript.Shell")

'restart, wait 5 seconds, force running apps to close
oShell.Run "%comspec% /c shutdown /r /t 5 /f", , TRUE

どのOSに対して実行していますか？このテストは XP に対するものでした。サーバーOSにシャットダウンコードが必要なのかな…

于 2008-10-09T19:23:31.987 に答える
3

Sysinternals now Microsoft の psShutdown コマンド ライン ユーティリティを試すこともできます。 http://technet.microsoft.com/en-us/sysinternals/bb897541.aspx

于 2008-10-10T03:45:59.193 に答える
2 
'*********************************************************

Option Explicit

Dim objShell

Set objShell = WScript.CreateObject("WScript.Shell")

objShell.Run "C:\WINDOWS\system32\shutdown.exe -r -t 0"

'*********************************************************

この小さなスクリプトは、0 秒後にローカル コンピューターを再起動します。

于 2011-06-08T02:29:16.953 に答える