如何通过批处理获取显示器当前的分辨率呢？

zbo103

大家好！请教一下大家如何通过bat获取显示器当前的分辨率呢？

zqz0012005

1. wmic desktopmonitor get ScreenWidth,ScreenHeight

复制代码

tireless

1. @echo off
   
2. for /f "tokens=1,3 eol=H skip=8" %%a in ('reg query hkcc\system\currentcontrolset\control\video /s') do (
   
3.   if /i "%%a"=="DefaultSettings.XResolution" (set /a X=%%b) else (
   
4.     if /i "%%a"=="DefaultSettings.YResolution" set /a Y=%%b
   
5.   )
   
6. )
   
7. echo %x%*%y%
   
8. pause

复制代码

zqz0012005

1. mshta vbscript:prompt("",screen.Width^&" "^&screen.Height)(close)

复制代码

1. mshta "javascript:prompt('',screen.Width+' '+screen.Height);close();"

复制代码

[ 本帖最后由 zqz0012005 于 2009-4-13 23:12 编辑 ]

pcl_test

vbs

1. '一
   
2. Set html=CreateObject("HtmlFile")
   
3. Set screen=html.ParentWindow.Screen
   
4. Msgbox screen.width &" "& screen.height
   
5. 
   
6. '二
   
7. Set wmi = GetObject("winmgmts:\\.\root\cimv2")
   
8. Set Items = wmi.ExecQuery("Select * from Win32_DesktopMonitor")
   
9. For Each Item in Items
   
10.     If Item.ScreenHeight <>"" and Item.ScreenWidth <>"" Then
    
11.         Msgbox  Item.ScreenWidth&" "& Item.ScreenHeight
    
12.     End If
    
13. Next
    
14. 
    
15. '三
    
16. Set ie = CreateObject("InternetExplorer.Application")
    
17. ie.Navigate "about:blank"
    
18. Set screen=ie.Document.parentWindow.screen
    
19. Msgbox screen.width &" "& screen.height

复制代码

sycsyc

1. @echo off
   
2. mshta vbscript:CreateObject^(^"Wscript.Shell^"^).Run(^"cmd /c^"^&^"echo ^"^&CreateObject^(^"HtmlFile^"^).ParentWindow.Screen.width^&^"^>%temp%\ScreenW.txt^")(window.close)
   
3. mshta vbscript:CreateObject^(^"Wscript.Shell^"^).Run(^"cmd /c^"^&^"echo ^"^&CreateObject^(^"HtmlFile^"^).ParentWindow.Screen.height^&^"^>%temp%\ScreenH.txt^")(window.close)
   
4. set /p "Width=" 0<%temp%\ScreenW.txt
   
5. set /p "Height=" 0<%temp%\ScreenH.txt
   
6. del /f /q %temp%\ScreenW.txt
   
7. del /f /q %temp%\ScreenH.txt
   
8. echo %Width% %Height%
   
9. pause

复制代码

aloha20200628

批处通过mshta脚本调用网页属性值可直接获取当前屏幕分辨率，但仅为取值则会突显其产生屏闪的缺陷。因此可选用 wmic 和 powershell 方法，但前者采用 desktopmonitor 通道获取可能会有系统兼容性问题，采用 Win32_VideoController 通道获取比较稳妥；powershell 方法就是首启速度略慢，以下是三段批处示例代码...

一。mshta 版本

1. 
   
2. @echo off & for /f "tokens=1-2 delims=," %%a in ('mshta "javascript:new ActiveXObject('Scripting.FileSystemObject').GetStandardStream(1).Write(screen.width+','+screen.height);close();" ') do (set/a "w=%%a,h=%%b")
   
3. echo,w=%w%,h=%h%&pause&exit/b
   

复制代码

二。wmic 版本

1. 
   
2. @echo off &for /f "tokens=1-2 delims= " %%a in (
   
3.     'wmic path Win32_VideoController get CurrentHorizontalResolution^,CurrentVerticalResolution'
   
4. ) do (set/a "w=%%a,h=%%b" 2>nul)
   
5. echo,w=%w%,h=%h%&pause&exit/b
   

复制代码

三。powershell 版本

1. 
   
2. @echo off &for /f "tokens=1-2 delims=," %%a in (
   
3.     'powershell "$g=Get-WmiObject win32_videocontroller;''+$g.CurrentHorizontalResolution+','+$g.CurrentVerticalResolution" ') do (set/a "w=%%a,h=%%b")
   
4. echo,w=%w%,h=%h%&pause&exit/b
   

复制代码