Formda tarih kayıtlarını sayma
Tarih
02/04/2009 16:25
Konu Sahibi
serjando
Yorumlar
5
Okunma
1735
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



serjando
Üye
Kullanici Avatari
Üye
S.... I....
16
5
06/01/2009
0
Artvin
Ofis 2007
28/09/2015,16:18
Çözüldü 
Sponsor Reklam
İyi günler arkadaşlar daha önceden verilen örneklerden yaralanarak yapmaya çalıştım BİR KISMINI YAPTIM ama son noktayı koyamadım...

Acaba formdaki 1 den fazla olan tarih kayıtlarını aylara göre guruplandırarak misal mart ayında B grubundan ayrı tarihlerde 5 kayıt girişi yapılmış C grubundan ayrı tarihlerde 8 kayıt yapılmış bu şekilde istatistik... benim yapmaya çalıştığım veritabanı ekte...

Yardımcı olursanız Sevinirim...


Ek Dosyalar
.rar   veritabaniv2.rar (Dosya Boyutu: 27,38 KB / İndirme Sayısı: 16)
Cevapla

serjando
Üye
Kullanici Avatari
Üye
S.... I....
16
5
06/01/2009
0
Artvin
Ofis 2007
28/09/2015,16:18
Çözüldü 
bir kısmını daha düzelttim son noktayı koymak için yardım edebilirmisiniz arkadaşlar
Cevapla

Seruz
Uzman
Kullanici Avatari
Uzman
S.... U....
1.544
7
30/10/2008
804
Tekirdağ
Ofis XP
13/01/2017,16:37
Çözüldü 
Sponsor Reklam
Tablo ve alan adlarınızda Boşluk ve Türkçe karakterler kullanmışsınız.
Sizin öncelikli probleminiz tablo ve alan adlarındaki kurallara uymamanız.
Bunu düzeltmek için aşağıdaki konuyu okumalısınız.
Yapılmaması Gereken Ölümcül Hatalar 

Tablo ve alan adında boşluk varsa, bunları [] köşeli parantez içine almak zorundasınız.
Yani, bu şekilde olan kod yanlış,

Kod:
Me.KayitSayisi = DCount("*", "AŞAĞI SUNDURA", "HEPATİT 3 Between " & Bas & " And " & Bit)


Bu şekilde olmalı:

Kod:
Me.KayitSayisi = DCount("*", "[AŞAĞI SUNDURA]", "[HEPATİT 3] Between " & Bas & " And " & Bit)

--
Ayrıca şimdi farkettim, bu kodlarda daha önce sanırım ben yardımcı olmuşum. Herhalde gözümden kaçmış yılı artırmak.

Kod:
If [Secilen_Ay].[Column](2) = 12 Then

kontrolünde yılı bir artırmak gerekiyor.

Kod:
Bit = DateSerial([Açılan Kutu38].[Column](1) + 1, 1, 3)
....
Bit = DateSerial([Secilen_Ay].[Column](1) + 1, 1, 3)


Gerekli değişiklikleri yapıp, dosyayı ekledim.



Ek Dosyalar
.rar   Veritabani2003_Seruz.rar (Dosya Boyutu: 18,92 KB / İndirme Sayısı: 47)
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla

serjando
Üye
Kullanici Avatari
Üye
S.... I....
16
5
06/01/2009
0
Artvin
Ofis 2007
28/09/2015,16:18
Çözüldü 
Çok teşekkür ederim... Sizin sayenizde öğreneceğiz... emeğine sağlık...
Cevapla

assenucler

Kullanici Avatari
Onursal
A.... S.... Ş....
2.053
31/10/2008
63
İstanbul
-
03/01/2017,18:22
Çözüldü 
Sponsor Reklam
Teşekkürler.
Cevapla

assenucler

Kullanici Avatari
Onursal
A.... S.... Ş....
2.053
31/10/2008
63
İstanbul
-
03/01/2017,18:22
Çözüldü 
Teşekkürler, Seruz hocam...
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  access iki tarih arası verileri datetimepicker vasıtasıyla çağırma usescrt 9 175 15/01/2017, 12:43 usescrt
  Formda Veri Aramada Like Sorunu uiakouwr 14 220 11/01/2017, 08:54 uiakouwr
  kayıtlar arası koşula göre sayma ve eksiltme safakben 10 275 07/01/2017, 17:17 safakben
  Formda 1 Metin Kutusuna birden fazla Metin Kutusu içeriğini koşula bağlı gösterme hbal09 5 213 06/01/2017, 16:22 atoz112
  Formda düzenleme yaptığımda kaydetmeden işlemi geri almak raburabu 8 343 26/12/2016, 11:38 raburabu


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya