Ver Mensaje Individual
  #5  
Antiguo 21-01-2005
vichovi vichovi is offline
Miembro
 
Registrado: may 2003
Ubicación: Huelva (España)
Posts: 59
Reputación: 22
vichovi Va por buen camino
Locura transaccional

Hola a todos y perdón Roman por la tardanza, cambie las tablas a InnoDB para que me soporte el tema de las transacciones y en este tiempo (cada vez que tengo algo de tiempo y me acuerdo :-)) he intentando realizar transacciones sin exito (la ayuda de los zeos es bastante escueta).

Alguien podria decirme que estoy haciendo mal:

Código:
procedure TForm1.BitBtn1Click(Sender: TObject);
begin

  msqConsulta.Close;
  msqConsulta.Sql.Clear;
  msqConsulta.Sql.Add('select * from bb');
  msqConsulta.Open;
  mstTransaccion.StartTransaction;
  msqConsulta.Append;
  msqConsulta['bb1']:=5;
  try
    msqConsulta.Post;
  except
    mstTransaccion.Rollback;
    showmessage('Error');
    exit;
  end;

  msqConsulta.Close;
  msqConsulta.Sql.Clear;
  msqConsulta.Sql.Add('select * from cc where cc1=5');
  msqConsulta.open;
  try
    msqConsulta.Delete;
    mstTransaccion.Commit;
  except
    mstTransaccion.Rollback;
    showmessage('Error 2');
    exit;
  end;

  showmessage('OK');
end;
Es un poco tonto el ejemplo pero ni aun asi va...

Si algun alma caritativa me dijera que falla, o un ejemplo, o una página con información, o lo que sea....

Un saludo y gracias a todos por vuestro tiempo.
__________________
Vivir a la deriva,
sentir,
que no se que hago aki...

(Extremo)
Responder Con Cita