Ver Mensaje Individual
  #1 (permalink)  
Antiguo 24/06/2013, 08:46
ci2000
 
Fecha de Ingreso: abril-2005
Mensajes: 483
Antigüedad: 19 años
Puntos: 3
Bloquear registro al leer

Hola.

Tengo un programa de facturación hecho con VB6 y base de datos MySQL. El programa funciona en red y desde cada terminal se puede facturar.

Mi problema es que a veces facturan al mismo tiempo y el número del documento se repite para diferentes facturas emitidas desde dos terminales al mismo tiempo.

¿Hay alguna forma de bloquear la tabla (que guarda el último nro. de documento) desde una terminal y que al cambiar el número de documento se desbloquee para que la otra terminal recién lea dicha tabla?

La rutina que uso para leer y guardar el nro. del documento es:

Código:
Dim rsFij As New ADODB.Recordset, Comprobante As Long

rsFij.Open "SELECT * FROM fijos", conn, adOpenDynamic, adLockOptimistic
Comprobante = rsFij!nrobol + 1
conn.Execute "UPDATE fijos nrobol = " & Comprobante
rsFij.Close
Set rsFij = Nothing
Desde ya muchas gracias por las respuestas.
Saludos