如何将SQL中的数据库中的表备份到本机的ACCESS数据库中？

[dacsd]

如何将SQL中的数据库中的表备份到本机的ACCESS数据库中？用ado连接。
另外，如何将MDB中的一个表备份在同一个MDB中，只是表名不同。谢谢

[dacsd]

谢谢！我试试

[zcfzcf001]

var
i,kk:integer;
lis:Tstrings;
Begin
lis:=TStringlist.create;
ADOconn.GetTableName(lis);//ADOconn是Tadoconn;
For i:=0 To lis.count-1 Do
Begin
With ADOQ Do//ADOQ 连的是sql
Begin
close;
sql.clear;
Sql.add('select * from ' +Tables_Sts[i]);
open;
End;
With ADOQ_Ac Do//ADOQ_Ac 连的是access
Begin
close;
sql.clear;
Sql.add('select * from ' +Tables_Sts[i]);
open;
End;
While NOT ADOQ.Eof Do Begin
ADOQ_Ac.Append;//ADOQ_Ac连的是access
For kk:=0 To ADOQ_Ac.FieldCount-1 Do Begin
ADOQ_Ac.Fields[kk]:=ADOQ.Fields[kk];
End;
ADOQ_Ac.Post;
ADOQ.Next;
End;
End;
lis.free;
end;

[zcfzcf001]

ADOconn是TAdoconnection连接sql或access都可以

[zcfzcf001]

用
With ADOQuery1 Do
Begin
Close;
sql.clear;
sql.add('create table 表名 (field1 varchar 30 Not null,field2 varchar 10 Null)');
execsql;
End;
然后打开你创建这个表，把原有的那个表内容加进去就可以了.
另外:用batchmove 好像也可以。


如果以上对你有帮助，记得给我点分哦，我的分要没了!