Olá galera boa noite estou com dúvida aqui tenho um formulario de login muito simples mas ele ta aceitando Usuario e senha tanto maiusculo quanto minusculo, é possivel mudar isso? Alguem pode me dar uma forca?
Abaixo o código do form de login
Desde já agradeco.
Abracos
Abaixo o código do form de login
- Código:
Private Sub BT_login_Click()
If IsNull(Me.TXT_user) Then
MsgBox "Please, insert you user", vbInformation, "User required"
Me.TXT_user.SetFocus
ElseIf IsNull(Me.TXT_password) Then
MsgBox "Please, insert you password", vbInformation, "Password required"
Me.TXT_password.SetFocus
Else
If (IsNull(DLookup("[user]", "DB_users", "[user] ='" & Me.TXT_user.Value & _
"' And user_password = '" & Me.TXT_password.Value & "'"))) Then
MsgBox "User and/or password are incorrect"
Else
LogedUser = Me.TXT_user.Value
DoCmd.Close
DoCmd.OpenForm "F_main_menu"
End If
End If
End Sub
Desde já agradeco.
Abracos