Access 中如何知道引用的相对应的名称?

来源:互联网 发布:淘宝店铺怎么装修2017 编辑:程序博客网 时间:2024/05/18 20:11
<script type="text/javascript"><!--google_ad_client = "pub-2947489232296736";/* 728x15, 创建于 08-4-23MSDN */google_ad_slot = "3624277373";google_ad_width = 728;google_ad_height = 15;//--></script><script type="text/javascript"src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>
<script type="text/javascript"><!--google_ad_client = "pub-2947489232296736";/* 160x600, 创建于 08-4-23MSDN */google_ad_slot = "4367022601";google_ad_width = 160;google_ad_height = 600;//--></script><script type="text/javascript"src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>

Access 中如何知道引用的相对应名称?

Access911.net/index.asp?board=4&recordid=71FAB51E16DCEDF3">

 

简述:

如何知道引用的相对应名称?
我想引用在引用对话框没有的引用,但又不知道它的名称,不知有什么帮助呢?
如:microsoft Office 10.0 Object Library在对话框没有,那要浏览它,请问它相对应名称是什么呢?
还有如果看到别的人数据库有些引用,而在我的数据库的引用对话框上找不到的呢

 

 

问题:

如何知道引用的相对应名称?
我想引用在引用对话框没有的引用,但又不知道它的名称,不知有什么帮助呢?
如: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")

 

Access911.net">http://Access911.net 站长收藏<script type="text/javascript"><!--google_ad_client = "pub-2947489232296736";/* 728x15, 创建于 08-4-23MSDN */google_ad_slot = "3624277373";google_ad_width = 728;google_ad_height = 15;//--></script><script type="text/javascript"src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>
<script type="text/javascript"><!--google_ad_client = "pub-2947489232296736";/* 160x600, 创建于 08-4-23MSDN */google_ad_slot = "4367022601";google_ad_width = 160;google_ad_height = 600;//--></script><script type="text/javascript"src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>
原创粉丝点击