用select into 语句 导入数据库

Question

各位大虾！我想把e:\db2里的表2 导入到e:\db1 里的表1去，写了如下代码：
 
procedure Tjibenct.N8Click(Sender: TObject);
begin
 zaizhirenyuanmingxibiao.ADOQueryzaizhirenyuanmingxibiao.Close;
 zaizhirenyuanmingxibiao.ADOQueryzaizhirenyuanmingxibiao.SQL.Clear;
 zaizhirenyuanmingxibiao.ADOQueryzaizhirenyuanmingxibiao.SQL.Add('insert into 表1 in "e:\db1.mdb" select * from 表2 in "e:\db2.mdb"');
 zaizhirenyuanmingxibiao.ADOQueryzaizhirenyuanmingxibiao.Open;
end;
end.
总是运行不了 那里写错了吗？

Answer 1

首先你的ADOQueryzaizhirenyuanmingxibiao必须连接一个数据库，比如连接的是db1吧，sql.text := 'insert into 表1 select * from 表2 in '+QuotedStr('e:\db2.mdb');