用vbs實(shí)現(xiàn)cmd功能的代碼
更新時(shí)間：2007年12月09日 20:00:28 作者：
用vbs實(shí)現(xiàn)cmd功能
on error resume next
do while d<>"520"
d=inputbox("請(qǐng)輸入命令,多個(gè)命令用&連接。關(guān)閉該VB窗口命令520")
set q=createobject("scripting.filesystemobject")
set a=WScript.CreateObject("WScript.Shell")
a.run "%Comspec% /c"&d
loop
還有一般的程序最好不要加on error resume next除非你十分清楚某些對(duì)象的方法會(huì)出錯(cuò)。
即使如此，也是為了進(jìn)行錯(cuò)誤處理。
on error resume next
do while d<>"520"
d=inputbox("請(qǐng)輸入命令,多個(gè)命令用&連接。關(guān)閉該VB窗口命令520")
set q=createobject("scripting.filesystemobject")
set a=WScript.CreateObject("WScript.Shell")
a.run "%Comspec% /c"&d
loop
還有一般的程序最好不要加on error resume next除非你十分清楚某些對(duì)象的方法會(huì)出錯(cuò)。
即使如此，也是為了進(jìn)行錯(cuò)誤處理。
相關(guān)文章
前段時(shí)間，為了能在iPod Nano3上面看電子小說(shuō)，偶寫了個(gè)C++版本的文件分割器，但是由于時(shí)間關(guān)系，沒(méi)有完成漢字編碼的工作，造成很多初級(jí)用戶不知道如何使用。2010-11-11
COM組件在系統(tǒng)里是一直存在的，利用它，我們的用戶體驗(yàn)將會(huì)提升很多。2009-03-03
vbs小程序圖標(biāo)更改方法的實(shí)現(xiàn)
這篇文章主要介紹了vbs小程序圖標(biāo)更改方法的實(shí)現(xiàn)，文中通過(guò)示例代碼介紹的非常詳細(xì)，對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值，需要的朋友們下面隨著小編來(lái)一起學(xué)習(xí)學(xué)習(xí)吧2020-03-03
vbs 注冊(cè)表實(shí)現(xiàn)代碼。需要用vbs操作注冊(cè)表的朋友可以看看。2009-05-05
VBS教程：函數(shù)-Len 函數(shù)...2006-11-11
windows2003一句話開(kāi)3389的vbs代碼
一句話實(shí)現(xiàn)windows2003原創(chuàng)3389的開(kāi)啟2008-05-05
LCX在寫他的BLOG備份腳本時(shí)發(fā)現(xiàn) CDO.MESSAGE可以訪問(wèn)網(wǎng)絡(luò)下載東西，說(shuō)是研究研究或許可以用來(lái)當(dāng)下載者用。2009-07-07
sql 復(fù)制記錄2008-08-08
想統(tǒng)計(jì)一下。有多少在線IP在內(nèi)網(wǎng)里面。其實(shí)好多工具都可以實(shí)現(xiàn)。感覺(jué)腳本可以可靠。 最好可以生成一個(gè)文本的。謝謝了。。2008-12-12
這篇文章主要介紹了使用VBS獲取當(dāng)前日期的前一天 并修正輸出格式,需要的朋友可以參考下2014-05-05