Aklıma gelen herşeyi sıralıyorum;
1-En başta yer alan
Option Compare Database
satırının altında
Public rs As ADODB.Recordset
diye genel tanımlama yaptın mı?
2- Sayın alpeki99 un verdiği Sql cümlesinin genel kalıbı onu kullanırken bazı işlemlerden geçirmek gerekiyor diye biliyorum.
3-Arama için şöyle bir şey yapsan;
rs.Find "[Dosya_yolu]= 'sCurDir & sCurFile'"
bunu bulamazsa sanırım hata verecek ve bu hatanın kodunu yazıp "eğer bu hata ise şöyle yap" diyerek çözüm üretilebilir.