【按鍵精靈-中級篇】用按鍵[Runapp]打開快捷方式[七十多種方法](轉貼) @ 【魔幻小鱉】的部落格

資料來源：兄弟論壇
作者：vbsxcn

我是在XP作業系統測試，都可以用。
希望大家都來補充

VBSCall runapp("TASKMGR.EXE")
//打開任務管理器

VBSCall runapp("explorer.exe")
//打開我的文件

VBSCall runapp("wab.exe")
//打開通訊簿

VBSCall runapp("eventvwr.msc")
//打開事件查看器

VBSCall runapp("odbcad32.exe")
//打開資料源 (ODBC).

VBSCall runapp("perfmon.msc")
//打開性能

VBSCall runapp("services.msc")
//打開服務

VBSCall runapp("secpol.msc")
//打開本地安全策略

VBSCall runapp("compmgmt.msc")
//打開計算機管理

VBSCall runapp("mspaint.exe")
//打開畫圖

VBSCall runapp("sndrec32.exe")
//打開錄音機

VBSCall runapp("calc.exe")
//打開計算器

VBSCall runapp("mshearts.exe")
//打開紅心大戰

VBSCall runapp("freecell.exe")
//打開空當接龍

VBSCall runapp("winmine.exe")
//打開掃雷

VBSCall runapp("spider.exe")
//打開蜘蛛紙牌

VBSCall runapp("sol.exe")
//打開紙牌

VBSCall runapp("notepad.exe")
//打開記事本

VBSCall runapp("cmd.exe")
//打開命令提示符

VBSCall runapp("wordpad.exe")
//打開寫字板

VBSCall runapp("explorer.exe /n,::{20D04FE0-3AEA-1069-A2D8-08002B30309D}")
//打開"我的電腦"----/n可以換成/e 將會以資源管理器的方式打

VBSCall runapp("explorer.exe /n,::{450D8FBA-AD25-11D0-98A8-0800361B1103}")
//打開"我的文件"

VBSCall runapp("explorer.exe /n,::{208D2C60-3AEA-1069-A2D7-08002B30309D}")
//打開"網路鄰居"

VBSCall runapp("explorer.exe /n,::{645FF040-5081-101B-9F08-00AA002F954E}")
//打開"回收站"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL")
//打開"控制面板"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL sysdm.cpl,,0")
//打開"系統屬性－常規"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL sysdm.cpl,,1")
//打開"系統屬性－計算機名"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL sysdm.cpl,,2")
//打開"系統屬性－硬體"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL sysdm.cpl,,3")
//打開"系統屬性－高級"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL sysdm.cpl,,4")
//打開"系統屬性－系統還原"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL sysdm.cpl,,5")
//打開"系統屬性－自動更新"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL sysdm.cpl,,6")
//打開"系統屬性－遠程"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL access.cpl,,1")
//打開"輔助選項屬性-鍵盤"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL access.cpl,,2")
//打開"輔助選項屬性-聲音"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL access.cpl,,3")
//打開"輔助選項屬性-顯示"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL access.cpl,,4")
//打開"輔助選項屬性-滑鼠"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL access.cpl,,5")
//打開"輔助選項屬性-常規"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Appwiz.cpl,,0")
//打開"添加/刪除程式屬性-程式"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Appwiz.cpl,,1")
//打開"添加/刪除程式屬性-安裝/卸載"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Appwiz.cpl,,2")
//打開"添加/刪除程式屬性-Windows安裝程式"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Appwiz.cpl,,3")
//打開"添加/刪除程式屬性-啟動盤"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL desk.cpl")
//打開"顯示屬性-主題"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL desk.cpl,,0")
//打開"顯示屬性-背景"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL desk.cpl,,1")
//打開"顯示屬性-螢幕保護程式"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL desk.cpl,,2")
//打開"顯示屬性-外觀"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL desk.cpl,,3")
//打開"顯示屬性-設置"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,0")
//打開"Internet 屬性-常規"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,1")
//打開"Internet 屬性-安全"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,2")
//打開"Internet 屬性-隱私"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,3")
//打開"Internet 屬性-內容"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,4")
//打開"Internet 屬性-連接"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,5")
//打開"Internet 屬性-程式"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Inetcpl.cpl,,6")
//打開"Internet 屬性-高級"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Intl.cpl,,0")
//打開"區域設置屬性-區域設置"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Intl.cpl,,1")
//打開"區域設置屬性-語言"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Intl.cpl,,2")
//打開"區域設置屬性-高級"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Joy.cpl,,0")
//打開"遊戲控制器-一般"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Main.cpl")
//打開"滑鼠屬性"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Main.cpl,,1")
//打開"滑鼠屬性-指針"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Main.cpl,,2")
//打開"滑鼠屬性-指針選項"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Main.cpl,,3")
//打開"滑鼠屬性-輪"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Main.cpl,,4")
//打開"滑鼠屬性-硬體"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Mmsys.cpl,,0")
//打開"多媒體屬性-音量"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Mmsys.cpl,,1")
//打開"多媒體屬性-聲音"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Mmsys.cpl,,2")
//打開"多媒體屬性-音頻"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Mmsys.cpl,,3")
//打開"多媒體屬性-語聲"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Mmsys.cpl,,4")
//打開"多媒體屬性-硬體"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Modem.cpl")
//打開"調制解調器屬性"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL timedate.cpl")
//打開"日期/時間屬性-日期和時間"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL timedate.cpl,,1")
//打開"日期/時間屬性-時區"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Powercfg.cpl")
//打開"電源選項屬性-電源使用方案"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL Telephon.cpl")
//打開"撥號屬性"

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL odbccp32.cpl")
//打開"ODBC資料源管理器屬性-用戶DSN"

VBSCall runapp("rundll32.exe shell32.dll,SHHelpShortcuts_RunDLL AddPrinter")
//打開"添加印表機嚮導"

VBSCall runapp("rundll32.exe diskcopy.dll,DiskCopyRunDll")
//打開"複製磁碟"

VBSCall runapp("rundll32.exe shell32.dll,SHHelpShortcuts_RunDLL FontsFolder")
//打開Windows的「字體」檔案夾

VBSCall runapp("rundll32.exe shell32.dll,Control_RunDLL modem.cpl,,add")
// 執行「添加新調制解調器」嚮導

set obj = createobject("WScript.Shell")
obj.exec("shutdown -s -f -t 0")
//強行關閉所有程式並關機.雖不是Runapp，有時候會用到