Dcount kullanımı

29/03/2010, 13:41

fox35

saygıdeğer arkadaşlar;
ekteki örnekte tabloya bakacak olursanız aynı kayıttan birden fazla mevcut.
sorgudaki benzersiz değerler marifetiyle aynı kayıtlardan sadece birini seçtiriyoruz ve formumuzda o sorguya bağlı. form üzerine eklediğim metin kutusuna o kayıtlardan kaç tane olduğunu yazdırmak istiyorum.örneğin ali isimli kaç kayıt mevcut? ya da mehmet kaydına gelince kaç tane mehmet kaydı mevcut onu göstermek istiyorum. DCount fonksiyonu ile olabileceğini düşündüm ancak kriteri yazamadım daha doğrusu kriteri yazdım ancak kayıtlar arasınca gezinirken kriter değişmediği için olmadı.umarım anlatabilmişimdir. ilgilenen arkadaşlara şimdiden teşekkürler.
sorunu kendim hallettim.Dcount a gerek kalmadı sorguya tablodaki sırano alanını ekledim say deyince sayıyor.bazen çok basit birşeyi gözden kaçırıp uğraşabiliyoruz.konuyu yeni açan arkadaşların uğraşmasına gerek yok çözülmüştür.
29/03/2010, 16:27

besst

Merhaba

Denetim kaynağına "=DCount("adı";"srg";"'" & [adı] & "'=[adı]") " yazıldığın da da sonuç veriyor. Belki lazım olur
30/03/2010, 21:01

fox35

teşekkürler sayın besst buda bir alternatif.
31/03/2010, 07:35

assenucler

Katkı ve paylaşım için teşekkürler...
13/05/2024, 23:11

evren89

İyi akşamlar

Me.Metin30 = DCount("*", "UCRETSAYİLANLAR", " [TARİH]=#" & Format([Metin32], "dd-mm-yyyy") & "#")

Arkadaşlar bazı değerlerin adedini sayıyor fakat bazı değerler kayıtlı olduğu halde onları 0 adet olarak sonuçluyor

yardımlarınız için teşekkür ederim.
15/05/2024, 08:33

onur_can

Herkese Günaydın,
Örneği indirip baktığımda herhangi bir kod göremedim.  Sn besst'in çözüm önerisi uygulandığında gayet güzel çalışıyor, hatasız ellerine sağlık sn besst.
sn evren89'un ise hangi uygulama üzerinden soru sorduğunu anlamadım, çünkü örnekte bahsettiği tablo yok!
Bir diğer alternatif çözümde ben sunmak istiyorum.
Formun Current Olayına aşağıdaki kod uygulandığında her kayıt değiştiğinde istenen sonucu verecektir.
Kod:
Private Sub Form_Current()
Me.Metin7.Value = DCount("adı", "Tablo1", "'" & [adı] & "'=[adı]")
Me.Metin7.Requery
End Sub