Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.11.25;
Скачать: CL | DM;

Вниз

Удаленнй сервис   Найти похожие ветки 

 
VIB   (2002-09-28 15:51) [0]

Если кто знает подскажите.
Как отключить (програмно) сервис другого сервера.
Например командой NT net stop <Имя сервиса>


 
ZZ ©   (2002-09-28 16:29) [1]

OpenSCManager -> OpenService -> SetServiceStatus


 
VIB   (2002-09-28 16:43) [2]

Если Вас не затруднит объяснить поподробнее.


 
ZZ ©   (2002-09-28 16:50) [3]

Если Вас не затруднит объяснить поподробнее.
или по русски - давай код :)

uses WinSvc;
var
h... : THandle;
SS:SERVICE_STATUS;

hSCM:=OpenSCManager("\\SUPERSERVER",nil,SC_MANAGER_ALL_ACCESS);
hSrv:=OpenService(hSCM,"<Имя сервиса>",SERVICE_ALL_ACCESS);
ControlService(hSrv,SERVICE_CONTROL_STOP,SS);

Примерно так.. Не проверял. (SetServiceStatus - это не то :))



 
VIB   (2002-09-28 17:11) [4]

Спасибо за помощь.
Сервис останавливается.
Если можете напишите как запустить опять.(Пограмно)


 
ZZ ©   (2002-09-28 17:32) [5]

Вместо ControlService StartService(hSrv,0,nil);


 
VIB   (2002-09-28 17:49) [6]

Спасибо за помощь. Все заработало.



Страницы: 1 вся ветка

Текущий архив: 2002.11.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.014 c
1-82757
vitnt
2002-11-15 13:15
2002.11.25
StrToDateTime


14-82916
Svetlana
2002-11-04 22:17
2002.11.25
Как перекинуть исходник и форму из Delphi 6 в Delphi 5


3-82586
Maloi
2002-11-07 22:25
2002.11.25
Помогите! Как отловить ID только что добавленной записи?


3-82652
Dbrf
2002-11-06 13:18
2002.11.25
Фильтрация данных


1-82785
Extr
2002-11-13 14:43
2002.11.25
RichEdit