VBScript Code to List POP3 Server State

You can use any of the VBScript programs below in ActiveXperts Network Monitor. Click here for an explanation about how to include scripts in ActiveXperts Network Monitor.

Example(s)

strComputer = "."
Set objWMIService = GetObject _
    ("winmgmts:{authenticationLevel=pktPrivacy}\\" _
        & strComputer & "\root\microsoftiisv2")

Set colItems = objWMIService.ExecQuery _
    ("Select * from IIsPop3Server")
 
For Each objItem in colItems
    Wscript.Echo "Name: " & objItem.Name
    For Each strSource in objItem.Pop3RoutingSources
        Wscript.Echo "Pop3 Routing Sources: " & strSource
    Next
    Wscript.Echo "Pop3 Service Version: " & _
        objItem.Pop3ServiceVersion
    Wscript.Echo "Server State: " & objItem.ServerState
Next