Shell.Application執(zhí)行命令的五種方法小結(jié)
更新時(shí)間：2010年11月28日 19:10:29 作者：
可能很多人發(fā)現(xiàn)了在海陽頂端2006+版本中Shell.Application執(zhí)行命令的方法在win2003中不好用了。
當(dāng)初老馬寫這個版本時(shí)，我測試過簡繁兩個2003版本的，當(dāng)是是好用的。我猜測很可能與2003打了ms06014補(bǔ)丁有關(guān)。kyo在冰點(diǎn)論壇提出了解決方法，我今天下午研究了一下這個組件，發(fā)現(xiàn)它有5種方法可以執(zhí)行命令。以下是vbs版本（asp版不提供了，如何利用asp版本在2003的webshell中運(yùn)行命令，自己解決吧：-）：
Set objShellApp = CreateObject("Shell.Application")
Set objFolder = objShellApp.NameSpace("c:\")
objFolder.Items().item("demo.exe").invokeverb '方法1
objFolder.Items().item("demo.exe").InvokeVerbEx'方法2
objShellApp.Open("C:\demo.exe") '方法3
objShellApp.ShellExecute "demo.exe","","c:\","","1" '方法4,可以加參數(shù)和設(shè)置參數(shù)值
'方法5
Set objFolderItem = objShellApp.NameSpace("C:\").Items().item("demo.exe")
Set objFIVs = objFolderItem.Verbs()
For i=0 To objFIVs.Count - 1
'MsgBox objFIVs.Item(i)
Set objFIV = objFIVs.Item(i)
If objFIV.Name = "打開(&O)" Then '右鍵菜單中在中文系統(tǒng)是"打開(&O)"，英文自己改
objFIV.DoIt
Exit For
End IF
Next
復(fù)制代碼 代碼如下:
Set objShellApp = CreateObject("Shell.Application")
Set objFolder = objShellApp.NameSpace("c:\")
objFolder.Items().item("demo.exe").invokeverb '方法1
objFolder.Items().item("demo.exe").InvokeVerbEx'方法2
objShellApp.Open("C:\demo.exe") '方法3
objShellApp.ShellExecute "demo.exe","","c:\","","1" '方法4,可以加參數(shù)和設(shè)置參數(shù)值
'方法5
Set objFolderItem = objShellApp.NameSpace("C:\").Items().item("demo.exe")
Set objFIVs = objFolderItem.Verbs()
For i=0 To objFIVs.Count - 1
'MsgBox objFIVs.Item(i)
Set objFIV = objFIVs.Item(i)
If objFIV.Name = "打開(&O)" Then '右鍵菜單中在中文系統(tǒng)是"打開(&O)"，英文自己改
objFIV.DoIt
Exit For
End IF
Next
相關(guān)文章
自動刪除超過10天的文件及文件夾vbs，主要是針對一些沒有用的文件夾。2009-11-11
VBS加密與VBE解密實(shí)現(xiàn)方法，因?yàn)楹芏嗯笥严胍Ｗo(hù)代碼，其實(shí)也很難保護(hù)的了，能加密的很多都能解密。不過可以增加破解難度，或防止殺毒軟件殺掉代碼。2011-01-01
VBS教程：方法-GetExtensionName 方法...2006-11-11
vbscript基礎(chǔ)篇 - vbs變量定義與使用方法
VBScript只有一種數(shù)據(jù)類型 —— Variant，它是根據(jù)上下文來判斷是數(shù)字還是字符串。因?yàn)閂ariant是VBScript中唯一的數(shù)據(jù)類型，所以它也是VBScript中所有函數(shù)的返回值的數(shù)據(jù)類型2018-05-05
vbs實(shí)現(xiàn)文件的備份，默認(rèn)覆蓋操作2008-06-06
VBS教程：方法-Replace 方法...2006-11-11
VBS.Runauto腳本病毒是我們俗稱的U盤病毒的一種，Symantec公司給其定位為蠕蟲（Worm）病毒，雖然危害性遠(yuǎn)不如一些惡性病毒，但常常會嚴(yán)重影響用戶正常使用計(jì)算機(jī)。2010-11-11
VBS教程：屬性-ShortPath 屬性...2006-11-11
IIS管理器也是通過調(diào)用iisvdir.vbs來實(shí)現(xiàn)虛擬目錄的創(chuàng)建和刪除的。我們可以通過命令行的方式來執(zhí)行iisvdir.vbs腳本2014-07-07
VBS教程：函數(shù)-Sgn 函數(shù)...2006-11-11