Password thingy

[Chris 655321]

I've set up a password protect for a feature of the database I'm working on. How do I make the inputted password text show up as stars instead of text. my code is this:

Private Sub Command14_Click()
On Error GoTo Err_OpenForm

Dim Mypwd As String


Mypwd = InputBox("Enter Your Password")


If Mypwd <> "j2mechanical" Then
Exit Sub
Else
DoCmd.OpenForm "Subform2"
End If

Exit_OpenForm:
Exit Sub
Err_OpenForm:
MsgBox Err.Number & " ; " & Err.Description
Resume Exit_OpenForm


End Sub

[JHausmann]

You'll need to roll your own form that has a text field for password. On your text field, there is a "password character" property, place an '*' there.

[Edited by JHausmann on 08-09-2000 at 01:21 PM]

[Chris 655321]

Could you explain a little more?