亚洲激情专区-91九色丨porny丨老师-久久久久久久女国产乱让韩-国产精品午夜小视频观看

溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

Shell.Application執行命令的方法有哪些

發布時間:2021-10-11 14:55:54 來源:億速云 閱讀:171 作者:小新 欄目:開發技術

這篇文章將為大家詳細講解有關Shell.Application執行命令的方法有哪些,小編覺得挺實用的,因此分享給大家做個參考,希望大家閱讀完這篇文章后可以有所收獲。

代碼如下:

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,可以加參數和設置參數值 
'方法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 '右鍵菜單中在中文系統是"打開(&O)",英文自己改 
objFIV.DoIt 
Exit For 
End IF 
Next

關于“Shell.Application執行命令的方法有哪些”這篇文章就分享到這里了,希望以上內容可以對大家有一定的幫助,使各位可以學到更多知識,如果覺得文章不錯,請把它分享出去讓更多的人看到。

向AI問一下細節

免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。

AI

松阳县| 淄博市| 彭泽县| 衡水市| 疏附县| 隆昌县| 托克逊县| 淮南市| 塘沽区| 南陵县| 肥西县| 邳州市| 洪洞县| 桃园市| 绥江县| 简阳市| 大城县| 三亚市| 怀集县| 怀安县| 乌什县| 莱西市| 梓潼县| 甘孜| 龙门县| 阿瓦提县| 龙泉市| 永善县| 西和县| 陇南市| 历史| 沙河市| 黄浦区| 漠河县| 武城县| 蕲春县| 郴州市| 资溪县| 沂南县| 浙江省| 乌兰浩特市|