devi dichiarare:
Dim Rs As New ADODB.Recordset

Il percorso del data base vuole completo tipo c:\miodb.mdb
Ciao