Вниз
Скачать: CL | DM;

У меня есть служба. Вней я отслежываю время!   Найти похожие ветки 

 
arhanegl_isa   (2006-03-15 08:46) [0]

У меня имеется сервис, который в определенное время должен запускать *.Bat файл, но почемуто выходит ошибка через несколько секунд после его запуска!
Вот текст обработки времени:
try
 while (Status.dwCurrentState <> SERVICE_STOP_PENDING) do begin
    if s="" then begin assignfile(f,"date.txt");
          if IOresult=0 then reset(f);
            read(f,s); closefile(f);end else
      if timetostr(time)=s then begin
shellexecute(handle,"open","becup.bat",nil,nil,sw_normal);
      ErrorLog("ServiceThread - Привет все нормально!");
      end;
     sleep(1000);
        end;
   result:= 0;
 finally
   Status.dwCurrentState:= SERVICE_STOP;
 end;


 
Сергей М. ©   (2006-03-15 10:15) [1]


> выходит ошибка через несколько секунд после его запуска


Запуска чего ? Сервиса или bat-файла ?
Какая ошибка ?


 
arhanegl_isa   (2006-03-15 10:40) [2]

При запуске сервиса apiserv.exe /Install.
Он инсталируется и запускается. В списке служб присутствует, но через нескольео секунд пишет вызвана ошибка извините за неудобства


 
Reindeer Moss Eater ©   (2006-03-15 10:42) [3]

но через нескольео секунд пишет вызвана ошибка

Видимо потому, что никто не нажал Ок в окне сообщения о том, что служба инсталирована.

ps: /silent


 
arhanegl_isa   (2006-03-15 10:45) [4]

В том то и дело что сообщение об успешной инсталяции не выводится а процесс нормально функционирует


 
Reindeer Moss Eater ©   (2006-03-15 10:48) [5]

Я и не говорил, что оно выводится.
Я говорил, что на кнопку никто не жмет.
Само сообщение может быть не видно на текущем десктопе.


 
clickmaker ©   (2006-03-15 11:03) [6]


> shellexecute(handle,"open","becup.bat",nil,nil,sw_normal);

сервис интерактивный, я так понимаю?
что за handle? и почему через shellexecute, а не CreateProcess?


 
Polevi ©   (2006-03-15 16:39) [7]

>отслежываю
ух ты


 
Leonid Troyanovsky ©   (2006-03-15 17:35) [8]


> arhanegl_isa   (15.03.06 08:46)  

> У меня имеется сервис, который в определенное время должен
> запускать *.Bat файл, но почемуто выходит ошибка через несколько


 У тебя неправильный сервис.
 Правильный - это Task Scheduler  (или просто Schedule)

--
Regards, LVT.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.082 c
15-1142263338
oldman
2006-03-13 18:22
2006.04.02
Вопросик ИШ (в тему...)


1-1141243953
g-l-u-k
2006-03-01 23:12
2006.04.02
Криптование процедуры в Delphi


1-1141243262
Конопелька
2006-03-01 23:01
2006.04.02
Runtime Err in DLL Library Module on Terminate !


2-1142794745
_Sa_nya
2006-03-19 21:59
2006.04.02
WIN API


15-1142247265
Сатир
2006-03-13 13:54
2006.04.02
Обработка события дочернего компонента




   Наверх