原理
先在MDB文件中建立目標表的Link表
然後用本地操作MDB數據庫的方式復制一個表的全部或者部分
刪除Link表
至此
已經完成數據庫的備份
此方法不通過循環
速度還算理想
實現
首先假設ODBC中設置了一個Oracle的數據源
其數據庫服務名為LinkDataBase
DSN為ORAODBC
用戶名是Administrator
密碼Password
把表Oracle_Table導入到C:\Temp
mdb的MDB_DATABASE
中間步驟鏈接表的名稱為TempLink
Dim DB As DAO
Database
數據庫對象
DAO
Dim tbLink As DAO
TableDef
表對象
打開備份目標MDB
Set DB = OpenDatabase(
C:\Temp
mdb
)
以下開始創建Link表
Set tbLink = DB
CreateTableDef(
TempLink
)
設置連結字符串
tbLink
Connect =
ODBC;DATABASE=LinkDataBase;UID=Administrator;PWD=Password;DSN=ORAODBC
tbLink
SourceTableName =
LinkDataBase
Oracle_Table
DB
TableDefs
Append tbLink
復制表(可加條件)
DB
Execute
select * into MDB_DATABASE from TempLink
刪除鏈接表
DB
TableDefs
Delete TempLink
From:http://tw.wingwit.com/Article/program/Oracle/201311/18615.html