Sürekli Form Üzerinden Kritere Göre Arama Yaparak Veri Tabanından Kayıt Eşleştirme

26/12/2020, 18:06

uguruygar

Yardımlarınız için şimdiden teşekkürler.

Üyelerimizin durumu aylık olarak değişmektedir.Amacım belirlediğim 2 farklı aya göre  üyelerimin veri tabanımdaki kayıt durumlarını takip etmek.

"Rapor" isimli sürekli form üzerinde veri tabanımdaki kayıtlarımı gruplayarak listeliyorum.

Form üzerindeki açılır kutu değerlerine ve grupladığım listede yer alan tc numaralarına göre veri tabanında kayıt olup olmadığını denetleyerek uyuşan kayıt var ise  "Üyelik1" ve "Üyelik2"  isimli metin kutularında "VAR" şeklinde, eğer uyuşan kayıt yok ise "YOK" şeklinde ...

"Yıl1" ve "Ay1" açılır kutuları ile aradığım kaydın olup olmadığını "Üyelik1" metin kutusunda
"Yıl2" ve "Ay2" açılır kutuları ile aradığım kaydın olup olmadığını "Üyelik2" metin kutusunda "VAR" ya da "YOK" şeklinde göstermeye çalışıyorum.

Çalışmamı ek olarak yükledim. Teşekkür ederim.
26/12/2020, 22:39

berduş

uyelik1 alanın denetim kaynağına aşağıdaki kodu yazıp dener misiniz?
benzer şey üyelik2 için de yapılacak ama orada yıl1 ve ay1 yerine 2 yazılacak
=IIf(Len([yıl1])>0 And Len([ay1])>0;IIf(DCount("*";"uyeler";"tcno=" & [tcno] & " and yıl=" & [yıl1] & " and ay=" & [ay1])>0;"Var";"Yok");"")
26/12/2020, 22:49

uguruygar

Hocam çok teşekkür ederim verdiğiniz ifade çözüm için yeterli oldu. Şimdi bunu becerebilirsem daha hızlı çalışması için visual basic arayüzünde deneyeceğim.İyi çalışmalar.
26/12/2020, 22:51

berduş

rica ederim
iyi çalışmalar)
26/12/2020, 23:00

berduş

aslında formun kayıt kaynağına aşağıdaki kodu yazarsanız daha hızlı olabilir
SELECT uyeler.tcno, uyeler.adı, uyeler.soyadı, uyeler.okul, IIf(Len([Formlar]![Rapor]![yıl1])>0 And Len([Formlar]![Rapor]![ay1])>0,IIf(DCount("*","uyeler","tcno=" & [tcno] & " and yıl=" & [Formlar]![Rapor]![yıl1] & " and ay=" & [Formlar]![Rapor]![ay1])>0,"Var","Yok"),"") AS AY1, IIf(Len([Formlar]![Rapor]![yıl2])>0 And Len([Formlar]![Rapor]![ay2])>0,IIf(DCount("*","uyeler","tcno=" & [tcno] & " and yıl=" & [Formlar]![Rapor]![yıl2] & " and ay=" & [Formlar]![Rapor]![ay2])>0,"Var","Yok"),"") AS AY2
FROM uyeler
GROUP BY uyeler.tcno, uyeler.adı, uyeler.soyadı, uyeler.okul
ORDER BY uyeler.tcno;

uye1 ve 2yi AY1 ve AY2ye bağlamalısınız
26/12/2020, 23:13

uguruygar

Hocam çok teşekkür ederim tekrardan katkınız için. Arzuladığım gibi oldu projem.