此文章为本站(Lob.cn)乐博网原创,可以自由转载和传播,但希望能保留本站的作者和信息来源,谢谢!如果大家对此问题或者关于VB.Net调用WMI实现系统管理的话题感兴趣,就一起加入讨论把他做得更完善吧!
VB.Net调用WMI可以实现系统管理和系统信息查询等。WMI全称为Windows Management Instrumentation,利用WMI我们可以实现很多系统管理的功能,msdn在.Net Framework类库中对此描述比较简单(因为早期WMI相关专题有所较详尽描述,故类库中未再详细解说与演示) 乐博网将发布一系列相关文章及实例分析帮助大家更深刻了解它。
开发环境: VB2005 Windows2003
本实例需要在菜单栏中的“项目”-“ 添加引用” -“ System.Management”
并在实例代码中导入引用的项目和程序集中定义的命名空间或编程元素 即: Imports System.Management
VB.Net查询BIOS版本信息的实例 返回值如: Phoenix ROM BIOS PLUS Version 1.10 A04
代码如下:
Private Sub Lobdotcn()
Dim Lob_Searcher As New ManagementObjectSearcher("root\CIMV2", "SELECT * FROM Win32_BIOS") For Each Obj_Query As ManagementObject In Lob_Searcher.Get() If Obj_Query("BIOSVersion") Is Nothing Then MsgBox("BIOSVersion: " & Obj_Query("BIOSVersion")) Else Dim Arr_BIOSVersion As String() Arr_BIOSVersion = Obj_Query("BIOSVersion") For Each Str_Value As String In Arr_BIOSVersion MsgBox("BIOSVersion: " & Str_Value) Next End If Next
End Sub
|