シャットダウンダイアログを表示する / ログオフ・リブート・シャットダウン / VBScript

※ Windows10 でも動作確認しました

Set objShell = CreateObject("Shell.Application")
objShell.ShutdownWindows()

▼ 右クリックから保存して下さい。
ブラウザでダウンロード
※ クリックすると、新しいウインドウで『プレーンテキスト(text/plain)』として開きます
ログオフ
シャットダウン
リブート
パワーオフ(こちらの環境では未確認)

logoff.vbs

Set colOperatingSystems = _
GetObject("winmgmts:{(Shutdown)}").ExecQuery( _
"Select * from Win32_OperatingSystem") 
For Each objOperatingSystem in colOperatingSystems 
	ObjOperatingSystem.Win32Shutdown(0) 
Next

関連するスクリプト

ログオフ・リブート・シャットダウン

VBS + Shell

VBScript を『管理者として実行する』には、Shell の runas ( 右クリックメニューの実行と同等 ) で実現します / Jscript も追加

VBScript : キーストロークをウインドウに送信して、キー操作をした事にする( 例 : リモート デスクトップ接続ダイアログ )

エクスプローラのフォルダから管理者権限でコマンドプロンプトを開く / 右クリックから『送る』で開く

管理者権限でコマンドプロンプトを開く VBScript をエクスプローラの右クリックで開く( そのフォルダで開く )方法

Windows のファイルの『更新日付』のみ VBScript + Shell.Application で変更

VBScript : プロパティダイアログを表示する

VBScript : ファイルやフォルダを右クリックすると表示されるコマンド文字列の一覧を取得して、それを使ってコマンドを実行する

VBScript : Shell.Application で開くWindows ツール

Windows7 : VBScriptで、コントロールパネル内のエントリの実行

シャットダウンダイアログを開くスクリプトと、シャットダウンするスクリプト