Skip to main content

AccessTr.neT


Veri Kontrolu

Veri Kontrolu

Çözüldü #7
Kodları şu şekilde değiştirirseniz sorunsuz çalışacaktır:
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 > 0 And a = b Then Check36 = -1
    If a > 0 And a = c Then Check38 = -1

Kolay gelsin..
İnadına, ille de Accesstr.net...
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