关于数据库数据导入导出！

Question

我用ADO控件编了个小程序，想在程序中实现数据的导入与导出！请问如何实现呢？

Answer 1

ADODataSet1.DisableControls;
  ADODataSet2.DisableControls;
  try
    ADODataSet1.First;
    while not ADODataSet1.Eof do
      begin
        ADODataSet2.Insert;
        ADODataSet2.FieldByName('name').Value:=ADODataSet1.FieldByName('name').Value;
        ADODataSet2.FieldByName('work').Value:=ADODataSet1.FieldByName('work').Value;
        ADODataSet2.Post;
        ADODataSet1.Next;
      end;
  finally
    ADODataSet1.EnableControls;
    ADODataSet2.EnableControls;
  end;