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

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

Как отключить сервис (service) [D6, WinXP]


Eksell ©   (2006-04-06 15:11:00) 

Всем привет! У меня такой вопрос : Как можно в Windows XP отключить какой-нибудь сервис (Service), например messenger. Как приостанавливать и запускать снова я знаю, а вот именно отключить пока нет. Пожалуйста помогите кто знает как это делается. Спасибо заранее!


kami   (2006-04-07 21:54:00) [1]

ChangeServiceConfig с dwStartType=SERVICE_DISABLED

http://www.kladovka.net.ru/index.cgi?pid=list&rid=289


Tirael   (2006-04-07 01:31:00) [2]

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


Leonid Troyanovsky   (2006-04-06 22:22:00) [3]


> Eksell   (06.04.06 20:26) [4]

> Да, забыл, если не трудно дайте исходничек пожалуйста.


http://rsdn.ru/?article/baseserv/svcadmin-1.xml& etc

--
Regards, LVT.


Eksell   (2006-04-06 20:26:00) [4]

Да, забыл, если не трудно дайте исходничек пожалуйста.


Eksell   (2006-04-06 20:12:00) [5]

> что значит "отключить" поясни.
> возможно ControlService + SERVICE_CONTROL_STOP?

Ну например чтоб остановить какой-нибудь сервис нужно зделать так :

procedure StopService(ServiceName: String);
var
 schService, schSCManager : DWORD;
 ss : _SERVICE_STATUS;
begin
 schSCManager := OpenSCManager(nil, nil, SC_MANAGER_ALL_ACCESS);
 if schSCManager = 0 then RaiseLastWin32Error;
 try
   schService := OpenService(schSCManager, PChar(ServiceName), SERVICE_ALL_ACCESS);
   if schService = 0 then RaiseLastWin32Error;
   try
     if not ControlService(schService, SERVICE_CONTROL_STOP, ss) then RaiseLastWin32Error;
   finally
     CloseServiceHandle(schService);
   end;
 finally
   CloseServiceHandle(schSCManager);
 end;
end;

А как полностью отключить сервис?


Desdechado   (2006-04-06 16:31:00) [6]

net stop имя_сервиса


Eraser   (2006-04-06 15:14:00) [7]


> Eksell   (06.04.06 15:11)


> Как приостанавливать и запускать снова я знаю, а вот именно
> отключить пока нет.

что значит "отключить" поясни.
возможно ControlService + SERVICE_CONTROL_STOP?


Наверх

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