<<< 返回 access911.net 编程静态资料库索引页

如何调用/引用其他数据库(mdb/mde)的函数?

 

作者:cg1  摘自:access911.net  录入:cg1  时间:2002-11-25  浏览人次:1331


专题地址:http://access911.net/fixhtm/77FAB21E.htm 如果需要更详细的评论或说明,请点击该地址。

 

简述:如何调用/引用其他数据库(mdb/mde)的函数?《VBA》

 


Public Sub DeclareDLL()
    '曾经有人跟我说用FeatureInstall ,
    '和Public Declare Sub GetScanImg Lib "d:\学生成绩\同学通讯录\scanimg.dll" ()
    '但结果无效,请您帮助看看
    Dim ExistDll(10, 2) As String, i As Integer
    Dim PathName As String
    PathName = Application.CurrentProject.Path & "\"   '根据你的实际情况可以更改

    ExistDll(0, 0) = "工程名称"
    ExistDll(0, 1) = "工程文件名.mdb"
    ExistDll(1, 0) = "ADODB"
    ExistDll(1, 1) = "msado25.tlb"
    ExistDll(2, 0) = "DAO"
    ExistDll(2, 1) = "dao360.dll"
    ExistDll(3, 0) = "ADOX"
    ExistDll(3, 1) = "msadox.dll"
    '这里我的数据库中需要引用4个,你可以按你的实际情况添加

    For i = .....................
...........

资料库随时有更新,欲查看最新详情请单击专题地址http://access911.net/fixhtm/77FAB21E.htm

 


上一篇:如何自动注册dll动态链接库?

下一篇:如何弥补access2000在帮助搜索功能方面的不足?

2017年2月22日生成静态资料