Tjekke om service kører

har du husket at tilføje en Reference til System.ServiceProcess i dit projekt.
hvis ikke gøres det under "Website->Add Reference->System.ServiceProcess"

og her lidt ex. kode til hvordan den kan bruges:

Dim services() As System.ServiceProcess.ServiceController

Dim i As Integer

services = System.ServiceProcess.ServiceController.GetServices()

For i = 0 To services.Length - 1
  If services(i).ServiceName = "Wibble" Then
    If services(i).Status = ServiceControllerStatus.Stopped Then
      services(i).Start()
    End If
  End If
Next

...kode fundet på nettet - så den er utestet ;-)

nej havde ikke lavet en add reference. det manglede, men koden du fandt fik jeg ikke til at fungere men fandt tilgængel dette, og det virker smukt


    Function CheckIfServiceIsRunning(ByVal serviceName As String) As Boolean

        Dim mySC As ServiceProcess.ServiceController
        mySC = New ServiceProcess.ServiceController(serviceName)
        If mySC.Status = ServiceProcess.ServiceControllerStatus.Stopped Then

            ' Service isn't running
            Return False
        Else
            If mySC.Status = ServiceProcess.ServiceControllerStatus.Running Then
                ' Service already running
                Return True
            End If
        End If

    End Function


så smid du bare et svar

super - glad for at du fik det til at køre...