AccessTr.neT

Tam Versiyon: Elle Girilen Değere Göre Veri Saymak
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
herkese merhaba,
örnekte vermiş olduğum disiplin dosyasının form bölümünde bulunan

Maddesini ve başlangıç bitiş tarihlerini elle yazdığım bilgilerin disiplin tablosundan taranarak toplam sayılarının toplam yevmiye ve toplam ihtar bölümüne yazılması

(maddesi+ilk tarih +son tarih) = toplam yevmiye, toplam ihtar

şimdiden tüm üstadlara tşk.[attachment=6484][attachment=6484]
Sn:gaslihak
Sorularınızı ilgili konuların (Access, Excel vb.) Soruları ve cevapları bölününde sorunuz.
Bir adet sorgu oluşturun adı Sorgu1 olsun

Kod:
SELECT DİSİPLİN.MADDESİ, DİSİPLİN.YEVMİYESİ
FROM DİSİPLİN
WHERE (((DİSİPLİN.MADDESİ)=[Formlar]![DİSİPLİN]![MADDESİ]) AND ((DİSİPLİN.[CEZA ALDIĞI TARİH]) Between [Formlar]![DİSİPLİN]![BAŞLANGIÇ TARİHİ] And [Formlar]![DİSİPLİN]![BİTİŞ TARİHİ]));

Sonra form üzerindeki MADDESİ alanın güncelleme sonrasına (Önce Tarih aralığını girdikten sonra ) bu nu yazıyorsunuz Dilerseniz tarih güncellemeleri sonrasına da yaza bilirsiniz. size kalmış

Kod:
Private Sub MADDESİ_AfterUpdate()
Me.TOPLAM_YEVMİYE = DCount("[YEVMİYESİ]", "Sorgu1")
Me.Metin15 = DCount("[YEVMİYESİ]", "Sorgu1", "[YEVMİYESİ]='İHTAR'")
End Sub

Kolay gelsin
NOT Form üzerindeki MADDESİ alanını elle girmek yerine açılır kutudan seçtirme yapsanız daha iyi olmaz mı?
Hocam yapamadım 2 kodu nereye yazmam gerekiyor? 1 kodun devamınamı? yoksa kodları sorgu bölümündeki ölçüt bölümünemi yazcam?
DİSİPLİN formunuzda yer alan MADDESİ alanının güncelleme sonrasına yazmanız gerekiyor gerçi olduğugibi kopyalayıp yapıştırsanız da olurdu.
Örnek ekte. Kolay gelsin
HOCAM TEŞEKKÜRLER ELİNİZE SAĞLIK Img-grin