Win2000 Server Shutdown

← →
KDS © (2002-11-04 17:14) [0]

Как программно завершать работу сервера на винде 2000?
Включается он по таймеру из биоса. А вот как гасить его
без участия человека?
Это чтобы он сам утром включался и вечером по расписаню выключался

← →
Marcus (2002-11-04 17:37) [1]

Пишешь маленькую утилитку, где вызываешь ExitWindowsEx(EWX_POWEROFF or EWX_FORCE, 0), не забыв перед этим взять привилегии на вырубание компьютера:
var
hToken: HANDLE;
tkp: TOKEN_PRIVILEGES;
...
OpenProcessToken(GetCurrentProcess, TOKEN_ADJUST_PRIVILEGES or TOKEN_QUERY, hToken);
LookupPrivilegeValue(nil, SE_SHUTDOWN_NAME, tkp.Privileges[0].Luid);
tkp.PrivilegeCount := 1;
tkp.Privileges[0].Attributes := SE_PRIVILEGE_ENABLED;
AdjustTokenPrivileges(hToken, FALSE, tkp, 0, nil, 0);

Затем идешь в Стандартные->Служебные->Назначенные задания, создаешь задание, куда включаешь ежевечернее выполнение твоей проги и со спокойной душой идешь пить пиво...

Круто! Спасобо, Marcus. (_)]

Win2000 Server Shutdown Найти похожие ветки