WUtils.com

CIM_AlarmDevice, ROOT\cimv2, VB Net samples

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

VB.Net Code samples

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

WMI query - sample windows WQL with VB.Net, AudibleAlarm property of CIM_AlarmDevice

Short VB.Net sample code to get the abstract class CIM_AlarmDevice and its properties.
See it in another language: VBScript, C#.
…
	'http://wutils.com/wmi/
	
	'Project -> Add reference -> System.Management
	'Imports System.Management
	
	'set the class name and namespace
	Dim NamespacePath As String = "\\.\ROOT\cimv2"
	Dim ClassName As String = "CIM_AlarmDevice"
	
	'Create ManagementClass
	Dim mClass As New ManagementClass(NamespacePath + ":" + ClassName)
	
	'List the properties in the CIM_AlarmDevice 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, AudibleAlarm property of CIM_AlarmDevice

List of all instances of CIM_AlarmDevice class in VB.Net.
See it in another language: VBScript, C#.
…
	'http://wutils.com/wmi/
	
	'Project -> Add reference -> System.Management
	'Imports System.Management
	
	'set the class name and namespace
	Dim NamespacePath As String = "\\.\ROOT\cimv2"
	Dim ClassName As String = "CIM_AlarmDevice"
	
	'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("AudibleAlarm : {0}", oObject("AudibleAlarm"))
	Next
comments powered by Disqus
WUtils.com