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

Вниз

Сервисы.   Найти похожие ветки 

 
ilka ©   (2003-10-14 22:38) [0]

Доброго времени суток.Есть работающий сервис.
Если его запускать так:
WinExec("1.exe /install",SW_HIDE);
WinExec("net start "name"",SW_HIDE);

то почемуто не работает
ScH:=OpenSCManager(nil,nil,SC_MANAGER_CONNECT);
Sch2:=OpenService(Sch,"name",SERVICE_ALL_ACCESS);

пишет что сервис не существует
а если я ставлю сервис через
OpenSCManager(nil,nil,SC_MANAGER_CONNECT);
OpenService(Sch,"name",SERVICE_START);
if Sch2<>0 then
if not StartService(Sch2,0,p) then
ShowMessage(SysErrorMessage(GetLastError));

пишет что "The system cannot find the file specified".

Вопрос(ы):
есть ли способ (програмно)определить состояние сервиса если я запускаю его через WinExec
почему не работает StartService


 
Digitman ©   (2003-10-15 09:11) [1]

после программной регистрации сервиса проверь как минимум соотв.запись в реестре, которая д.б. быть создана при регистрации

например,

HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\MySvcName

ImagePath = Dev:\SvcDir\MySvcExeFile.exe

где Dev:\SvcDir\MySvcExeFile.exe должен отражать корректный существующий путь к исп.файлу сервиса



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

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

Наверх




Память: 0.46 MB
Время: 0.029 c
1-89346
denmin
2003-10-16 11:26
2003.10.27
Проблема с печатью с ListView.


1-89262
romeo
2003-10-14 15:31
2003.10.27
Object Inspector как в Delphi - своими руками.


6-89425
arous
2003-09-01 21:53
2003.10.27
Почтовый клиент


4-89630
Oxy
2003-08-23 21:43
2003.10.27
Как DDL-ке выгрузить себя саму?


7-89605
ossa
2003-08-12 13:46
2003.10.27
Как организовать(за программировать) дозвон по телефону(код,