Password

[pleg12345]

I have completed a password using the code below. However when a user inputs the password you can see what they are typing. I want it so it just shows ***** . Can somebody please help?

Dim strPasswd
strPasswd = InputBox("Enter Password", "Restricted Access")

If strPasswd = "" Or strPasswd = Empty Then
Msgbox "No input Provided", vbInformation, "Required Data"
Exit Sub
End If

If strPasswd = "Password" Then
Docmd.Openform "call" acNormal
Else
Msgbox "Sorry, you do not have access to this form" vbOKOnly, "Important Information"
Exit sub
End if

 

[T111]

Hi,

Bring up the text box properties and go to the data tab. Then change the input mask to password. That should display "*" when user enters information into the textbox.

 

[T111]

http://www.utteraccess.com/forums/access/access10514.html

 

[pleg12345]

can you not do it with message box promts then?

is there another simple way to complete a query then?