Главная страница
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.021 c
1-89240
Илия Малевич
2003-10-14 23:09
2003.10.27
---|Ветка была без названия|---


3-89094
botsman
2003-10-08 10:20
2003.10.27
InterBase соединение


1-89337
Boris69
2003-10-16 09:57
2003.10.27
Как сделать многоуровневую шапку таблицы в StringGride???


4-89637
Rel_
2003-08-21 16:19
2003.10.27
Глюк при перерисовке


3-89122
rosl
2003-10-08 03:43
2003.10.27
перенос данных