Skip to main content

AccessTr.neT


Veri Kontrolu

Veri Kontrolu

Çözüldü #4
Merhaba..

Onay kutularının Denetim Kaynaklarını boşaltır ve formunuzun Açıldığında olayında bu kodu kullanırsanız gerekli kontroller yapılıp onay kutuları güncellenir..

Kod:
Dim a, b, c As String
    a = DCount("*", "TBL_GDATA")
    b = DCount("DONEM", "TBL_GDATA")
    c = DCount("ID", "TBL_GDATA")
    If a > 0 Then Check32 = -1
    If a = b Then Check36 = -1
    If a = c Then Check38 = -1

Son Düzenleme: 12/10/2009, 21:15, Düzenleyen: Taruz.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Veri Kontrolu - Yazar: yakcaglayan - 11/10/2009, 14:00
Cvp: Veri Kontrolu - Yazar: mehmetdemiral - 11/10/2009, 17:26
Cvp: Veri Kontrolu - Yazar: yakcaglayan - 11/10/2009, 20:39
Cvp: Veri Kontrolu - Yazar: Taruz - 12/10/2009, 19:32
Cvp: Veri Kontrolu - Yazar: yakcaglayan - 12/10/2009, 22:52
Cvp: Veri Kontrolu - Yazar: mehmetdemiral - 13/10/2009, 00:06
Cvp: Veri Kontrolu - Yazar: mehmetdemiral - 13/10/2009, 00:18
Cvp: Veri Kontrolu - Yazar: yakcaglayan - 13/10/2009, 00:40
Cvp: Veri Kontrolu - Yazar: Seruz - 13/10/2009, 09:07
Task