今天就跟大家聊聊有關怎么在vbscript中判斷COM類是否存在，可能很多人都不太了解，為了讓大家更加了解，小編給大家總結了以下內容，希望大家根據這篇文章可以有所收獲。
1、注冊表查詢法。
Function ComExist(ComName)
Dim WshShell
Set WshShell = CreateObject("Wscript.Shell")
On Error Resume Next
WshShell.RegRead("HKCR\"&ComName&"\")
ComExist = CBool(Err.Number = 0)
On Error Goto 0
End Function該方法用到了一個Win Script Host附帶的COM類。通過直接查詢注冊表來確定COM類是否有效。
優點：快速，無需創建對象。
缺點：一些COM類的卸載殘留可能會使該函數誤判。如果WScript.Shell對象異常，會無法判斷。
2、嘗試創建法。
Function ComExist(ComName) On Error Resume Next Set CreateTest = CreateObject(ComName) ComExist = CBool(Err.Number = 0) On Error Goto 0 End Function
該方法比較簡單粗暴，直接創建下COM對象看看成不成功。
優點：非常的嚴謹&靠譜。
缺點：如果用這個來測試一些創建&銷毀時間長的類（如Word.Application），會耗費大量時間，并留下進程殘留（如Word對象需手動.Quit）。
看完上述內容，你們對怎么在vbscript中判斷COM類是否存在有進一步的了解嗎？如果還想了解更多知識或者相關內容，請關注億速云行業資訊頻道，感謝大家的支持。
免責聲明：本站發布的內容（圖片、視頻和文字）以原創、轉載和分享為主，文章觀點不代表本網站立場，如果涉及侵權請聯系站長郵箱：is@yisu.com進行舉報，并提供相關證據，一經查實，將立刻刪除涉嫌侵權內容。
