Нужно определить, запущена ли служба. И, если не запущена, то запустить ее. Как?

стопни и запускай, запущена - не стопнется, но и не беда

net stop lanmanserver >> c:\\ResetLog.txt
net start lanmanserver >> c:\\ResetLog.txt

12 ©   (15.04.09 12:29) [1]

попробуй узнать своим методом, запущена ли служба "Удаленный вызов процедур". Я надеюсь, мы тебя после этого долго не увидим :)

а зачем тогда останавливать? Что, если только пытаться стартануть?

QueryServiceStatusEx

2ИШ
Как ты меня любишь :)

pavel_guzhanov ©   (15.04.09 13:09) [3]
ну или так, я про смысл говорю
просто у меня есть один сервис, если глюкнет (не я писал, не я:)), то его надо остановить, минут 5-10 подождать, потом стартовать. Иначе работать отказывается. Я и написал job, где перед началом раб дня его останавливаю, не важно, как он себя чувствует, потом стартую..

> Игорь Шевченко ©   (15.04.09 13:16) [4]
>
> QueryServiceStatusEx


Спасибо. Пойду в справку, изучать :о)

> Спасибо. Пойду в справку, изучать

Не знаю как в предыдущих дельфях, но в 2009 последний параметр этой функции определен неправильно. Он должен иметь тип DWORD, а не PDWORD, поскольку он var. Можно переписать ее для себя, либо использовать приведение типа при передаче параметра.

Удалено модератором