Не знаю о какой ОС идёт речь в вопросе, но у меня под ХР работает такой вот vbscript
:
----------------------------cut here------------------------------------------
dim OpSysSet, obj
Set OpSysSet = GetObject("winmgmts:{impersonationLevel=impersonate," & _
"(Shutdown)}//./root/cimv2"
.ExecQuery _
("SELECT * FROM Win32_OperatingSystem" &_
" WHERE Primary=true"
For Each obj In OpSysSet
obj.Win32Shutdown(8)
Next
--------------------------------end of cut-------------------------------------
сохраняешь под именем ***.vbs и устанавливаешь запуск из планировщика. Всё работает. Я таким макаром гашу машину после записи фильмов с компа на видео (перед уходом из офиса ставлю на запись и ухожу -- утром всё стоит выключенное).
C наилучшими...,
CyberCop.