Password programming

R

Ranjith Kurian

Hi all

The below code pop up the input box asking password, and the password is
visible to all, is it possible to convert the character to asterisk.



Private Sub Command1_Click()
Dim strPasswd
strPasswd = InputBox("Enter Password", "Restricted Form")
If strPasswd = "" Or strPasswd = Empty Then
MsgBox "No Input Provided", vbInformation, "Required Data"
Exit Sub
End If
If strPasswd = "ranjit" Then
DoCmd.OpenForm "PROD", acNormal
Else
MsgBox "Sorry, you do not have access to this form", _
vbOKOnly, "Important Information"
Exit Sub
End If
End Sub
 
J

Jack Leach

I wouldn't know how to do this using InputBox, but if you were to make your
own popup form you can set the Password property of the textbox to true and
it will show * but let you program based on the actual value.

hth
--
Jack Leach
www.tristatemachine.com

"I haven''t failed, I''ve found ten thousand ways that don''t work."
-Thomas Edison (1847-1931)
 
J

Jack Leach

you can set the Password property of the textbox

I have no idea what I'm talking about.

How about setting the Input Mask to Password instead...

Sorry about that

--
Jack Leach
www.tristatemachine.com

"I haven't failed, I've found ten thousand ways that don't work."
-Thomas Edison (1847-1931)
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top