Code for Variable password

[TheunsGoosen]

Access beginner
Hi,
At the moment my text box is set to unlock with a fix password, but i would like to allow the user to determine his own password that he enters in "textbox1" and then the MsgBox will respond to his personal password, at the moment my code looks like this.
Thanks
Theuns

Private Sub Command7_Click()
Dim strInput As String, strMsg As String
strMsg = "'Action code'is password protected."
strInput = InputBox(prompt:=strMsg, _
Title:="Emplyee 'action code'")
If strInput = "CLR" Then
Me.EmployeeCode.Locked = False
Else
Me.EmployeeCode.Locked = True
End If
End Sub

 

[Remou]

You will need to create a user table and look it up.