怎么用ADO把access数据导出DB格式数据库？？？高分求解

[Merrybip]

怎么用ADO把access数据导出DB格式数据库？？？高分求解
大哥些帮帮我哈

[hhzqf1980]

用两个ADOCONNECTION
我有代码的

[hhzqf1980]

比如：ACCESS----SQLSERVER：
procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
code,name,insertstr:string;
begin
with adoquery1 do
begin
close;
sql.Clear;
sql.Add('select * from 常熟白雪店');
open;
end ;
for i:=0 to adoquery1.RecordCount - 1 do
begin
code :=adoquery1.Fields[7].AsString ;
code:= copy(code,1,7) ;
with adoquery3 do
begin
close;
sql.Clear;
sql.Add('select * from DianNei1 where ProductBarcode='''+code+'''');
open;
end;
name:= adoquery1.Fields[5].AsString ;
insertstr:='insert into DianNei values('''+code+''','''+name+''',2)';
if adoquery3.RecordCount <= 0 then
begin
with adoquery2 do
begin
close;
sql.Clear ;
sql.Add(insertstr);
execsql;
end;
end;
adoquery1.Next ;
end;
showmessage('OK');
end;

[hhzqf1980]

ADO1--ACCESS
ADO2--SQLSERVER

[Merrybip]

用1个ADOCONNECTION好象是可以实现的
大家有没有做过？

[Merrybip]

用1个ADOCONNECTION可以实现的access->dbf,access->text,sql->dbf 都可以的，就是db不知道怎么导出？

[涩色滴人]

什么叫DB格式？

QQ聊天记录的那个DB也是DB格式呢。

[亮剑_]

DB格式，是指delphi自带那个Paradox吧，
是要做成程序吗，要不要界面？
用ADO联上两个数据库，从Access里select出来，往Paradox里insert就是了，要界面进度条啥的，开个线程搞效果更好一点了