Alt Tablolarda İşlemler

1 2 3 4 5 6 7 8
18/10/2020, 18:18

fenerli6774

Me. diye başlayan başvurular hata veriyor. İlk önce isimlerinin başına txt koydum. Değişiklik olmadı. Yuvarlama nın adını Yuv olarak değiştirdim olmadı. Sonra ilk hata verisi olan Me.Yuvarlamayı koddan sildim. Bu sefer Me.akAy da hata verdi. Kısacası Me. ile başlayan 41. satırdaki kodun Me. ile başlayan başvuruları hata verdi. Çözemedim. Sabırla uğraştığınız için de teşekkür ederim.

Yanlış dosya eklemişim. Özür.
18/10/2020, 18:32

fenerli6774

Doğrusu son eklediğim dosya: altablolara verigirişi
18/10/2020, 18:58

atoykan

1. Hatanız Türkçe karakter kullanmanız.
2. Hatanız düzensiz / kuralsız kodlamanız.

sorguda txtÖdenen olarak girdiğiniz alanın adı fomunuzda txtOdenen, bunun dışında txt1Ödeme, txt1Borç gibi türkçe karakterler kullandığınız denetimler var.

Formlarınızı hazırlarken metin kutuları gibi denetimleri txt_xxx, birlişik giriş kurularını cmb_xxx gibi ve türkçe karakter kullanmadan kısa öz adlandırırsanız hem gruplandırmış hem denetimleri rahat bulabilir olursunuz. Bu sayede kodlama yaparken bazı yerde türkçe karakterler kullanmak sureti ile hata ile karşılaşma olasılığınız olmaz. Türkçe karakter, buyuk harf ve yerleşik işlev adları kullanmamaya dikkat edin. Sorun buradan kaynaklanıyor başka bir sıkıntı görmedim.
18/10/2020, 21:22

fenerli6774

Türkçe karakterleri yine de değiştirdim. Ama Yuvarlamada Türkçe karakter yok ki. Onu da zaten txtYuv diye değitirmiştim öncesinde.
18/10/2020, 21:47

berduş

sayın fenerli bakın kaçıncı defadır aynı uyarıyı yapıyoruz ama siz aynı hatada ısrara devam ediyorsunuz. formunuzda txtÖdenen yok txtOdenen var.
kodu aşağıdaki gibi düzenleyip dener misiniz? sadece if Varmi=0 then bloğunu değiştirdim gerisi aynı
if  Varmi = 0 Then

DoCmd.RunSQL "INSERT INTO tblHarçlıklar (SıraID,YılID, Ay, Ekgösterge, Katsayı, Yuvarlama, Ödenen, 1Ödeme, 2Ödeme, 3Ödeme, 4Ödeme, 1Borç, 2Borç, 3Borç, 4Borç) VALUES (" & rsSQL1.Fields("SıraID") & ", '" & _
YilDegeri & "','" & _
Me.akAy & "','" & _
Me.akEk & "', '" & _
Me.akKat & "', '" & _
Me.txtYuv & "', '" & _
Me.txtOdenen & "', '" & _
Me.txt1Ödeme & "', '" & _
Me.txt2Ödeme & "', '" & _
Me.txt3Ödeme & "', '" & _
Me.txt4Ödeme & "','" & _
Me.txt1Borç & "','" & _
Me.txt2Borç & "','" & _
Me.txt3Borç & "','" & _
Me.txt4Borç & "')"

End If
19/10/2020, 17:45

berduş

Sorun çözüldü mü sayın @fenerli6774?
1 2 3 4 5 6 7 8