CizgiUStu formunda "Kayıt Türü Sorgula" isminde açılan kutu yaptım. İptal seçildiğinde kaydı iptal tablosuna atıp ana tablodan siliyorum. Fakat Açılan kutudan iptali seçtiğimde if bloğunu kodlayamadım. Yardımınızı bekliyorum. Teşekkür ederim.
(24/07/2023, 12:16)programmer67 yazdı: Açılan kutudan iptali seçtiğimde if bloğunu kodlayamadım
bu kod tam olarak nerede? nasıl çalışması gerekiyor?
Kkayıt Ttürü sorgula butonunda, yapılan seçime gore süzme yapacak ama iptal edilen kayıtlar iptal tablosundan diğerleri ogrencitakipten,
Teşekkür ederim
- If Me.ak_ogrencitipi <> "Tümü" And Me.ak_ogrencitipi <> "" Then
- If Dlookup ("ogrenci_id", "ogrencitakip", "kayit_turu ='" & Me.ak_ogrencitipi & "'") Then '<= bu kontrolü anlamadım! amaç ne?
- ElseIf Me.ak_ogrencitipi = "İPTAL" Then
- If Me.txt_ksay <> 0 Then
- Else
- End If
- ElseIf Me.ak_ogrencitipi = "Tümü" Then
- If Me.txt_ksay <> 0 Then
- End If
- End If
- End If
kodunuzun özü bu
eğer öğrenci tipi "tümü" yada boş değilse if boluğundaki kodlar çalışmaya başlıyor
önce
If Dlookup ("ogrenci_id", "ogrencitakip", "kayit_turu ='" & Me.ak_ogrencitipi & "'") ile
ogrenci_id bulunuyor ama koşulla ilgili bir şey yok dolayısıyla sonuç herhangi bir sayı döndürdüğü müddetçe koşulun sağlandığı varsayılıf
if'ten çıkılıyor
Hocam Açılan kutuda Tümü, Aktif Sınıf Dersi, Online Ders, Online 4 Kişilik ve İptal seçeneklerim var. Tümünü seçtiğinde ogrencitakip tablosundan Aktif Sınıf Dersi, Online Ders, Online 4 Kişilik olan kayıtları seçecek, Aktif Sınıf Dersini seçtiğinde sadece bu kayıtları süzecek, Online Ders, Online 4 Kişilik lerde böyle. İptali seçtiğinde ogrencitakip_iptaller tablosundan kayıtları gösterecek eğer kayıt yoksa bunlarda ilgili türde kayıt yok mesajı verecek.
Birde açılan kutuda boşluklar var onlarıda Me.ak_ogrencitipi <> "" öğrencitipi boşluk değilse olarak düşündüm.