UPDATE |
Dim zap As String zap = "', '" str_2 = "UPDATE patients_history INNER JOIN kodebi_q ON patients_history.id_patient_history = kod_q.id_patient_history" _ & " SET patients_history.kode = ([patients_history].[kode] +" & zap & ") & [kod_q].[regcode]" _ & " WHERE momartvis_tarigi = " & Format(Me.date_1, "\#mm\/dd\/yyyy\#")
UPDATE patients_history INNER JOIN kodebi_q ON patients_history.id_patient_history=kod_q.id_patient_history SET patients_history.kode = [patients_history].[kode] & ", " & [kod_q].[regcode] WHERE momartvis_tarigi=Me.date_1;