Question

在delphi中如何从一个表批量添加多条记录到另一个表，两个表的字段不完全相同

如果有上万条记录，要求比较快速的添加

Answer 1

设置好各控件正确连接数据库。。在两个表结构和数据类型都想同的情况下。
var
sql:string;
sql:='insert into Tab1 ';
sql:='select * from Tab2'
with adoquery1 do
begin
close;
sql.clear;
sql.add(sql);
execsql;
end;

追问

我用的是BDE，两个表的字段并不完全相同，如何能高效快速的插入记录

Answer 2

采用 BatchUpdate 会快一些

追问

采用本地数据

追答

细节就信息比较多

看你用什么本地数据库了

一般用Access 的话用ADO连比较方便 且可以用BatchUpdate!

如果是 DBF之类数据库的话用BDE明显效率要高很多

一次大量提交数据还跟你的索引设计有关，如果不做索引也要快很多

要我弄就只有以下几种方式提速了

1. 选择正确的数据库引擎
2. 尽量不用索引，或事后再生成索引
3. 如有可能用BatchUpdate
4.更新时禁用界面显示，或只提示一个状态
5. 对DBF这等简单的数据库完全可以直接在文件I/O上编程