[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