使用ADO将查询结果从一个MS-Access数据库插入另一个MS-Access数据库

Question

如果有人就如何将查询结果从一个数据库放到另一个数据库给我建议，我将不胜感激。

我可以在一个数据库上执行select查询但是如何在另一个数据库中移动/保存该结果（数据）？我在Rad Studio中使用ADO组件 - 在本地* .mdb和* .accdb数据库上使用Delphi。有小费吗 ？感谢所有人的回复。

Answer 1

您可以使用SQL的特殊语法来选择要复制的数据行，如下所示：

我有一个第一个数据库d:\aaad7\ado\test.mdb，其中包含一个包含一个字符列ATable的Access表ANAME。我还有第二个空数据库d:\aaad7\ado\dest.mdb。

以下代码将表ATable复制到第二个数据库。

  AdoQueryCopy.SQL.Text := 'SELECT * INTO ATable IN "D:\aaad7\ado\dest.mdb" FROM ATable';
  AdoQueryCopy.ExecSql;

其中AdoQueryCopy是一个TADOQuery，其连接字符串指向d:\aaad7\ado\test.mdb。

重要如果您要在ATable中打开d:\aaad7\ado\dest.mdb的副本，则需要先关闭AdoQueryCopy正在使用的连接，否则您需要可能会收到一个错误，抱怨某些ADO对象无法返回多个结果集。我不确定，但我认为这可能是因为AdoQueryCopy.ExecSQL导致使用插入的行创建临时ADO数据集。

可以通过添加ATable子句来选择复制到第二个数据库中WHERE的行。

Answer 2

如果你是delphi的新手 放一个TStringgrid TAdo并从mdb获取所有数据到Gridcells 稍后关闭来自mdb的所有ado连接。并连接到第二个Db .accdb。 idk为什么它是accdb？ 并从网格到accdb启动可调整的插入数据。 如果你的ado无法连接accdb，那么创建第1个mdb的副本并尝试访问以保存为＆＃34; .mdb＆＃34;。 //如果你是专业人士，那就有一个// ADOTable1.SaveToFile（）;