以O(shè)racle為例說明如何通過ODBC將數(shù)據(jù)庫中的指定表導(dǎo)出到MDB數(shù)據(jù)庫

2024-08-29 13:38:21

字體：大中小

供稿：網(wǎng)友

　　原理：
　　先在MDB文件中建立目標表的Link表，然后用本地操作MDB數(shù)據(jù)庫的方式復(fù)制一個表的全部或者部分，刪除Link表。
　　至此，已經(jīng)完成數(shù)據(jù)庫的備份，此方法不通過循環(huán)，速度還算理想。
　　
　　實現(xiàn)：
　　首先假設(shè)ODBC中設(shè)置了一個Oracle的數(shù)據(jù)源，其數(shù)據(jù)庫服務(wù)名為LinkDataBase，DSN為ORAODBC，用戶名是Administrator，密碼PassWord，把表Oracle_Table導(dǎo)入到C:/Temp.mdb的MDB_DATABASE，中間步驟鏈接表的名稱為TempLink
　　
　　 Dim DB As DAO.Database '數(shù)據(jù)庫對象，DAO3.6
　　 Dim tbLink As DAO.TableDef '表對象
　　 ' 打開備份目標MDB
　　 Set DB = OpenDatabase("C:/Temp.mdb")
　　 ' 以下開始創(chuàng)建Link表
　　 Set tbLink = DB.CreateTableDef("TempLink")
　　 ' 設(shè)置連結(jié)字符串
　　 tbLink.Connect = "ODBC;DATABASE=LinkDataBase;UID=Administrator;PWD=Password;DSN=ORAODBC"
　　 tbLink.SourceTableName = "LinkDataBase.Oracle_Table"
　　 DB.TableDefs.Append tbLink
　　 ' 復(fù)制表（可加條件）
　　 DB.Execute "select * into MDB_DATABASE from TempLink"
　　 ' 刪除鏈接表
　　 DB.TableDefs.Delete TempLink

上一篇：Oracle DBA應(yīng)該定期做什么

下一篇：Oracle9i 數(shù)據(jù)庫(第二版)的高級選項