Password as ******

[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

 

[Keith Wilby]

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

Use the "password" input mask type.

Keith.
www.keithwilby.com

 

[Joan Wild]

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.

 

[Dave]

Thank you both

dave

 

[Keith Wilby]

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.