如何生成数据库的上报盘。如何在程序中完成数据库的导出和导入？

Question

可以直接使用SQL SERVER的BCP命令。

Answer 1

备份:
procedure tform1.btnbuckupclick(sender:tobject);
var
   QryTmp:Tquery;
begin
     qrytmp:=Tquery.create(self);
     qryTmp.databasenme:=database1.databasename
     QryTmp.sql.text:='Backup database 数据库 to disk='''+
     你的路径  +'''';  
     QryTmp.execsql;
end; 
恢复:
procedure tform1.btnrestoreclick(sender:tobject);
var
   QryTmp:Tquery;
begin
     qrytmp:=Tquery.create(self);
     qryTmp.databasenme:=database1.databasename;
     database1.connect:=false;//记住，关闭
     QryTmp.sql.text:=' use master '+
                     +' restore database 数据库 to from='''+
                     你的路径  +'''';  
     QryTmp.execsql;
     database1.connect:=true;//
end; end;

Answer 2

控件Pgcsv-1.3
在那里可以得到？多谢指教！