以Oracle为例说明如何通过ODBC将数据库中的指定表导出到MDB数据库。

最新推荐文章于 2023-04-16 16:32:23 发布

rappercn

最新推荐文章于 2023-04-16 16:32:23 发布

阅读量1.8k

点赞数

CC 4.0 BY-SA版权

文章标签：数据库 oracle database table dao c

本文链接：https://blog.youkuaiyun.com/rappercn/article/details/18830

博客介绍了将Oracle数据库备份到MDB文件的方法。原理是在MDB文件建目标表的Link表，复制表数据后删除Link表。实现时需设置Oracle数据源，通过DAO对象操作，完成表的链接、复制和删除，不通过循环，备份速度较理想。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

原理：
先在MDB文件中建立目标表的Link表，然后用本地操作MDB数据库的方式复制一个表的全部或者部分，删除Link表。
至此，已经完成数据库的备份，此方法不通过循环，速度还算理想。

实现：
首先假设ODBC中设置了一个Oracle的数据源，其数据库服务名为LinkDataBase，DSN为ORAODBC，用户名是Administrator，密码Password，把表Oracle_Table导入到C:/Temp.mdb的MDB_DATABASE，中间步骤链接表的名称为TempLink

    Dim DB As DAO.Database         '数据库对象，DAO3.6
    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

至此完成