Текущий архив: 2003.03.31;
Скачать: CL | DM;
Вниз
Как перегрузить комп в XP. ExitWindowsEx(EWX_REBOOT or EWX_FORCE, Найти похожие ветки
← →
Manix © (2003-02-02 14:18) [0]ExitWindowsEx(EWX_REBOOT or EWX_FORCE, 0); не действует
что делать ?
← →
Song © (2003-02-02 14:31) [1]надо права получить (AdjustTokenPriviligies)
← →
Acidy © (2003-02-02 15:47) [2]program NTShutdown;uses windows;var hToken: THandle; tkp: TTokenPrivileges; ReturnLength: Cardinal;begin if OpenProcessToken(GetCurrentProcess(), TOKEN_ADJUST_PRIVILEGES orTOKEN_QUERY, hToken) then begin LookupPrivilegeValue(nil, "SeShutdownPrivilege",tkp.Privileges[0].Luid); tkp.PrivilegeCount:=1; // one privelege to set tkp.Privileges[0].Attributes:=SE_PRIVILEGE_ENABLED; if AdjustTokenPrivileges(hToken, False, tkp, 0, nil, ReturnLength)then ExitWindowsEx(EWX_SHUTDOWN or EWX_POWEROFF, 0); end;end.
Страницы: 1 вся ветка
Текущий архив: 2003.03.31;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.012 c
