Ver Mensaje Individual
  #2  
Antiguo 06-06-2008
Avatar de BlueSteel
[BlueSteel] BlueSteel is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Concepción - Chile
Posts: 2.310
Reputación: 26
BlueSteel Va por buen camino
Cool

Hola pmtzg...

estas seguro de esto

Cita:
Empezado por pmtzg Ver Mensaje
estoy haciendo un transpaso de bases de datos de :
Paradox a Delphi con el siguiente codigo :
por que creo que estas realizando un traspaso de tablas Paradox a Firebird por intermedio del delphi

Cita:
transporto 7 tablas y pasan correctamente y completas
pero esta tabla es la mas pesada y es ahi donde que queda
alguien me podria dar una orientada que hacer ... Gracias
y por que no lo haces a pulso.... bueno, solo para probar... y seria como traspasar campo por campo... por que puede que el problema sea el contenido de un campo específico

realiza algo así..

Código Delphi [-]
     With Tabla_Paradox Do
     Begin
         First; 
          While Not Eof Do 
          Begin

               Tabla_Firebird.SQL.Clear;
               Tabla_Firebird.SQL.Add('Insert Into "Tabla" ("Campo1", "Campo2", ...., "Campon")');
               Tabla_Firebird.SQL.Add('Values (:P1, :P2,...:Pn)');
               Tabla_Firebird.Params[0].AsString  := Tabla_Paradox ['campo1'];
               Tabla_Firebird.Params[1].AsInteger := Tabla_Paradox ['campo2'];
               Tabla_Firebird.Params[n].AsInteger := Tabla_Paradox ['campon'];               
               Tabla_Firebird.ExecSQL;
               Transactio_Firebird.Commit;
               Tabla_Paradox.Next;
          End;
     End;

Lo anterior esta realizado con tablas de DBase e Interbase,, y me funciona super... prueba este método... por que si el problema es el contenido de un campo, te puede saltar el error correspondiente

Salu2
__________________
BlueSteel
Responder Con Cita