Visual Basic - ERROR 3219 urgente!!!

Realizo una conexión de la siguiente forma:

Set cn = New ADODB.Connection

cn.ConnectionString = "DSN=Contable;uid=sa"
cn.Open

Set rs = New ADODB.Recordset
rs.LockType = adLockOptimistic

rs.CursorType = adOpenKeyset

Luego defino en uno de mis programas un recordset publico (con eventos) de la siguiente forma:

Public WithEvents rsCuentas As Recordset

tengo el siguiente problema:

Cuando realizo un RS.MOVEPREVIOUS se cae, indicandome el error 3219, "La operación solicitada por la aplicación no está permitida en este conexto" ???????

http://www.adodb.com/errors_new_result.asp?errors_id=805
<fin de texto>