Главная страница
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.031 c
14-89479
mudilo
2003-10-07 07:45
2003.10.27
Help Help very many BUGS


8-89403
Intell
2003-05-02 14:56
2003.10.27
Запись в TMediaPlayer.


14-89514
Alexey Lipatov
2003-10-09 22:44
2003.10.27
Who is mr. Guru


3-89108
AndDem
2003-10-08 11:47
2003.10.27
TADOStoredProc и возвращаемые значения


1-89315
p0tia
2003-10-16 18:21
2003.10.27
Как правильно написать данный код?