AccessTr.neT

Merhabalar

benim bir formda metin kutusu var yanına bir buton ekledim o butuna basınca formdaki İD alani saydırmak istiyorum 
eklediğim kod hata veriyor 
SAY([İD])
yardımcı olur musunuz?

Merhaba;
Butonunza ait kodu aşağıdaki ile değiştirerek dener misiniz?
Table1 yerine kendi tablonuzu, Metin kutusu yerine kendi metin kutusu adınızı yazınız.

Dim say As Integer

say = DCount("ID", "Table1")

Me.MetinKutusu = say

(23/06/2017, 08:33)direnist yazdı: [ -> ]Merhaba;
Butonunza ait kodu aşağıdaki ile değiştirerek dener misiniz?
Table1 yerine kendi tablonuzu, Metin kutusu yerine kendi metin kutusu adınızı yazınız.

Dim say As Integer

say = DCount("ID", "Table1")

Me.MetinKutusu = say

bu işe yaramıyor çünkü Sql ile verileri çektirdim ve filtreleme var bana formdaki ekrandaki verileri sayması gerekiyor

DCount olan yerde FRM_İSLEMLER yazmamalısınız.
FRM_İSLEMLER formunuzun dataları aldığı tablo adını yazmalısınız.

Ayrıca DCount() fonksiyonunuda incelemenizi tafsiye ederim. Fiiltremeler yapıyorum dediniz. Farklı durumlara göre formdaki data sayını alacaksanız DCount() fonksiyonunun kriterler tarafını bilmeniz gerekli

doğru ama yetkilere göre filtreme mevcut çok fazla filtreler var her butonda ayrı filtre geliyor bu yüzden ben ekrandaki verileri sayması daha kolay olacağı için 
o yüzden bununla ilgili bir kod istedim metin kutusuna Say() yazdığım zaman yapıyor fakat ben butona basınca yapmasını istiyorum bu olayın sadece

SAYDIR butonunuzun kodunda önce tablonuzda yetkisini tuttuğunuz kişinin yetki durumunu kontrol ettirmelisiniz.
Sonrasında da bu yetki durumuna göre DCOUNT() u yazmalısınız.
Örneğin;
Kullanıcının yetki durumu Admin ise bu kullanıcı tüm kayıtları görsün diyorsak DCOUNT("ID","TabloAdı")
Kullanıcının yetki durumu Görevli ise bu kullanıcı belli kayıtları görsün diyorsak DCOUNT("ID","TabloAdı", "ID="15) (Sadece 15 numaralı kayıt)
vs.vs.

Tek buton ile bu şekilde yetki durumuna göre istediğiniz kadar duruma göre kayıt adedini getirebilirsiniz.


Buda sorununuzu çözmez ise örnek çalışmanızı detaylı bir açıklama gödnerip diğer hocalarımızdan bilgi talep edebilirsiniz.
İyi çalışmalar.