get the status of a windows server service using vb.net

[rjszum]

THis is my vb.net code

    Public Class TS_Service
 
        ' Is the service running?
        ' Returns true if we need to start the service
        Public Function CheckService(ByVal PC As String) As Boolean
            Dim obj As ManagementObject
            obj = New ManagementObject("\\" & PC & "\root\cimv2:Win32_Service.Name='SBAMSvc'")
            '     If Not IsNothing(obj) Then
            If obj("State").ToString = "Running" Then
                Return False
                'End If
            End If
            Return True
        End Function

I am receiving an error,
Class 'myprojectname.managementobject' cannot be indexed because it has no default property

[PsychoCoder]

Try changing your Dim statement to look like this:

Dim obj As New ManagementObject("\\" & PC & "\root\cimv2:Win32_Service.Name='SBAMSvc'")

[rjszum]

Unfortunatly, this did not fix issue. same error

[rjszum]

I simplified my code but still same error.

Private Sub listservices3()
        '  Dim obj As ManagementObject
 
        Dim obj As New ManagementObject("\\server01\root\cimv2:Win32_Service.Name='tomcat6SPI'")
      obj("State").ToString = "Running" Then
        If obj("State").ToString = "Running" Then
            Me.Label2.ForeColor = Color.AliceBlue
        End If
 
    End Sub

[Rabbit]

You need to declare a default property in the ManagementObject class. If you cannot, as I suspect it is a class where you don't have access to the source, then you must specify which property you are setting.

[rjszum]

I am unsure how to do this, but it seems like this is probably the issue. I am trying to get the Status of the service. the state which would be "Running", "Stopping" or blank(meaning Stopped)

[PsychoCoder]

I guess you could contact the original writer of that code here and ask if they got the same error and if so how they resolved it.

[Rabbit]

Well, since you changed the way you are instantiating your object, the issue may be that you didn't escape your forward slashes.