如何知道引用的相對應的名稱?
我想引用在引用對話框沒有的引用,但又不知道它的名稱,不知有什麼幫助呢?
如:microsoft Office 10.0 Object Library在對話框沒有,那要浏覽它,請問它相對應的名稱是什麼呢?
還有如果看到別的人數據庫有些引用,而在我的數據庫的引用對話框上找不到的呢?
回答:
用以下代碼顯示出現在已經引用的所有類庫的名稱
Function displayAllDll()
Dim r As Reference
On Error Resume Next
For Each r In References
Debug.Print "類庫名:" & r.name
Debug.Print "類庫文件絕對路徑:" & r.FullPath
Debug.Print "是否內建:" & r.BuiltIn
Debug.Print "類庫版本號" & r.Minor
Next
End Function
得到類庫名後你可以直接使用“後引用”的方式來建立需要的對象,比如
Dim rs
Set rs = CreateObject("adodb.recordset")