Error '94' por un DLookup
Publicado por Aranza (2 intervenciones) el 08/02/2013 18:53:09
Tengo este codigo
al ingresar el expediente (uno correcto) etra sin problema alguno pero cuando introdusco un expediente que no esta el la tabla de Alumnos me sale error '94' y no entra al else, que puedo hacer?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub cmdlogin_Click()
Dim a As String
a = DLookup("exp", "Alumnos", "exp=" & txtExp)
If (a = txtExp.Value) Then
DoCmd.Quit
Else
x = x + 1
MsgBox ("El usuario no puede entrar, solo tienes 3 Intentos")
End If
If (x >= 3) Then
MsgBox ("Expediente Invalido, no te encuentras incrito")
End If
End Sub
al ingresar el expediente (uno correcto) etra sin problema alguno pero cuando introdusco un expediente que no esta el la tabla de Alumnos me sale error '94' y no entra al else, que puedo hacer?
Valora esta pregunta


0