Declare Function QueryServiceStatus Lib "advapi32.dll" ( _ ByVal hService As Long, _ lpServiceStatus As SERVICE_STATUS) As Long
В случае успеха, функция возвращает ненулевое значение. В случае ошибки функция возвращает 0. Для получения более подробной информации об ошибке используйте функцию GetLastError. Вот некоторые коды ошибок
ERROR_ACCESS_DENIED | Указанный дескриптор не имеет права доступа. |
ERROR_INVALID_HANDLE | Указанный дескриптор не существует. |
смотри пример в ServicesStopPauseStart.zip