Password as ******

  • Thread starter Thread starter Dave
  • Start date Start date
D

Dave

Access 2003
I use this code when opening a form.

Private Sub cndAdminArea_Click()

Dim password As String
Dim Answer As String

password = "admin"
Answer = InputBox("Enter Admin Password: ", "Admin Confirmation",
"Enter Password")
If Answer = password Then
DoCmd.OpenForm "frmUpdate"
Else
MsgBox "You have not entered the correct password" & vbLf & _
"Please check the password and try again OR contact the real
Administrator"
Exit Sub
End If
End Sub

Is there any way to have it be ****** when they type in the password (in
case someone is looking over their shoulder)?

Any help here will be appreciated.

Thanks in advance
dave
 
You can't set that using the InputBox function. Instead create your own form with a textbox to prompt for the password. You can then set the input mask on the textbox to 'password' as Keith suggests.
 
You can't set that using the InputBox function. Instead create your own
form with a textbox to prompt for the password. You can then set the input
mask on the textbox to 'password' as Keith suggests.


That's another one I read way too quickly, I didn't realise he was using an
input box - d'oh!

Keith.
 
Back
Top