在vbs運(yùn)行命令行工具后讓命令窗口保持打開狀態(tài)的腳本
問:
您好,腳本專家!如何在運(yùn)行像 Ping 或 Ipconfig 這樣的工具后讓命令窗口保持打開狀態(tài)?
-- DB
答:
您好,DB。這個(gè)問題讓我們想起了往事。有一個(gè)腳本專家剛來 Microsoft,那時(shí)許多人認(rèn)為 WMI 和 ADSI 對(duì)于腳本編寫者來說太難使用。因此,人們建議這個(gè)腳本專家不使用 WMI 或 ADSI,而是干脆使用 VBScript 作為調(diào)用命令行工具的方法。事實(shí)上,這個(gè)腳本專家編寫的第一章就是一個(gè)關(guān)于事件日志管理的章節(jié),該章后來成為 Microsoft Windows 2000 腳本指南的一部分。它也是不含任何腳本編寫代碼之類內(nèi)容的章節(jié)。
您說對(duì)了:只有腳本專家才會(huì)發(fā)現(xiàn)自己在編寫一本絕對(duì)不含任何腳本編寫代碼的腳本編寫指南。
當(dāng)然,腳本專家們使用雄辯的說服,再配合大量的哀求,最終還是能夠讓人們相信,如果那個(gè)叫做 Microsoft Windows 2000 腳本指南的東西實(shí)際包含一兩個(gè)腳本,也是可以的。不過,在此過程中,腳本專家們也對(duì)在腳本內(nèi)調(diào)用命令行工具略有了解,這也是為什么我們能夠回答您問題的原因。
我們猜測(cè)您有與以下類似的腳本,該腳本運(yùn)行命令行工具 Ipconfig.exe:
Set objShell = CreateObject("Wscript.Shell")
objShell.Run("ipconfig /all")
您必定知道該腳本非常有效:彈出命令窗口,然后 Ipconfig 開始運(yùn)行。唯一的問題是您還未來得及閱讀 IPconfig 返回的信息,命令窗口就關(guān)閉了(除非您讀得確實(shí)快)。這確實(shí)是個(gè)問題。
那么如何解決它呢?方法如下:
Set objShell = CreateObject("Wscript.Shell")
objShell.Run("%comspec% /k ipconfig /all")
如您所看到的,這個(gè)修訂的腳本保留了與原來腳本相同的基本結(jié)構(gòu):我們創(chuàng)建 Wscript.Shell 對(duì)象的一個(gè)實(shí)例,然后調(diào)用 Run 方法以實(shí)際運(yùn)行該命令行工具。區(qū)別在于調(diào)用該命令行工具的方式。在原來的腳本中,我們只是調(diào)用工具本身:
objShell.Run("ipconfig /all")
這一次,我們使用的語法大為不同:
objShell.Run("%comspec% /k ipconfig /all")
環(huán)境變量 %comspec% 代表 Windows 命令外殼;這等效于調(diào)用 Cmd.exe(它當(dāng)然會(huì)打開一個(gè)命令窗口)。那為什么不直接調(diào)用 Cmd.exe?是這樣,假設(shè)您的計(jì)算機(jī)運(yùn)行 Windows 98。在這些計(jì)算機(jī)上,通過運(yùn)行 Command.com 來調(diào)用命令外殼,因?yàn)闆]有 Cmd.exe。使用 %comspec% 有助于確保無論該腳本是在什么版本的 Windows 上運(yùn)行,都可以獲得命令窗口。
換句話說,使用此腳本時(shí)我們并不是直接運(yùn)行 Ipconfig,而是運(yùn)行命令外殼的實(shí)例,并向該實(shí)例傳遞幾個(gè)參數(shù)。此類參數(shù)中的第一個(gè)是 /k,它指示命令外殼執(zhí)行我們要求它完成的任務(wù),然后保持打開狀態(tài)。(我們得知 k 是 keep 的簡(jiǎn)寫形式,像在“keep open”中那樣,但我們不能肯定是否屬實(shí)。)我們也可以使用參數(shù) /c(c 代表 close),它在命令窗口完成任務(wù)時(shí)自動(dòng)關(guān)閉命令窗口。
傳遞給命令外殼的其它參數(shù)有何作用?那些參數(shù)只是運(yùn)行 IPconfig 所需的命令:ipconfig /all。想要使用 Ping.exe 對(duì) IP 地址 192.168.1.1 執(zhí)行 ping 命令嗎?以下腳本將執(zhí)行該操作,并確保之后命令窗口保持打開狀態(tài):
Set objShell = CreateObject("Wscript.Shell")
objShell.Run("%comspec% /k ping 192.168.1.1")
想要運(yùn)行 Net.exe 以獲取本地用戶帳戶列表并可以隨后進(jìn)行查看嗎?好的,沒問題:
Set objShell = CreateObject("Wscript.Shell")
objShell.Run("%comspec% /k net user")
想要 ¨C 嗯,您已領(lǐng)會(huì)了要旨。
如果往往會(huì)在腳本中大量使用命令行工具(這并沒什么不對(duì);請(qǐng)盡管使用您認(rèn)為最方便/最好的工具),則可能會(huì)對(duì)本專欄感興趣,它向您介紹如何更改命令窗口標(biāo)題和命令窗口顏色。過去了這么多年,腳本專家心中對(duì)調(diào)用命令行工具腳本的好感仍在,而且仍無法弄清楚為什么人們認(rèn)為編寫根本不含任何腳本的腳本編寫指南是一個(gè)不錯(cuò)的想法。
上一篇:用vbs腳本來關(guān)閉 HTML 頁面的代碼
欄 目:vb
下一篇:vbs中實(shí)現(xiàn)啟動(dòng)兩個(gè)應(yīng)用程序,一直等到其中一個(gè)程序結(jié)束,然后關(guān)閉另一個(gè)?
本文標(biāo)題:在vbs運(yùn)行命令行工具后讓命令窗口保持打開狀態(tài)的腳本
本文地址:http://www.jygsgssxh.com/a1/vb/7884.html
您可能感興趣的文章
- 01-10下載文件到本地運(yùn)行的vbs
- 01-10VBS中的正則表達(dá)式的用法大全 <font color=red>原創(chuàng)&
- 01-10VBS中SendKeys的基本應(yīng)用
- 01-10VBScript教程 第十一課深入VBScript
- 01-10用VBSCRIPT控制ONSUBMIT事件
- 01-10VBScript語法速查及實(shí)例說明
- 01-10VBS中Select CASE的其它用法
- 01-10VBScript教程 第七課使用條件語句
- 01-10vbscript 可以按引用傳遞參數(shù)嗎?
- 01-10VBScript教程 第二課在HTML頁面中添加VBscript代碼


閱讀排行
- 1C語言 while語句的用法詳解
- 2java 實(shí)現(xiàn)簡(jiǎn)單圣誕樹的示例代碼(圣誕
- 3利用C語言實(shí)現(xiàn)“百馬百擔(dān)”問題方法
- 4C語言中計(jì)算正弦的相關(guān)函數(shù)總結(jié)
- 5c語言計(jì)算三角形面積代碼
- 6什么是 WSH(腳本宿主)的詳細(xì)解釋
- 7C++ 中隨機(jī)函數(shù)random函數(shù)的使用方法
- 8正則表達(dá)式匹配各種特殊字符
- 9C語言十進(jìn)制轉(zhuǎn)二進(jìn)制代碼實(shí)例
- 10C語言查找數(shù)組里數(shù)字重復(fù)次數(shù)的方法
本欄相關(guān)
- 01-10下載文件到本地運(yùn)行的vbs
- 01-10飄葉千夫指源代碼,又稱qq刷屏器
- 01-10SendKeys參考文檔
- 01-10什么是一個(gè)高效的軟件
- 01-10VBS中的正則表達(dá)式的用法大全 &l
- 01-10exe2swf 工具(Adodb.Stream版)
- 01-10VBS中SendKeys的基本應(yīng)用
- 01-10用VBSCRIPT控制ONSUBMIT事件
- 01-10VBScript教程 第十一課深入VBScript
- 01-10VBScript語法速查及實(shí)例說明
隨機(jī)閱讀
- 01-10使用C語言求解撲克牌的順子及n個(gè)骰子
- 08-05DEDE織夢(mèng)data目錄下的sessions文件夾有什
- 01-11ajax實(shí)現(xiàn)頁面的局部加載
- 01-10delphi制作wav文件的方法
- 08-05dedecms(織夢(mèng))副欄目數(shù)量限制代碼修改
- 08-05織夢(mèng)dedecms什么時(shí)候用欄目交叉功能?
- 01-10SublimeText編譯C開發(fā)環(huán)境設(shè)置
- 01-11Mac OSX 打開原生自帶讀寫NTFS功能(圖文
- 04-02jquery與jsp,用jquery
- 01-10C#中split用法實(shí)例總結(jié)


