Predmet:Re: Upis u dvije tablice istovremeno

---

Iza

Do While Not rs.EOF
rs.Edit
rs!V_Broj = "456666"
rs.Update

stavi

DoCmd.RunSQL ("UPDATE tblProdaja SET V_Broj='" & 456666 & "' WHERE OrderID=''" & rs.Fields(1) & "';")