Set mRS = mCN.Execute("UPDATE Dies SET Die_Notes = '" & Note & "'" Where Tool_No = " & DieSelected)
If the Tool_No Field DataType is Integer then you should do it like this:
Code:
Dim lngRecordAffected as long
mCN.Execute "UPDATE Dies SET Die_Notes = '" & Note & "' Where Tool_No =" & DieSelected & ";", lngRecordAffected, adExecuteNoRecords
If the Tool_No Field DataType is String then you should do it like this:
Code:
Dim lngRecordAffected as long
mCN.Execute "UPDATE Dies SET Die_Notes = '" & Note & "' Where Tool_No ='" & DieSelected & "';", lngRecordAffected, adExecuteNoRecords