Determine if Service Already Installed

Determine if a Windows service is already installed.

Note:This software is available as a pre-release.

Download the Chilkat Service ActiveX here: ChilkatService.zip
Unzip and register with regsvr32.

Dim service As New ChilkatService

service.ServiceName = "MyService"

'  returns -1 for failure (inability to check)
'  returns 1 if already installed.
'  returns 0 if not yet installed.
Dim retval As Long
retval = service.IsInstalled()
If (retval < 0) Then
    MsgBox "Failed to query service control manager"
Else
    If (retval = 1) Then
        MsgBox "Service is already installed"
    Else
        MsgBox "Service is not installed"
    End If

End If