[Lazarus-es] zeos-firebird: ejemplo transacciones

José Mejuto joshyfun en gmail.com
Jue Mayo 6 21:27:46 CEST 2010


Hello Claudio,

Thursday, May 6, 2010, 9:22:42 PM, you wrote:

CR>                 while not SQLQuery2.eof do begin
CR>                         consulta:='insert into VTAEXPEN (E,I,F)';
CR>                        
CR> consulta:=consulta+'VALUES(:E,:IDENT,:FECHA)';
CR>                 SQLQuery3.close;
CR>                         SQLQuery3.sql.clear;
CR>                 SQLQuery3.Sql.add(consulta);
CR>                         with SQLQuery3.params do begin
CR>                             ParamByName('E').asstring:='I';
CR> ParamByName('I').asstring:=FieldValues['ident'];
CR> ParamByName('F').asdate:=fieldbyname('fecha_creacion').AsDateTime;
CR>                         end;

Y esto funciona ? Los parametros no son :E, :IDENT y :FECHA ?

-- 
Best regards,
 José





More information about the Lazarus-es mailing list