Access用代碼打開另一箇Access文件

在Access開髮中，我們有時會調(diào)用其他數(shù)據(jù)庫的函數(shù)，做成多層架構(gòu)。

首先是如何用代碼打開另外的Access數(shù)據(jù)文件？

這裡我們通過CreateObject 函數(shù)來打開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的一箇數(shù)據(jù)庫
    
End Sub

運(yùn)行代碼效果圖