Windowsをシャットダウンする

vbs

Set ws = GetObject("winmgmts:{(Shutdown)}//./root/cimv2").ExecQuery("select * from Win32_OperatingSystem where Primary=true")
for each wmi in ws
wmi.Shutdown()
next