Defalarca yaptığım şeyi yapamadım. Hatanın nerede olduğunu bulamadım. Lütfen hata nerde söylermisinz?
"Dersyükü Hesaplama" butonundan "tümünü ekle" butonundaki kodlar.
Aynı işe ait aynı dersi eklememesi gerekiyor.
If DCount("ders_ter_id", "tbl_dersyükü", "[islemler_id]=" & txtislemler_id & " and [ders_id]=" & Gders_id) = 0 Then
yukarıdaki kod;
"tbl_dersyükü" adlı tabloda "ders_ter_id" alanının karşısındaki "islemler_id" tablodaki alan "txtislemler_id " formdaki değere eşitse ve
"tbl_dersyükü" adlı tabloda "ders_id" alanının "Gders_id" eşitse
manasına gelmiyor mu?
sorun tam olarak ne?
ifade doğru mesela
dcount("ders_id","tbl_dersyükü","[islemler_id]=" & 4 & " and [ders_id]=" & 9)
gibi bir kod yazdığımızda sonuç 5 çıkıyor
Tamam. Teşekkürler.
For xList = 1 To Me.listedersler.ListCount - 1
yanlış
For xList = 0 To Me.listedersler.ListCount - 1
doğru
Ben listeyi 0 dan 1 başlatmam gerekirken-----1 to 1 yapmışım. O yüzden il satırı eklemiyordu.
Bir şeyi daha kurgulayamadım. Kişi ders ekleme ve silme kısmından dersin verisini değiştirirse, o değişen dersin tüm talolarda değişmesini nasıl kurgularız...