Alt formdaki durumu 'nun Güncelleştirme sonrasında olay yordamına;
Kod:
Private Sub durumu_AfterUpdate()
Refresh
Forms!personel!Etiket10.Caption = IIf(DCount("durumu", "istihkakSorgu", "durumu='aldı'") >= 4, "hakkı yok", "alabilir")
End Sub
yazın
Hocam tam siz cevap vermeden önce;
Private Sub durumu_Exit(Cancel As Integer)
Forms![personel]!Etiket10.Caption = IIf(DCount("durumu", "istihkakSorgu", "durumu='aldı'") >= 4, "hakkı yok", "alabilir")
End Sub
yaptım çalışmıştı. Yinede çok teşekkür ederim.
Sn derebeyi son halini ekleyebilirmisiniz. Saygılar...
Ozan, istenen senin sorduğun gibi değilmiş aslında. cevapta senin sorduğun sorunun cevabı olmadı.
Çünkü istenen sıraya göre değil; yani 4 defa üst üste "aldı" olayı değilmiş.
İstenen sıradan seçili kalem için toplam 4 defa "aldı" var ise "hakkı yok" denecek o kadarmış, bu ilk cevapta bile çözülürdü. SORU ANLAŞILIR ŞEKİLDE SORULMADI VEYA CEVAPLAYAN ARKADAŞLAR YANLIŞ ANLAMIŞ...
Eğerki 4 defa üst üste (sıra numarasına göre) "aldı" denmesi sonrası "hakkı yok" denmiş olsaydı bu durumda farklı olurdu. yani diyelimki Ahmet için;
aldı
aldı
aldı
almadı "bundan sonra tekrar aldı olarak devam edebilir"
aldı
aldı
aldı
aldı "bundan sonra hakkı yok olur, çünkü üst üste 4 defa aldı olmuş"
--------------
pardon derebeyi'nin sadece sondan önceki mesajına göre yorumlamıştım.
ozanakkaya'nın mesajına bakmamıştım.
saygılar.
Merhabalar...
Değerli hocalarımızın katkıları sonucu, dosyanın son halini ekleyebilir misiniz?
Katkı ve paylaşımlar için teşekkürler...
Arkadaşlar yeni bağlandığım için biraz geç kaldım. Son halini yüklüyorum. Saygılarımla.