25-07-2021, 15:23 (En son düzenleme: 25-07-2021, 15:24 evidi.)
Uzman arkadaşlar selamlar.
1.Veri tabanımda rapor tarihi bölümü var. Bir de bu raporun geçerlilik süresi. Ben geçerlilik süresini seçince tarihin otomatik hesaplanmasını istiyorum. (Örneğin: Raporun süresi 2 yıl, raporun tarihi ise 25.07.2021. Yani formun üzerinde açtığım metin kutusuna 25.07.2023 yazmasını istiyorum. Bu süreyi seçilen kritere (bu 6 Ay olur 1 sene olur 3 sene olur) göre nasıl yapabilirim.
Yardımlarınız için şimdiden teşekkür.
Rapor_suresi açılır kutusunun Biçim sekmesindeki :
- Sütun Sayısı:2
- Sütun Genişlikleri: ;0 Rapor_suresi açılır kutusunun Veri sekmesindeki :
- Satır Kaynağı: "6 ay";6;"1 yıl";12;"2 yıl";24
- Değer listesini devral: Hayır
aşağıdaki kod ise - Form Geçerli Olduğunda - Rapor Tarihi ve - Rapor Süresi değiştiğinde olaylarına eklenebilir
Visual Basic
If IsDate(Me.Rapor_tarihi)Then Me.Metin11 = DateAdd("m", Me.Rapor_suresi.Column(1), Me.Rapor_tarihi)Else Me.Metin11 = ""
Sayın alperalper hocam ellerinize sağlık
soru konu açarak sormam gerekirdi , arkadaşın yapmış olduğu örnek işime yarayacağı için sizin ve arkadaşı affınıza sığınarak sorma gereği duydum
hocam açılan kutu =gün gibi
hafta sonlarına da
açılan kutu
1-hafta sonu tümünü kat
2-cumartesi kat
3-pazarı kat
4-hiç katma
gibi yapıla bilirmi
saygılarımla
Tabiki yapılabilir. Normal şartlarda biz Dateadd kullandık. Şimdi sen bu dateadd olayını bir veya birden fazla kurala bağlayabilirsin. Bunun için weekday kullanabilirsin ancak weekday kullanırken döngü ile beraber kullanman gerekiyor ki günleri sayarken hafta sonunda istediğin günleri çıkarsın.
