sayın berduş bilgilendirmeniz için teşekkürler, lakin yine beceremedim , update söz diziminde hata var uyarısı alıyorum, ya bu yazım kuralları beni deli edecek

Dim a, b, c, d, e As Integer
Dim dep As String



dep = Me.depo.Value


a = Dlookup ("Kimlik", "firmalar", "firmaAdi='" & Me.acilanFirmaAdi.Value & "'")
b = Dlookup ("Kimlik", "alimTuru", "alimTuru='" & Me.acilanAlimTuru.Value & "'")
c = Dlookup ("Kimlik", "isinTuru", "isinTuru='" & Me.acilanIsinTuru.Value & "'")
d = Dlookup ("Kimlik", "siniflar", "sinifAdi='" & Me.acilan.Column(1) & "'")
e = Dlookup ("Kimlik", "depo", "depo='" & dep & "'")



DoCmd.RunSQL "update surec set firmaId=" & a & " , alimTuruId=" & b & ",isinAdi='" & Me.isinAdi & "', isinTuruId=" & c & ", depoId=" & e & ", faturaTarihi='" & Me.faturaTarihi & "',faturaNo='" & Me.faturaNo & "', tutar=" & Me.tutar & ",kdv=" & Me.acilanKdv & ",toplamFiyat=" & Me.toplamFiyat & ",sinifId=" & d & " where Kimlik=" & Me.metinKimlik & " "



bu güncelleme sorgusunda söz dizimi hatası var diyor neresi hatalı acaba?