溫馨提示×

溫馨提示×

您好，登錄后才能下訂單哦！

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

怎么在vbscript中判斷COM類是否存在

發(fā)布時間：2021-05-14 16:42:26 來源：億速云 閱讀：149 作者：Leah 欄目：開發(fā)技術(shù)

今天就跟大家聊聊有關(guān)怎么在vbscript中判斷COM類是否存在，可能很多人都不太了解，為了讓大家更加了解，小編給大家總結(jié)了以下內(nèi)容，希望大家根據(jù)這篇文章可以有所收獲。

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類是否有效。
優(yōu)點：快速，無需創(chuàng)建對象。
缺點：一些COM類的卸載殘留可能會使該函數(shù)誤判。如果WScript.Shell對象異常，會無法判斷。

2、嘗試創(chuàng)建法。

Function ComExist(ComName)
	On Error Resume Next
	Set CreateTest = CreateObject(ComName)
	ComExist = CBool(Err.Number = 0)
	On Error Goto 0
End Function

該方法比較簡單粗暴，直接創(chuàng)建下COM對象看看成不成功。
優(yōu)點：非常的嚴謹&靠譜。
缺點：如果用這個來測試一些創(chuàng)建&銷毀時間長的類（如Word.Application），會耗費大量時間，并留下進程殘留（如Word對象需手動.Quit）。

看完上述內(nèi)容，你們對怎么在vbscript中判斷COM類是否存在有進一步的了解嗎？如果還想了解更多知識或者相關(guān)內(nèi)容，請關(guān)注億速云行業(yè)資訊頻道，感謝大家的支持。

向AI問一下細節(jié)

免責(zé)聲明：本站發(fā)布的內(nèi)容（圖片、視頻和文字）以原創(chuàng)、轉(zhuǎn)載和分享為主，文章觀點不代表本網(wǎng)站立場，如果涉及侵權(quán)請聯(lián)系站長郵箱：is@yisu.com進行舉報，并提供相關(guān)證據(jù)，一經(jīng)查實，將立刻刪除涉嫌侵權(quán)內(nèi)容。

AI
助
手