直接用insert into Select
当然要在一个事务中进行上述操作。

解决方案 »

  1.   

    是不是
    Database1.StartTransaction; //启动事务
     
    try 
      //以下简要描述
      delete * from 目标数据库.表1    // 删除原来所有记录
      insert  into  目标数据库.表1  Select * from 源数据库.表1  //复制记录  delete * from 目标数据库.表2    // 删除原来所有记录
      insert  into  目标数据库.表2  Select * from 源数据库.表2  //复制记录  ......  delete * from 目标数据库.表n    // 删除原来所有记录
      insert  into  目标数据库.表n  Select * from 源数据库.表2  //复制记录  Database1.Commit; //提交数据
    except
       Database1.Rollback; //失败后回滚数据
    end;