我使用以下脚本在Windows中使用WMI获取屏幕分辨率.当计算机处于横向模式时,脚本可以正常工作,但在纵向模式下,脚本返回不正确的值.在XP中正常工作,并没有在Vista中尝试.任何人都可以确认这是Windows 7 WMI中的错误.
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery( _
"SELECT * FROM Win32_DesktopMonitor",,48)
For Each objItem in colItems
Wscript.Echo "-----------------------------------"
Wscript.Echo "Win32_DesktopMonitor instance"
Wscript.Echo "-----------------------------------"
Wscript.Echo "ScreenHeight: " & objItem.ScreenHeight
Wscript.Echo "ScreenWidth: " & objItem.ScreenWidth
Next
Run Code Online (Sandbox Code Playgroud)