关机程序

Question

如下为一个重新启动的程序名，保存为restart.vbs,将windows计划任务中选择此程序，可让机器重新启动，请高手帮我改一下，使之成为机器关闭的程序。strComputer = "Aveiny"
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate,(Shutdown)}!\\" & strComputer & "\root\cimv2")
Set colOperatingSystems = objWMIService.ExecQuery _
    ("Select * from Win32_OperatingSystem")
For Each objOperatingSystem in colOperatingSystems
    ObjOperatingSystem.Reboot()
Next

Answer 1

如此简单，没有人会么？顶下子
大家来帮忙啊。