List Cluster Resource Group Information
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)
On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\mscluster") Set colItems = objWMIService.ExecQuery("Select * from MSCluster_ResourceGroup") For Each objItem in colItems Wscript.Echo "Auto-failback type: " & objItem.AutoFailbackType Wscript.Echo "Caption: " & objItem.Caption Wscript.Echo "Characteristics: " & objItem.Characteristics Wscript.Echo "Description: " & objItem.Description Wscript.Echo "Failback window end: " & objItem.FailbackWindowEnd Wscript.Echo "Failback window start: " & objItem.FailbackWindowStart Wscript.Echo "Failover period: " & objItem.FailoverPeriod Wscript.Echo "Failover threshold: " & objItem.FailoverThreshold Wscript.Echo "Flags: " & objItem.Flags Wscript.Echo "Installation date: " & objItem.InstallDate Wscript.Echo "Load balance state: " & objItem.LoadBalState Wscript.Echo "Name: " & objItem.Name Wscript.Echo "Persistent state: " & objItem.PersistentState Wscript.Echo "State: " & objItem.State Wscript.Echo "Status: " & objItem.Status Wscript.Echo Next