Hola amigo tengo una consulta tengo esta instrucion pegada a un boton
Código Delphi
[-] Begin
ADOQueryUpdate.Open;
ADOQueryUpdate.SQL.ADD('update tiket set Estatus = :Estatus,Usuario= :Usuario WHERE Item = :Item');
ADOQueryUpdate.Parameters.ParamByName ('Estatus').Value := 'OLD';
ADOQueryUpdate.Parameters.ParamByName ('Usuario').value := Label4.Caption;
ADOQueryUpdate.Parameters.ParamByName ('Item').value := Label3.Caption;
ADOQueryUpdate.ExecSQL;
ShowMessage ('LO GRABE');
begin
ADOQuery1.Close;
ADOQuery1.Open;
begin
Label1.Caption := 'A00' + ADOQuery1.fieldbyname('Item').asstring;
Label3.Caption := ADOQuery1.fieldbyname('Item').asstring;
Image3.Visible := true;
ShowMessage ('SIGUIENTE');
end
Cuando lo ejecuto por primera vez me funciona perfecto pero al ejecutarlo por segunda vez me da error, posiblemente hay algo que esto dejando abierto o cerrado o no lo se pero no me deja avanzar,