有关数据库的导入、导出的问题，请高手帮忙解决？？

我近阶段要编写对数据库的数据导出成文件，然后再把导出的文件导入到数据库中，下面是我写的有关的测试例子。导出文件很顺利，没有问题；但在导入的时候出现了问题，就是在导入完一个文件后，接着导入第二个文件、第三个文件时，出现一个异常。并且第一个导入的文件，在数据库中没有导入记录。我不知道这是什么问题？请高手帮忙！！
下面是我的例子代码：
procedure TForm1.Button1Click(Sender: TObject);
begin
  ADOQuery1.Close;
  ADOQuery1.SQL.Clear;
  ADOQuery1.SQL.Text:='select * from test';
  ADOQuery1.Open;
  ADOQuery1.SaveToFile('c:\1234.txt');
  ADOQuery1.Close;
  ADOQuery1.Close;
  ADOQuery1.SQL.Clear;
  ADOQuery1.SQL.Text:='select * from test1';
  ADOQuery1.Open;
  ADOQuery1.SaveToFile('c:\12345.txt');
  ADOQuery1.Close;
  ADOQuery1.Close;
  ADOQuery1.SQL.Clear;
  ADOQuery1.SQL.Text:='select * from test2';
  ADOQuery1.Open;
  ADOQuery1.SaveToFile('c:\123456.txt');
  ADOQuery1.Close;
  showmessage('导出数据成功！');
end;procedure TForm1.FormCreate(Sender: TObject);
begin
  if not  ADOConnection1.Connected then
    ADOConnection1.Open;
end;procedure TForm1.Button2Click(Sender: TObject);
begin
  ADOQuery2.Close;
  ADOQuery2.SQL.Clear;
  ADOQuery2.SQL.Text:='select * from test';
  ADOQuery2.Open;
  ADOQuery2.LoadFromFile('c:\1234.txt');
  ADOQuery2.Close;
  ADOQuery2.Close;
  ADOQuery2.SQL.Clear;
  ADOQuery2.SQL.Text:='select * from test1';
  ADOQuery2.Open;
  ADOQuery2.LoadFromFile('c:\12345.txt');
  ADOQuery2.Close;
  ADOQuery2.Close;
  ADOQuery2.SQL.Clear;
  ADOQuery2.SQL.Text:='select * from test2';
  ADOQuery2.Open;
  ADOQuery2.LoadFromFile('c:\123456.txt');
  ADOQuery2.Close;
  showmessage('导入数据成功！');
end;
以上代码中数据库为SQL Server数据库，test、test1、test2三个表结构完全相同，你们可以自己试一下。快点帮我解决一下吧！！