| Recommended by Wim's BIOS... |
|
| Recommended by Wim's BIOS... |
|
Imports System
Imports System.Management
Imports System.Windows.Forms
Namespace WMISample
Public Class MyWMIQuery
Public Overloads Shared Function Main() As Integer
Try
Dim searcher As New ManagementObjectSearcher( _
"root\CIMV2", _
"SELECT * FROM Win32_SystemEnclosure")
For Each queryObj As ManagementObject in searcher.Get()
Console.WriteLine("-----------------------------------")
Console.WriteLine("Win32_SystemEnclosure instance")
Console.WriteLine("-----------------------------------")
Console.WriteLine("BreachDescription: {0}", queryObj("BreachDescription"))
Next
Catch err As ManagementException
MessageBox.Show("An error occurred while querying for WMI data: " & err.Message)
End Try
End Function
End Class
End Namespace
Return to General BIOS Questions
Users browsing this forum: No registered users and 0 guests
|
© 1996-2011 Wim Bervoets, Contact information | About us | Privacy policy | Terms of service | Disclaimer Associates: soupy, ajzchips, BiosMan, cp, Denniss, edwin, KachiWachi, KURIAKI, NickS, and Rainbow Copyright of all documents belonging to this site by Wim Bervoets 1996-2010. It is illegal to copy or redistribute the HTML pages in any way without the expressed written consent of the author. All BIOS Files and Utilities are copyrighted by their respective owners. |