SQL Update Recordset Problem

[Jeremiah31]

I have a form called frmRTVEditSkuDescription with three unbound controls called
cboSkuSearch
txtSku
txtdescription

I’m using an SQL statement to populate txtSku and txtdescription based on criteria selected in the cboSkuSearch control. Search works fine. The problem is if I change the value in txtdescription, the update statement (below) won’t reflect the change value. Can someone please help me?

Private Sub Command26_Click()
On Error GoTo Err_Command26_Click
Dim strSQL As String
Dim db As Database
Dim rs As Recordset

Set db = CurrentDb

strSQL = "UPDATE tblSku SET txtSku = '" & Replace(Me.txtSKU, "'", "''") & "'" _
& ", txtdescription = '" & Replace(Me.txtDescription, "'", "''") & "'" _
& " WHERE 'cboskuSearch' = '" & Me.txtSKU & "'"
CurrentDb.Execute strSQL, dbFailOnError
MsgBox strSQL

MsgBox "Changes made to Sku " & UCase(Me!cboSkuSearch) & " have been saved."

Exit_Command26_Click:
Exit Sub

Err_Command26_Click:
MsgBox Err.Description
Resume Exit_Command26_Click
End Sub

 

[kjv1611]

From what code you have posted, you are not looking at txtdescription, other than to update it. So, if you change it to "yankee doodle dandy", Access doesn't care.

If you want the query or recordset to be updated after you change txtdescription, then you'll need to put another query in the txtdescription_AfterUpdate() event.

--

"If to err is human, then I must be some kind of human!" -Me

 

[Jeremiah31]

Ok, I understand. What type of query should I use in the After_update event?

 

[kjv1611]

I would think you would just need the same query as you already have setup behind your button, but just include txtdescription in the criteria.

--

"If to err is human, then I must be some kind of human!" -Me