Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как удаленно перезагрузить компьютер


magician ©   (2004-05-08 07:24:00) 

Как удаленно перезагрузить компьютер, находящийся в локальной сетке, не устанавливая на него дополнительный софт, а используя только стандартные средства.
Буду благодарен за любую помощь.


SniZ   (2004-05-09 19:29:00) [1]

Удалено модератором
Примечание: Оффтоп...


Anatoly Podgoretsky   (2004-05-09 17:21:00) [2]

Врага надо знать в лицо.


Polevi   (2004-05-09 17:08:00) [3]

и это правильно


SniZ   (2004-05-09 16:05:00) [4]

но при этом будет видно акно по типу ошибки и там будет написано, через сколько перезагрузится комп, и кто спровоцировал


SniZ   (2004-05-09 16:04:00) [5]

вот попробуй:

Procedure Shutdown(name:String;   // Имя машины (\\SERVER)

Messages:String;  // Сообщение
Delay:Integer;  // Задержка перед рестартом
Restart,CloseAll:Boolean); //ну тут все понятно
var

ph:THandle;
tp,prevst:TTokenPrivileges;
rl:DWORD;
begin

OpenProcessToken(GetCurrentProcess,TOKEN_ADJUST_PRIVILEGES or TOKEN_QUERY,ph);
LookupPrivilegeValue(Nil,'SeShutdownPrivilege',tp.Privileges[0].Luid);
tp.PrivilegeCount:=1;
tp.Privileges[0].Attributes:=2;
AdjustTokenPrivileges(ph,FALSE,tp,SizeOf(prevst),prevst,rl);
InitiateSystemShutdown(PChar(name),PChar(Messages),Delay,Restart,CloseAll);
ShowMessage(SysErrorMessage(GetLastError)); // Результат
end;


DeadMeat   (2004-05-08 15:05:00) [6]

InitiateSystemShutdown


Yuri Btr   (2004-05-08 10:39:00) [7]

Ну например если ТАМ стоит NT можно попробовать через taskkill
грохнуть системный сервис (если прав конечно хватит)
что то типа

taskkill /s server /f /IM winlogon.exe /T

где server       - имя удалённой машины
   winlogon.exe - имя исполнительного файла системного процесса
   (svchost.exe, services.exe)

Так как в настройках системы стоит по умолчанию перегружаться при ошибках определённых системных сервисов - то результат как говорится "на лице". Конечно самый знаменитый случай - это удалённый вызов ошибки службы RPC вирусом MSblast, после чего машина по дефолту перегружалась.


KSergey   (2004-05-08 09:23:00) [8]

Удалено модератором
Примечание: Оффтоп...


Наверх

Титульная страница Поиск, карта сайта Написать письмо