Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

 
 
Herramientas Buscar en Tema Desplegado
  #5  
Antiguo 21-01-2005
vichovi vichovi is offline
Miembro
 
Registrado: may 2003
Ubicación: Huelva (España)
Posts: 59
Poder: 24
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
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 14:31:48.


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