Network Security Internet Technology Development Database Servers Mobile Phone Android Software Apple Software Computer Software News IT Information

In addition to Weibo, there is also WeChat

Please pay attention

WeChat public account

Shulou

How to use VBS to obtain screen resolution

2025-02-23 Update From: SLTechnology News&Howtos shulou NAV: SLTechnology News&Howtos > Development >

Share

Shulou(Shulou.com)06/03 Report--

This article mainly shows you "how to use VBS to obtain screen resolution", the content is easy to understand, clear, hope to help you solve your doubts, the following let the editor lead you to study and learn "how to use VBS to obtain screen resolution" this article.

One is the Win32_DesktopMonitor class in WMI

The copy code is as follows:

StrComputer = "."

Set objWMIService = GetObject ("winmgmts:\\" & strComputer & "\ root\ cimv2")

Set colItems = objWMIService.ExecQuery ("Select * from Win32_DesktopMonitor", 48)

For Each objItem in colItems

WScript.Echo "ScreenHeight:" & objItem.ScreenHeight

WScript.Echo "ScreenWidth:" & objItem.ScreenWidth

Next

One is the screen object in HTML DOM

The copy code is as follows:

Dim IE

Set IE = CreateObject ("InternetExplorer.Application")

IE.Navigate "about:blank"

Set screen = IE.Document.parentWindow.screen

WScript.Echo "ScreenHeight:" & screen.height

WScript.Echo "ScreenWidth:" & screen.width

The above is all the contents of the article "how to use VBS to get screen Resolution". Thank you for reading! I believe we all have a certain understanding, hope to share the content to help you, if you want to learn more knowledge, welcome to follow the industry information channel!

Welcome to subscribe "Shulou Technology Information " to get latest news, interesting things and hot topics in the IT industry, and controls the hottest and latest Internet news, technology news and IT industry trends.

Views: 0

*The comments in the above article only represent the author's personal views and do not represent the views and positions of this website. If you have more insights, please feel free to contribute and share.

Share To

Development

Wechat

© 2024 shulou.com SLNews company. All rights reserved.

12
Report