Login Password field to press enter to validate and submit

[data808]

I have a login form that after the user types in the password, while still being in the password field, I would like to be able to press enter to act as if clicking the login button.

I got assistance on this before and it had to do with the after update event which worked out ok until I discovered that if the user pressed tab to lose focus on this password field, it would also act like pressing enter. In other words tab would also log you in. I just want enter to be the button to execute the click login button event.



Thanks

[June7]

Perhaps use the Change event. It will fire after each character is typed but should be fast and transparent to the user.

[data808]

That doesn't work. The prompt for wrong password or username comes up on each key press. I need it to be something like this. Btw, 13 = Enter:

If KeyCode = 13 Then

Do all this stuff:

If txtUsername = "user1" And txtPassword = "user1" Then
DoCmd.OpenForm "Splash Screen Load"
ElseIf txtUsername = "user2" And txtPassword = "user2" Then
DoCmd.OpenForm "Splash Screen Load"
ElseIf txtUsername = "admin" And txtPassword = "admin" Then
MsgBox "Access Granted", vbInformation, "Admin Area"
MsgBox "Welcome admin user. Use caution when making changes.", vbInformation, "Admin Permissions"
DoCmd.Close
DoCmd.OpenForm "Main Menu_admin"
ElseIf txtUsername = "user3" And txtPassword = "user3" Then
DoCmd.OpenForm "Splash Screen Load"
Else
MsgBox "Username or Password invalid. Please re-enter Username and Password.", vbExclamation, "Invalid Criteria"
End If

[data808]

Found an easy solution. Go to the login button properties and under the Other tab, change the default property to yes. This will make the button execute on enter. Thanks for the help though.

[June7]

I see, never had need for this behavior, although might be one place I could use it. Was not aware of that property. Learned something new. Thank you.

[data808]

Not a problem at all. Glad to give back what little I can. You've helped me out a lot and I appreciate it. Thanks.