如何利用WMI检测显示器相关信息
如何利用WMI检测显示器相关信息列如:17" CRT等等
非常谢谢 ????:face (13): 本帖最后由 afan 于 2009-9-12 00:00 编辑
不懂操作WMI... 帮你顶顶~ 试了下,WMI倒是做出来了,可以得到产品品牌、型号、序列号、宽、高等信息,不过没有关于尺寸和类型的类的实例,而且品牌型号等必须在安装了显示器驱动时才有意义,不然就显示即插即用显示器 。。。
虽然也有些产品型号里包含了尺寸及LCD的定义,但总体来说通用性不大~
看来无解了。。。 试了下,WMI倒是做出来了,可以得到产品品牌、型号、序列号、宽、高等信息,不过没有关于尺寸和类型的类的实例,而且品牌型号等必须在安装了显示器驱动时才有意义,不然就显示即插即用显示器 。。。
虽然也有些产品 ...
afan 发表于 2009-9-12 00:03 http://autoitx.com/images/common/back.gif
可否把你的源码发我一下,386592602@qq.com #include <Array.au3>
_ArrayDisplay(XsqInfo(), '显示器信息')
Func XsqInfo()
;调用WMI查看显示器信息。为获得详实信息请确定已安装过显示器驱动。
;(Afan--http://www.autoitx.com/?fromuid=7644923)
Local $xsInfo =
$objWMIService = ObjGet("winmgmts:\\.\root\cimv2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_DesktopMonitor")
For $Info In $colItems
$xsInfo = $Info.Availability
$xsInfo = $Info.Caption
$xsInfo = $Info.ConfigManagerErrorCode
$xsInfo = $Info.ConfigManagerUserConfig
$xsInfo = $Info.CreationClassName
$xsInfo = $Info.Description
$xsInfo = $Info.DeviceID
$xsInfo = $Info.MonitorManufacturer
$xsInfo = $Info.MonitorType
$xsInfo = $Info.Name
$xsInfo = $Info.PixelsPerXLogicalInch
$xsInfo = $Info.PixelsPerYLogicalInch
$xsInfo = $Info.PNPDeviceID
$xsInfo = $Info.ScreenHeight
$xsInfo = $Info.ScreenWidth
$xsInfo = $Info.Status
$xsInfo = $Info.SystemCreationClassName
$xsInfo = $Info.SystemName
Return $xsInfo
Next
EndFunc ;==>XsqInfo
没弄过WMI,今天现买现卖的... 谢谢无私分享,学习了。
页:
[1]