Update query error

[dccjr]

I have the following sub to change the users passwork from the default to their entered one. However, when I run through the procedure I get a pop-up "Enter Parameter Value". I am not sure where it is coming from. It is suppose to get the new password from a textbox. Here is what I have:

Private Sub cmdChangePassword_Click()
Dim strInsertPassSQL As String
    If Me.tbxNewPass1 <> Me.tbxNewPass2 Then
        MsgBox ("Paswords do not match. Please try again.")
        Me.tbxNewPass1.Value = ""
        Me.tbxNewPass2.Value = ""
        Me.tbxNewPass1.SetFocus
    Else
        strInsertPassSQL = "UPDATE Secure SET [Password] =" & Me.tbxNewPass1.Value & " WHERE [EmployeeNo] =" & Me.tbxUserEmpNo.Value & ""
        DoCmd.RunSQL strInsertPassSQL
    End If
End Sub

Could one of you guys or gals point me in a direction?hanks.

[pbaldy]

Well, this should help:

http://www.baldyweb.com/ImmediateWindow.htm

i would assume password is a text field so would require delimiters. The parameter prompt should tell you what it's looking for too.

[dccjr]

The update query looks correct. What parameter could it want?

This is the output from the debug:

UPDATE Secure SET [Password] =johnsmith WHERE [EmployeeNo] =987654

Anything else come to mind?

[dccjr]

By the way, johnsmith is the only other thing in the pop-up.

[pbaldy]

Like I said, the text value needs delimiters, like:

strInsertPassSQL = "UPDATE Secure SET [Password] ='" & Me.tbxNewPass1.Value & "' WHERE [EmployeeNo] =" & Me.tbxUserEmpNo.Value & ""

[dccjr]

That was it. Thank you very much.

[pbaldy]

Happy to help.