Stop a Windows Service

Stop a Windows service.

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"

Dim success As Long
success = service.Stop()
If (success <> 1) Then
    MsgBox "Failed to stop service."
    Text1.Text = Text1.Text & service.LastErrorText & vbCrLf
    Exit Sub
End If

MsgBox "Windows Service Stopped!"