Board logo

标题: [求助]帮忙写个VBS吧:当前屏幕分辨率执行相应程序 [打印本页]

作者: netguy     时间: 2009-2-7 13:46    标题: [求助]帮忙写个VBS吧:当前屏幕分辨率执行相应程序
set oIE = CreateObject("htmlfile")
with oIE.parentWindow.screen
msgbox .width & "×" & .height
set oshell = CreateObject("WScript.Shell")
oshell.run (".exe")
end with
上面这段VBS可以判断当前屏幕分辨率 width height 这两个应该是变量(应该这样叫吧呵呵) 我想让这个VBS 运行 width 这个变量 比如当前分辨率是1024*768 那么就运行1024.exe 不知道这么说大家能明白不。会VBS的帮帮忙被。谢谢啦 或者不管用什么语言 BAT啊 AU3 只要能实现 当分辨率为1024*768 执行1024.exe 当分辨率为1280*1024 执行1280.exe 当分辨率为1440*900 执行1440.exe 当分辨率为1680*1050 执行1680.exe、 ───────────────── 版务记录 ───────────────── 执行:HAT 操作:[2009-02-07]在帖子标题中增加搜索关键字;代码加code标签 说明:原标题"高手帮忙写个VBS吧"不利于论坛搜索 处罚:论坛新人免于积分处罚 提示:建议阅读以下帖子 {1415}提问的智慧 {7326}论坛新手必读,所有人的基本行为准则 {22703}请不要做浮躁的人 {27314}反面教材:本论坛“精彩”标题小集 {32667}愤怒:那些连标题都写不清楚的人们啊,你们醒醒吧 {32825}本版严厉整顿烂帖 ───────────────── 版务记录 ───────────────── [ Last edited by HAT on 2009-2-8 at 00:24 ]

作者: slore     时间: 2009-2-7 14:29
wd = CreateObject("htmlfile").parentWindow.screen.width Set oshell = CreateObject("WScript.Shell") oshell.run (wd & ".exe")

作者: yishanju     时间: 2009-2-7 14:37
for /f %%i in ('wmic desktopmonitor get screenwidth^|findstr /c:"1024" /c:"1280" /c:"1440" /c:"1680"') do ( start "" %%i.exe ) pause