(27/12/2010, 18:36)mzebek yazdı: If DCount("ID", "gidenevrak", [mudno]=" & b & " ") > 0 Then
msgbox"tabloda var"
exit sub
end if
Açıklama
"ID" tabloda saydıracağın
"gidenevrak" tablo adı
"mudno" tabloda bakılacak alan
"b" de formdaki denetim mesala adı metin kutusu yani tabloda olana baktıracağın

kolay gelsin.

Dostum cevabın için tşk edeirm. Fakat sorundada burada tabloda saydırma işlemini koda entegre edemiyorum. ya hataya düşüyo yada birine var deyip diğerlerini ekliyo
benim koddaki bölüm

do until rs.eof 'Tablo sonuna kadar

if scurdir & scurfile <> rs!dosya_adi then 'şart

end if 

rs.MoveNext 'sonraki kayıt

loop

şeklinde deniyorum ama dediğim gibi ilk gelen bilgi tabloda var diyo diğerleri tabloda olsa bile yine tabloya ekliyo.