Pregunta: | 54870 - COMO BLOQUEAR UN REGISTRO DE ACCESS CON VB5 |
Autor: | Jose Moreno |
Estoy trabajando con access y VB5, tengo una tabla que me da numeros, seria como un contador, y un formulario que los pide, quiero que al pedir el numero me bloque el campo para que nadie pueda entrar hasta que no acepte el numero que me ha dado, pero no lo consigo, ¿Como puedo hacerlo? Aqui esta el codigo que tengo Set Megacmd = New ADODB.Connection Set rst = New ADODB.Recordset Megacmd.Open CurrentProject.Connection Megacmd.BeginTrans strsql = "SELECT DoyNumeros.Numero, DoyNumeros.IdClave From DoyNumeros WHERE (((DoyNumeros.IdClave)=" & CmbClave.Value & "))" rst.Open strsql, Megacmd, adOpenDynamic, adLockOptimistic, adCmdText If rst.EOF = False Then txtNUM.Value = rst.Fields(0) rst.Fields(0) = rst.Fields(0) + 1 Else MsgBox "Este dato no existe" End If Después tengo un botón para seguir o terminar, si termino pongo esto: Megacmd.RollbackTrans Megacmd.Close Y si sigue: rst.Update Megacmd.CommitTrans Megacmd.Close ¿Alguien me puede ayudar? Gracias |