recorrido bdas

[vtdeleon]

Saludos

Podrias usar una sentencia de insercion

Código SQL [-]
/*Primero Borrar la tabla*/
Delete from  tablaB
/*Despues la Insercion*/
insert into tablaB
select * from tablaA

o con Delphi (mas costoso)

Código Delphi [-]
TablaB.EmptyTable;
with tablaA do begin
  Open;
  with not eof() do begin
    tablaB.Insert;
    tablaB.FieldByname('campo1').AsString:=FieldByName('campo1').AsString;
    tablaB.FieldByname('campo2').AsString:=FieldByName('campo2').AsString;
    tablaB.FieldByname('campo1').AsInteger:=FieldByName('campo3').AsInteger;
    tablaB.Post;
    Next;
  end;
end;