office交流网--QQ交流群号

Access培训群:792054000         Excel免费交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

Access用代码打开另一个Access文件

2017-10-25 17:15:00
tmtony8
原创
2882

在Access开发中,我们有时会调用其他数据库的函数,做成多层架构。

首先是如何用代码打开另外的Access数据文件?


这里我们通过CreateObject 函数来打开mdb(accdb)文件

Public Sub openAccess()
    Dim acc As Access.Application
    Set acc = CreateObject("access.Application") '
    acc.OpenCurrentDatabase "C:\Documents and Settings\Administrator\桌面\罗斯文1.accdb", True ' 打开APP的一个数据库
    
End Sub


运行代码效果图

分享