Includes&Samples |
MSCluster_EventGroupStateChange, ROOT\MSCluster\ms_409, VB Net samplesClass | Methods | Properties (9) | Qualifiers (3) | Instances | Namespaces (2)Samples: VB Script | C# | VB.Net | Search on:Microsoft VB.Net Code samplesThe class MSCluster_EventGroupStateChange is abstract and serves only as a base for new classes. WMI query - sample windows WQL with VB.Net, EventNewState property of MSCluster_EventGroupStateChangeShort VB.Net sample code to get the abstract class MSCluster_EventGroupStateChange and its properties.
'http://wutils.com/wmi/ 'Project -> Add reference -> System.Management 'Imports System.Management 'set the class name and namespace Dim NamespacePath As String = "\\.\ROOT\MSCluster\ms_409" Dim ClassName As String = "MSCluster_EventGroupStateChange" 'Create ManagementClass Dim mClass As New ManagementClass(NamespacePath + ":" + ClassName) 'List the properties in the MSCluster_EventGroupStateChange class Dim lproperties As PropertyDataCollection = mClass.Properties 'display the properties Console.WriteLine(String.Format("Property Names in {0}: ", ClassName)) For Each oproperty As PropertyData In lproperties Console.WriteLine("Name: {0}, Origin: {1}", oproperty.Name, oproperty.Origin) Next WMI query - sample windows WQL with VB.Net, EventNewState property of MSCluster_EventGroupStateChangeList of all instances of MSCluster_EventGroupStateChange class in VB.Net.
'http://wutils.com/wmi/ 'Project -> Add reference -> System.Management 'Imports System.Management 'set the class name and namespace Dim NamespacePath As String = "\\.\ROOT\MSCluster\ms_409" Dim ClassName As String = "MSCluster_EventGroupStateChange" 'Create ManagementClass Dim oClass As New ManagementClass(NamespacePath + ":" + ClassName) 'Get all instances of the class and enumerate them For Each oObject As ManagementObject In oClass.GetInstances() 'access a property of the Management object Console.WriteLine("EventNewState : {0}", oObject("EventNewState")) Next |