Access读取其他数据库的表

在Access中，我们不但可以遍历读取自己库中的表，也可以读取其他数据库中的表。

获取Access数据表可参阅：《获取Access数据库中所有表或查询的方法》

如果要读取D盘的db.accdb数据库中的表呢？

在相关事件中运行下面的代码：

 dim strPath as string
strPath =D:\db.accdb
Dim db As Database
Dim tbl As TableDef
Set db = OpenDatabase("" & strPath  & "")
For Each tbl In db.TableDefs
     Debug.Print tbl.Name                        
Next 

获取结果如下：