I created a table and query with the following fields (qryUser):
I have a frmLogin to select Employee and enter the password:
Private Sub Command12_Click()
'Check for correct password
If Me.txtPassword = Me.cboUser.Column(2) Then
DoCmd.Close acForm, "frmLogin", acSaveNo
MsgBox "Password does not match, please re-enter!", vboOkOnly + vbExclamation
Me.txtPassword = Null
I created a form for changing the password - button on frmLogin opens frmPasswordReset
Select Employee box and text boxes to enter current password and new password twice.
Private Sub btnSave_Click()
If Me.pwFirst = Me.pwSecond And Len(Me.pwFirst) & "" > 0 Then
MsgBox "New Password entries do not match. Re-enter ." _
& vbCrLf & "and please try again.", vbCritical, _
"Re-enter both Passwords."
I have most of it, but I am trying to bind employee name selected on frmlogin to employee name/old password on the frmPasswordReset form then get it to change the password on qryUser. Can you help?