Alıntı:...birde bu komutta hata veriyor. If rs.Record DCount <> 0 Then...
ifadenize yönelik olarak,sadece bir düzeltmede bulunmak adına;
sayın ozan bey kodları eklerken sanırım size cevap yazabilmiş olması için aceleye gelmiş olacak ki,BOŞLUK olarak yazılmıştır.
yapmanız gereken;ilgili satırdaki kodu
If rs.RecordCount <> 0 Then
şeklinde değiştirmektir.
bilginize...iyi çalışmalar,saygılar.