DoCmd.SetWarnings False
DoCmd.RunSQL "UPDATE plantarih " _
& " SET [kvadsoyad] = '" & Me.Metin4 & "',[kvtc] = '" & Me.Metin6 & "',[kradsoyad] = '" & Me.Metin10 & "',[krtc] = '" & Me.Metin12 & "',[dosyano] = '" & Me.Metin130 & "',[kiracıtel] = '" & Me.Metin73 & "'" _
& " where (krtc='" & Me.Liste69.Column(2) & "' AND DosyaNo=" & Clng(Me.Liste69.Column(6)) & ")"
DoCmd.SetWarnings True
Hocam burada ne yanlış anlayamadım
Sql, Sorguda Tırnak Problemi
Ben bir hata göremedim alan türleri ne kontrol eder misiniz
Bir de liste kutularının doğru sütunları mi alınmış ona bakın isterseniz
NOT: Denetlemek için şöyle bir sey yapin
yazdığınız kodu silip aşağıdaki kodu yazin
Kodunuzu calistiri,
kod penceresine geçip
Ctrl+G yapın
altta yeni bir pencerede sorgunuzun ham kodu görünür
O görünen kodu kopyalayıp Access e yeni sorgu oluşturma penceresine yazın
Size hata yerini gosterir
Bir de liste kutularının doğru sütunları mi alınmış ona bakın isterseniz
NOT: Denetlemek için şöyle bir sey yapin
yazdığınız kodu silip aşağıdaki kodu yazin
Kodunuzu calistiri,
kod penceresine geçip
Ctrl+G yapın
altta yeni bir pencerede sorgunuzun ham kodu görünür
O görünen kodu kopyalayıp Access e yeni sorgu oluşturma penceresine yazın
Size hata yerini gosterir
DenemeSQL ="UPDATE plantarih " _
& " SET [kvadsoyad] = '" & Me.Metin4 & "',[kvtc] = '" & Me.Metin6 & "',[kradsoyad] = '" & Me.Metin10 & "',[krtc] = '" & Me.Metin12 & "',[dosyano] = '" & Me.Metin130 & "',[kiracıtel] = '" & Me.Metin73 & "'" _
& " where (krtc='" & Me.Liste69.Column(2) & "' AND DosyaNo=" & Clng(Me.Liste69.Column(6)) & ");"
Debug.print DenemeSQL
Bu arada dosyano alanı metin mi uzun tamsayı mi?
Güncelleme kısmında metin, kriter kısmında sayı almışsınız!
Güncelleme kısmında metin, kriter kısmında sayı almışsınız!
Ozaman sorun dosya no alanının başındaki ve sonundaki tek tırnaktan kaynaklanıyor olabilir.
Konuyu Okuyanlar: 2 Ziyaretçi