AccessTr.neT
süresi dolan kursun aktifliğini kaldırma - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: süresi dolan kursun aktifliğini kaldırma (/konu-suresi-dolan-kursun-aktifligini-kaldirma.html)



süresi dolan kursun aktifliğini kaldırma - afil - 18/05/2009

Arkadaşlar kurs faaliyet programı yapıyorum. Bir nokta da takıldım. Kursun bitiş tarihi, bugünden daha eski bir tarihse "kurs aktifmi" yazan seçenek düğmesinin işaretinin kalkmasını istiyorum. Ben "kurs bitiş tarihi" metin kutusunun çıkıldığında olayına kodu yazdım. Ama ben istiyorum ki formu açtığım zaman bütün kayıtları konrtol etsin ve süresi geçen kursların aktiflik özelliğini kaldırsın.
Bu konuda yardımcı olursanız sevinirim. Örnek ekliyorum


Cvp: süresi dolan kursun aktifliğini kaldırma - tdsharun - 19/05/2009

Kodları formunuzun Yüklendiğinde olayına yerleştirecek olursanız istediğiniz sonucu elde edersiniz:
Kod:
Private Sub Form_Load()
If Me.KURS_BIT_TARIHI > Date Then
Me.KURS_AKTIFMI = -1
Else
Me.KURS_AKTIFMI = 0
End If
End Sub




Cvp: süresi dolan kursun aktifliğini kaldırma - ayhan2122 - 19/05/2009

Sn afil;
Sn tdsharun'un çözümüne ek olarak
Formunuzun KayıotKaynağına:
Kod:
SELECT TBL_KURS_TARIHLERI.Kimlik, TBL_KURS_TARIHLERI.KURS_BAS_TARIHI, TBL_KURS_TARIHLERI.KURS_BIT_TARIHI, IIf([KURS_BIT_TARIHI]<Date(),0,-1) AS KURS_AKTIF_MI
FROM TBL_KURS_TARIHLERI;

yazıp, KURS_AKTIFMI onay kutusunun DenetimKaynağına
Kod:
KURS_AKTIF_MI
yazarsanız başka bir çözüm yolu olur.


Cvp: süresi dolan kursun aktifliğini kaldırma - afil - 19/05/2009

Sayın hocalarım teşekkürler. Sorun çözüldü.