在vbs運行命令列工具後讓命令視窗保持開啟狀態的指令碼

問：
您好，指令碼專家！如何在運行像 Ping 或 Ipconfig 這樣的工具後讓命令視窗保持開啟狀態？
-- DB
答：
您好，DB。這個問題讓我們想起了往事。有一個指令碼專家剛來 Microsoft，那時許多人認為 WMI 和 ADSI 對於指令碼編寫者來說太難使用。因此，人們建議這個指令碼專家不使用 WMI 或 ADSI，而是乾脆使用 VBScript 作為調用命令列工具的方法。事實上，這個指令碼專家編寫的第一章就是一個關於事件記錄管理的章節，該章後來成為 Microsoft Windows 2000 指令碼指南的一部分。它也是不含任何指令碼編寫代碼之類內容的章節。
您說對了：只有指令碼專家才會發現自己在編寫一本絕對不含任何指令碼編寫代碼的指令碼編寫指南。
當然，指令碼專家們使用雄辯的說服，再配合大量的哀求，最終還是能夠讓人們相信，如果那個叫做 Microsoft Windows 2000 指令碼指南的東西實際包含一兩個指令碼，也是可以的。不過，在此過程中，指令碼專家們也對在指令碼內調用命令列工具略有瞭解，這也是為什麼我們能夠回答您問題的原因。
我們猜測您有與以下類似的指令碼，該指令碼運行命令列工具 Ipconfig.exe：
Set objShell = CreateObject("Wscript.Shell")
objShell.Run("ipconfig /all")
您必定知道該指令碼非常有效：彈出命令視窗，然後 Ipconfig 開始運行。唯一的問題是您還未來得及閱讀 IPconfig 返回的資訊，命令視窗就關閉了（除非您讀得確實快）。這確實是個問題。
那麼如何解決它呢？方法如下：
Set objShell = CreateObject("Wscript.Shell")
objShell.Run("%comspec% /k ipconfig /all")
如您所看到的，這個修訂的指令碼保留了與原來指令碼相同的基本結構：我們建立 Wscript.Shell 對象的一個執行個體，然後調用 Run 方法以實際運行該命令列工具。區別在於調用該命令列工具的方式。在原來的指令碼中，我們只是調用工具本身：
objShell.Run("ipconfig /all")
這一次，我們使用的文法大為不同：
objShell.Run("%comspec% /k ipconfig /all")
環境變數 %comspec% 代表 Windows 命令外殼；這等效於調用 Cmd.exe（它當然會開啟一個命令視窗）。那為什麼不直接調用 Cmd.exe？是這樣，假設您的電腦運行 Windows 98。在這些電腦上，通過運行 Command.com 來調用命令外殼，因為沒有 Cmd.exe。使用 %comspec% 有助於確保無論該指令碼是在什麼版本的 Windows 上運行，都可以獲得命令視窗。
換句話說，使用此指令碼時我們並不是直接運行 Ipconfig，而是運行命令外殼的執行個體，並向該執行個體傳遞幾個參數。此類參數中的第一個是 /k，它指示命令外殼執行我們要求它完成的任務，然後保持開啟狀態。（我們得知 k 是 keep 的簡寫形式，像在“keep open”中那樣，但我們不能肯定是否屬實。）我們也可以使用參數 /c（c 代表 close），它在命令視窗完成任務時自動關閉命令視窗。
傳遞給命令外殼的其它參數有何作用？那些參數只是運行 IPconfig 所需的命令：ipconfig /all。想要使用 Ping.exe 對 IP 位址 192.168.1.1 執行 ping 命令嗎？以下指令碼將執行該操作，並確保之後命令視窗保持開啟狀態：
Set objShell = CreateObject("Wscript.Shell")
objShell.Run("%comspec% /k ping 192.168.1.1")
想要運行 Net.exe 以擷取本機使用者帳戶列表並可以隨後進行查看嗎？好的，沒問題：
Set objShell = CreateObject("Wscript.Shell")
objShell.Run("%comspec% /k net user")
想要 ¨C 嗯，您已領會了要旨。
如果往往會在指令碼中大量使用命令列工具（這並沒什麼不對；請儘管使用您認為最方便/最好的工具），則可能會對本專欄感興趣，它向您介紹如何更改命令視窗標題和命令視窗顏色。過去了這麼多年，指令碼專家心中對調用命令列工具指令碼的好感仍在，而且仍無法弄清楚為什麼人們認為編寫根本不含任何指令碼的指令碼編寫指南是一個不錯的想法。