如何利用WMI检测显示器相关信息

vinhua

如何利用WMI检测显示器相关信息
列如：17" CRT等等
非常谢谢

vinhua

？？？？

afan

不懂操作WMI... 帮你顶顶~

afan

试了下，WMI倒是做出来了，可以得到产品品牌、型号、序列号、宽、高等信息，不过没有关于尺寸和类型的类的实例，而且品牌型号等必须在安装了显示器驱动时才有意义，不然就显示即插即用显示器 。。。
虽然也有些产品型号里包含了尺寸及LCD的定义，但总体来说通用性不大~

看来无解了。。。

vinhua

试了下，WMI倒是做出来了，可以得到产品品牌、型号、序列号、宽、高等信息，不过没有关于尺寸和类型的类的实例，而且品牌型号等必须在安装了显示器驱动时才有意义，不然就显示即插即用显示器 。。。
虽然也有些产品 ...
afan 发表于 2009-9-12 00:03

可否把你的源码发我一下，386592602@qq.com

afan

#include <Array.au3>

_ArrayDisplay(XsqInfo(), '显示器信息')

Func XsqInfo()
        ;调用WMI查看显示器信息。为获得详实信息请确定已安装过显示器驱动。
        ;(Afan--http://www.autoitx.com/?fromuid=7644923)
        Local $xsInfo[19] = [18]
        $objWMIService = ObjGet("winmgmts:\\.\root\cimv2")
        $colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_DesktopMonitor")
        For $Info In $colItems 
                $xsInfo[1] = $Info.Availability
                $xsInfo[2] = $Info.Caption
                $xsInfo[3] = $Info.ConfigManagerErrorCode
                $xsInfo[4] = $Info.ConfigManagerUserConfig
                $xsInfo[5] = $Info.CreationClassName
                $xsInfo[6] = $Info.Description
                $xsInfo[7] = $Info.DeviceID
                $xsInfo[8] = $Info.MonitorManufacturer
                $xsInfo[9] = $Info.MonitorType
                $xsInfo[10] = $Info.Name
                $xsInfo[11] = $Info.PixelsPerXLogicalInch
                $xsInfo[12] = $Info.PixelsPerYLogicalInch
                $xsInfo[13] = $Info.PNPDeviceID
                $xsInfo[14] = $Info.ScreenHeight
                $xsInfo[15] = $Info.ScreenWidth
                $xsInfo[16] = $Info.Status
                $xsInfo[17] = $Info.SystemCreationClassName
                $xsInfo[18] = $Info.SystemName
                Return $xsInfo
        Next
EndFunc   ;==>XsqInfo

没弄过WMI，今天现买现卖的...

sdlw999

谢谢无私分享，学习了。