Problema con SetFocus en SQL
Publicado por Wexi000 (1 intervención) el 08/06/2019 03:38:04
Hola!
Aun soy estudiante y tengo problemas aquí
Me seria de mucha ayuda en que alguien me pueda señalar mi error
Gracias!
Aun soy estudiante y tengo problemas aquí
Me seria de mucha ayuda en que alguien me pueda señalar mi error
Gracias!
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
If IsNull(Me.Txt_Usuario) Then
MsgBox "..Texto..", vbInformation, "..Texto..aviso.."
Me.Txt_Usuario.SetFocus
ElseIf IsNull(Me.Txt_Password) Then
MsgBox "..Requerimiento..", cvInformation, "..Requerimiento.."
Me.Txt_Password.SetFocus
Else
If (IsNull(DLookup("[Usuario]", "Usuario", "[Usuario]='" & Me.Txt_Usuario.Value & _
" ' and password = '" & Me.Txt_Password.Valuen & " ' "))) Then
MsgBox "usuario y/o contraseña incorrectos"Me.Txt_Usuario.SetFocus
Else
DoCmd.Close'MsgBox "¡Bienvenido¡", , "Acceso Correcto"
DoCmd.OpenForm "menu"
End If
End If
Valora esta pregunta
0