Problemas con OLEDB

[rhpino]

TENGO EL SIGUIENTE CODIGO

Set conn = Server.CreateObject("ADODB.Connection")
'------------------------
'pasamos de este tipo
-------------------------
'conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/db/compras.mdb"))
' a este otro tipo por actualizacion del hosting
conn.Open("Provider=Microsoft.ACE.OLEDB.12.0; Data Source=" & Server.MapPath("/db/compras.mdb"))
sql = "SELECT * FROM compras "
Set rs = Server.CreateObject("ADODB.Recordset")

rs.Open sql, conn, 3, 3

'aca ya probe con 1,3 y tampoco amda

if rs.eof and rs.bof then
else
rs.Movelast
end if
fecha = now

y me arroja este error

Microsoft Access Database Engine error '80040e24'

Rowset does not support fetching backward.

/registro/compras/input_xml.asp, line 12

donde la linea 12 representa el rs.Movelast