Ciao ma xchè non funziona??

Apro la connessione con questa stringa:

Dim cnn As New ADODB.Connection
Dim rsArticoli As New ADODB.Recordset

str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\basic\sisma.mdb;Persist Security Info=False"

cnn.Open str

rsArticoli.Open "SELECT * FROM Articoli", cnn

Poi in una funzione utilizzo questo metodo:

rsArticoli.Find "Codart ='" & strCodice & "'", , adSearchForward

Mi viene generato un errore: il set di righe non supporta lo scorrimento all'indietro..

Come mai potete aiutarmi???

ciao e grazie