rundll32 user.exe,ExitWindows Завершение работы Windows
или скрипт
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
запихнуть в файл типа shut.vbs
а его - в шедулер
