Como importar datos para anexarlos a mi BD

[JoAnCa]

Ya encontre como anexar datos de otra tabla en otro mdb

Código Delphi [-]

 BDOrigen:='NombreTabla';
 BDDestino:='NombreMDB.NombreTabla';

.....

   with ADOQuery1.SQL do
     begin
      Clear;
      Add('INSERT INTO ' + BDDestino + '(Campo1, Campo2, Campo3, etc)');
      Add('SELECT  Campo1, Campo2, Campo3, etc');
      Add('FROM ' + BDOrigen);
      Add('WHERE ' + CadFiltroSQL);
     end;
    ADOQuery1.ExecSQL;
end;