Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Firebird e Interbase (https://www.clubdelphi.com/foros/forumdisplay.php?f=19)
-   -   migrando a firebird (https://www.clubdelphi.com/foros/showthread.php?t=13297)

JoseQ 13-08-2004 01:43:38

migrando a firebird
 
Buenas, estoy empezando con FireBird (primera impresion --> simplemente genial !!! xD), para empezar a conocer como funciona me propuesto migrar una base de datos bastante sencilla k tenia en acces, la estructura de las tablas ya la tengo hecha, pero al intentar pasar los datos de la tabla antigua a la nueva no lo hace bien, me explico, solo me copia los 145 primeros registros y el antepenultimo :? aqui dejo el codigo que utilizo para volcar los datos

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
adotable1.Open;
ibtable1.Open;
while not adotable1.Eof do
begin
ibtable1.Insert;
ibtable1.FieldByName('IDENTIFICADOR').AsInteger:=adotable1.FieldByName('ID').AsInteger;
ibtable1.FieldByName('NOMBRE').AsString:=adotable1.FieldByName('TITULO').AsString;
ibtable1.FieldByName('SERIAL').AsString:=adotable1.FieldByName('S/N').AsString;
ibtable1.FieldByName('UBICACION').AsInteger:=adotable1.FieldByName('UBICACION').AsInteger;
ibtable1.FieldByName('CATEGORIA').AsInteger:=strtoint(adotable1.FieldByName('CATEGORIA').AsString);
ibtable1.FieldByName('SOPORTE').AsInteger:=adotable1.FieldByName('SOPORTE').AsInteger;
ibtable1.Post;
adotable1.next;
IBTRANSACTION1.CommitRetaining;
end;
end;

al ejecutar me da el siguiente error :

exception class EconvertError with message "" is not a valid integer value
espero que alguien me pueda echar una mano, gracias.

JoseQ 13-08-2004 01:49:47

ejem, bueno, retiro todo lo dicho, ya esta solucionado, faltaba un valor en un registro


La franja horaria es GMT +2. Ahora son las 08:24:00.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi