Can't figure it out what I am doing wrong here, the update query works without any problem
Code:
UPDATE tbl_Tracking SET tbl_Tracking.EHT_Stage = "0", tbl_Tracking.EHT_Confirmed = -1WHERE (((tbl_Tracking.EHT_Stage) Is Null) AND ((tbl_Tracking.P_Tracing) Like "*et*"));
but when I convert it to vba and try to run it, the function doesn't do anything and I am not getting any error message either.
Code:
Private Sub Command125_Click()
Dim rsSQL As DAO.Recordset
Dim strsql As String
strsql = "UPDATE tbl_Tracking SET tbl_Tracking.EHT_Stage = '0', tbl_Tracking.EHT_Confirmed = Yes " & _
"WHERE (((tbl_Tracking.EHT_Stage)<'0' Or (tbl_Tracking.EHT_Stage) Is Null) AND ((tbl_Tracking.P_Tracing) Like '*et*'));"
End Sub