problemas con un recordset

[Saruman]

prueba con este:

<%
TamPagina = 5

set conexion = Server.CreateObject("ADODB.Connection")
set rs = Server.CreateObject("ADODB.Recordset")

conexion.Open "Provider=Microsoft.Jet.OLEDB.4.0; " & _
"Data Source=" & Server.MapPath("ofertas.mdb") & ";"

sSQL="SELECT codigo,empresa,descripcion,provincia,fecha FROM OFERTAS"

rs.PageSize=TamPagina
rs.CacheSize=TamPagina

rs.Open sSQL, conexion, 1, 2

total_pag = rs.PageCount
num_reg = rs.recordcount

response.Write("<strong>total de paginas:</strong> " & total_pag & "<br>")
response.Write("<strong>total de registros:</strong> " & num_reg & "<br>")
response.Write("<strong>tamaño de la página:</strong> " & TamPagina & "<br>")
%>