C
cw via AccessMonster.com
This is my code behind a button on my main form:
-------------------------------------------------------------------
On Error GoTo Err_Command10_Click
Dim stDocName As String
Dim stLinkCriteria As String
Dim X As Variant
X = InputBox("Please enter password to open this form:", "PASSWORD Prompt")
If X = "password" Then
stDocName = "frmAdvancedSearchProvisioning"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Else
MsgBox ("Sorry, you cannot Open the Provisioning Form.")
End If
Exit_Command10_Click:
Exit Sub
Err_Command10_Click:
MsgBox Err.Description
Resume Exit_Command10_Click
------------------------------------------------------
When the user clicks on the button, a Pop-Up form asks for Password.
If they type in the password in the box, it displays the actual text.
How do I make the password that the user types in only display the text as
stars using my code above?
Can I format my password as a variable?
Thanks for the help.
cw
-------------------------------------------------------------------
On Error GoTo Err_Command10_Click
Dim stDocName As String
Dim stLinkCriteria As String
Dim X As Variant
X = InputBox("Please enter password to open this form:", "PASSWORD Prompt")
If X = "password" Then
stDocName = "frmAdvancedSearchProvisioning"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Else
MsgBox ("Sorry, you cannot Open the Provisioning Form.")
End If
Exit_Command10_Click:
Exit Sub
Err_Command10_Click:
MsgBox Err.Description
Resume Exit_Command10_Click
------------------------------------------------------
When the user clicks on the button, a Pop-Up form asks for Password.
If they type in the password in the box, it displays the actual text.
How do I make the password that the user types in only display the text as
stars using my code above?
Can I format my password as a variable?
Thanks for the help.
cw