找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 8493|回复: 1

[系统相关] [已解决]批处理,如何获取当前设置的分辨率长边数字,执行不同的bat代码?

[复制链接]
发表于 2025-3-10 19:00:39 | 显示全部楼层 |阅读模式
本帖最后由 ygqiang 于 2025-3-10 19:39 编辑

批处理,如何获取当前设置的分辨率长边数字,执行不同的bat代码?

如果长边数字是<=1920,就执行bat代码1
如果长边数字是>1920,就执行bat代码2

代码如下:
  1. @echo off
  2. echo,分辨率-获取当前设置数值
  3. cls
  4. for /f "tokens=1-2" %%a in ('mshta VBScript:Execute("CreateObject(""Scripting.Filesystemobject"").GetStandardStream(1).Write(screen.width&"" ""&screen.height)"^)(close^)') do (
  5.     set "ScreenWidth=%%a"
  6.     set "ScreenHeight=%%b"
  7. )
  8. echo ScreenWidth=%ScreenWidth%
  9. echo ScreenHeight=%ScreenHeight%
  10. pause
  11. cls

  12. if %ScreenWidth% LEQ 1920 (goto :pc2k) else (goto :pc4k)
  13. 1pause
  14. exit

  15. :pc2k
  16. echo 2k2k2k2k
  17. pause>nul
  18. goto :nexx

  19. :pc4k
  20. echo 4k4k4k4k
  21. pause>nul

  22. :nexx
复制代码

评分

参与人数 1PB +2 收起 理由
Batcher + 2 感谢给帖子标题标注[已解决]字样

查看全部评分

 楼主| 发表于 2025-3-10 19:50:51 | 显示全部楼层
  1. @echo off

  2. set "df=微软雅黑Semibold-12pt-低分.ini"
  3. set "gf=微软雅黑Semibold-12pt-高分.ini"


  4. echo,分辨率-获取当前设置数值
  5. cls
  6. for /f "tokens=1-2" %%a in ('mshta VBScript:Execute("CreateObject(""Scripting.Filesystemobject"").GetStandardStream(1).Write(screen.width&"" ""&screen.height)"^)(close^)') do (
  7.     set "ScreenWidth=%%a"
  8.     set "ScreenHeight=%%b"
  9. )
  10. echo ScreenWidth=%ScreenWidth%
  11. echo ScreenHeight=%ScreenHeight%
  12. 1pause
  13. cls

  14. -----------------------------------------------------------------------------------------------
  15. -----------------------------------------------------------------------------------------------
  16. cls
  17. if %ScreenWidth% LEQ 1920 (goto :pc2k) else (goto :pc4k)
  18. 1pause
  19. exit

  20. ------------------------------------------------
  21. cls
  22. :pc2k
  23. echo 2k2k2k2k
  24. set win=%df%
  25. pause
  26. goto :nexx

  27. ------------------------------------------------
  28. cls
  29. :pc4k
  30. echo 4k4k4k4k
  31. set win=%gf%
  32. pause


  33. ------------------------------
  34. cls
  35. :nexx

  36. echo %win%
  37. 1pause
  38. cls

  39. cd
  40. echo 获取自身所在目录的路径(不包含文件名)
  41. echo;"%~dp0"
  42. set "dqmu=%~dp0"
  43. echo;"%dqmu%"
  44. cd /d "%dqmu%"
  45. cd

  46. 1pause
  47. cls

  48. start "" "noMeiryoUI.exe" %win% -set

  49. 1pause
  50. cls

  51. exit
复制代码
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-17 08:44 , Processed in 0.017137 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表