MSCluster_EventGroupStateChange, ROOT\MSCluster\ms_409, VBScript samples

Class | Methods | Properties (9) | Qualifiers (3) | Instances | Namespaces (2)
Samples: VB Script | C# | VB.Net | Search on:Microsoft

VBScript Code samples

The class MSCluster_EventGroupStateChange is abstract and serves only as a base for new classes.

Get a Class as object

Short VB Script code to get the abstract class MSCluster_EventGroupStateChange.
See in another language: C#, VB.Net.
	'https://wutils.com/wmi/
	Dim wmiClass, oProperty
	Set wmiClass = GetObject( _
	 "WINMGMTS:\\.\ROOT\MSCluster\ms_409:" + _
	 "MSCluster_EventGroupStateChange")
	
	'get some class property 
	Wscript.Echo wmiClass.properties_("EventNewState").Origin 'or other property name, see properties
	
	'Check if the class is singleton
	Wscript.Echo wmiClass.Path_.IsSingleton
	
	'Get number of methods in the class
	Wscript.Echo wmiClass.Methods_.Count
	
	'List class properties
	For Each oProperty In wmiClass.properties_
		'get property name and origin. Property value in the class is null, of course.
		Wscript.Echo oProperty.Name, oProperty.Origin, oProperty.Value
	Next 
	
	

InstancesOf

List of all instances, wmi class MSCluster_EventGroupStateChange.
	'https://wutils.com/wmi/
	Dim oWMI, Instances, Instance
	
	'Get base WMI object, "." means computer name (local)
	Set oWMI = GetObject("WINMGMTS:\\.\ROOT\MSCluster\ms_409")
	
	'Get instances of MSCluster_EventGroupStateChange - all instances of this class and derived classes 
	Set Instances = oWMI.InstancesOf("MSCluster_EventGroupStateChange")
	
	
	'Enumerate instances  
	For Each Instance In Instances 
	  'Do something with the instance
	  Wscript.Echo Instance.EventNewState 'or other property name
	Next 'Instance
	
comments powered by Disqus
WUtils.com