RE:URGENTE!!ERROR 3260 AYUDENME PLEASE COLEGAS
Publicado por Vic (4 intervenciones) el 01/02/2005 23:39:04
El problema está en que un usuario está bloqueando parte de la tabla mientras guarda algun dato, y otro usuario está intentado acceder a esa parte de la tabla para guardar otro.
La solucion más elegante es usar una rutina de manipulacion de errores. Despues de tu definicion:
Set CEDORI = DATA.OpenRecordset("CEDORI", dbOpenTable)
supongo que usarás una de las siguientes instrucciones:
CEDORI.Edit o CEDORI.AddNew
dependiendo si quieres editar un registro existente o añadir uno nuevo.
Pues antes de cualquiera de estas dos instrucciones, deberias añadir:
On error goto ControlErrores
Y al final del codigo del evento:
ControlErrores:
if Err=3260
MsgBox "Está intentando modificar un registro abierto por otro usuario. Inténtelo más tarde.", vbCritical + vbOKOnly, "Registro bloqueado"
End if
Con esto conseguiras que la aplicacion no se cierre, y cuando el usuario lea el mensaje, lo intentará otra vez, y posiblemente, para entonces la tabla ya estará desbloqueada.
Si algo no te queda claro, mandame un mensaje
Suerte
La solucion más elegante es usar una rutina de manipulacion de errores. Despues de tu definicion:
Set CEDORI = DATA.OpenRecordset("CEDORI", dbOpenTable)
supongo que usarás una de las siguientes instrucciones:
CEDORI.Edit o CEDORI.AddNew
dependiendo si quieres editar un registro existente o añadir uno nuevo.
Pues antes de cualquiera de estas dos instrucciones, deberias añadir:
On error goto ControlErrores
Y al final del codigo del evento:
ControlErrores:
if Err=3260
MsgBox "Está intentando modificar un registro abierto por otro usuario. Inténtelo más tarde.", vbCritical + vbOKOnly, "Registro bloqueado"
End if
Con esto conseguiras que la aplicacion no se cierre, y cuando el usuario lea el mensaje, lo intentará otra vez, y posiblemente, para entonces la tabla ya estará desbloqueada.
Si algo no te queda claro, mandame un mensaje
Suerte
Valora esta pregunta
0