update a field in a record

[Dsperry101 via AccessMonster.com]

IHello all,
I have a table that has a field tblNewMwo.Sign_Off_by_Request that I want
to enter "Signed off" in the field when a field on a form is clicked.

Private Sub Any_Click()
Dim qrystr As String
qrystr = "Update tblNewMwo SET tblNewMwo.Sign_0ff_by_Request = 'Signed
off' WHERE tblNewMwo.Work_Order_Number = txtWorkOrderNumber"
DoCmd.RunSQL qrystr

End Sub
says record not updateable ??

 

[Allen Browne]

Could you not place the text box on your form (hidden if you wish), and then
just use:
Me.[Sign_0ff_by_Request] = 'Signed off'

If you really want to use an Update query, you will need to make sure there
are no uncommitted edits in the current form (to avoid concurrency issues),
and concatenate the number into the string:

qrystr = "Update tblNewMwo SET tblNewMwo.Sign_0ff_by_Request = 'Signed off'
WHERE tblNewMwo.Work_Order_Number = "& Me.txtWorkOrderNumber

 

[Dsperry101 via AccessMonster.com]

Tried changing a textbox with data.control source set to Sign_0ff_by_Request ,
it gives error "recordset not updateable"

Could you not place the text box on your form (hidden if you wish), and then
just use:
Me.[Sign_0ff_by_Request] = 'Signed off'

If you really want to use an Update query, you will need to make sure there
are no uncommitted edits in the current form (to avoid concurrency issues),
and concatenate the number into the string:

qrystr = "Update tblNewMwo SET tblNewMwo.Sign_0ff_by_Request = 'Signed off'
WHERE tblNewMwo.Work_Order_Number = "& Me.txtWorkOrderNumber

IHello all,
I have a table that has a field tblNewMwo.Sign_Off_by_Request that I

[quoted text clipped - 9 lines]

End Sub
says record not updateable ??