关于如何合并mdb格式文件的问题

类似的一个程序：

Dim dbs As Database

Set dbs = OpenDatabase("Item_Bank.mdb")

dbs.Execute "INSERT INTO Item_Bank5 SELECT * FROM Item_Bank4,Item_Bank3,Item_Bank2,Item_Bank1"

dbs.Close

Item_Bank是你要写入的数拿迟据库的名称旁敏羡，Item_Bank4,Item_Bank3,Item_Bank2,Item_Bank1是你要合并的数据库运拍。

追问：

关键是mdb文件有70多个、

问题要明确，是把一个态蚂雀MDB中的物历图层合并，还是把不同MDB中帆早的图层放到一个MDB中。同一个图层的合并，在ArcCatalog中用Load菜单。不同的图层放到一个MDB中，在ArcCatalog中直接拷贝粘贴就行了。

---