- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
利用WMI查看系统信息
摘要:获取系统信息的方法是调用API函数来实现,通过WMI编程,在VB环境中实现查看系统信息的功能。
关键词:WMI;VB;系统信息
中图分类号:TP311文献标识码:A文章编号:1009-3044(2008)34-1668-02
Showing System Information with WMI
SU Ying, ZHANG Yue-hua
(Taiyuan University of Technology Yangquan College, Yangquan 045000, China)
Abstract: Method of Getting the system information is that callingthe API functions to realize, through WMI programming, get the system information in VB.
Key words: WMI; VB; system information
1 WMI
1.1 WMI简介
WMI是Windows管理规范(Windows Management Instrumentation[1]),是Microsoft基于Web的企业管理(WBEM)[2]的实现,是一项行业推荐规范,是为访问企业环境中的管理信息而开发一种标准化技术。
WMI是可伸缩的系统管理结构,该规范采用一个统一、基于标准且可扩展的面向对象接口。它提供与系统管理员信息和基础WMI API交互的标准方法,主要由系统管理应用程序开发人员和系统管理员用来访问和操作系统管理信息。WMI提供了一套内置在Microsoft Windows操作系统中的丰富的系统管理服务,从Windows 2000开始,WMI(Windows 管理规范)就内置于操作系统中,并且成为了Windows系统管理的重要组成部分。
1.2 WMI的主要功能
1) 访问本地主机的一些信息和服务,通过WMI 可以获取主板、BIOS、磁盘、显卡、声卡、内存、操作系统、网络等几乎所有的系统信息;
2) 获取远程计算机信息和实现使用WMI远程控制计算机[3],可以管理远程计算机,比如:重启,关机,关闭进程,创建进程,IP地址自动更改[4],对服务器硬盘资源进行实时监视和自动化管理[5]等。
2 查看WMI各分类的属性、方法
1) 利用wbemtest[6]在进行WMI编程的时候,要想得到相应的信息类型的属性,一种方法是通过查询,另外一种方法是通过在Windows环境中,单击“开始”-“运行”,在弹出的“运行”对话框中输入“wbemtest”命令,单击“确定”按钮,即打开了“Windows管理规范测试器”,刚开始默认的名称空间为“root\default”,当需要更改名称空间,单击“连接”按钮,将默认的“root\default”更改为“root\cimv2”,单击“连接”。可以单击“打开类别”,在弹出的对话框中输入要查找的类名(例如Win32_Processor)就可以查询类的属性和方法。
2) 利用Internet上的MSDN来查看WMI各分类的属性、方法。
3 WMI在VB中的应用
下面是在VB中调用WMI来进行CPU、声卡、显卡检测。
1) 首先打开VB环境,单击先“工程”-“引用”[7],在弹出的“引用”对话框中,选中左侧列表框中的“Microsoft WMI Scripting V1.1 Library”选项。
2) 在窗体Form1中加入一个TextBox和CommandButton。在Command1.click中加入以下代码:
CPU检测
Dim wmiObjSet As SWbemObjectSet
Dim obj As SWbemObject
Set wmiObjSet = GetObject(winmgmts:_{impersonation Level=impersonate}).
_InstancesOf(Win32_Processor)
For Each obj In wmiObjSet
Text1.Text = CPU信息: vbCrLf
Text1.Text = Text1.Text 【CPU类型】 obj.Name vbCrLf
Text1.Text = Text1.Text 【封装类型】: obj.SocketDesignation vbCrLf
Next
声卡检测
Set wmiObjSet = GetObject(w
文档评论(0)