标题: [求助]帮忙写个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可以判断当前屏幕分辨率with oIE.parentWindow.screen
msgbox .width & "×" & .height
set oshell = CreateObject("WScript.Shell")
oshell.run (".exe")
end with
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