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

获取结果如下：

更多的Access技巧源码示例，请关注Office交流网：http://www.office-cn.net