ERROR EN paginacion

[pepelucho]

Holas, tengo un error en el codigo de paginacion, cuando lo usaba con un winNT y access funcionaba ok, ahora lo tengo en un win2003 con sqlserver 2000 y me sale el sgte. error:
/************************************************** *
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.
facturas.asp, line 70
************************************************** \
' les coloco el codigo que uso.Espero su ayuda...
Dim PaginaActual ' en qué pagina estamos
Dim PaginasTotales ' cuántas páginas tenemos
Dim TamPagina ' cuantos registros por pagina
Dim CuantosRegistros ' para imprimir solo el nº de registro por pagina que queramos

TamPagina=30

if Request.Querystring("pagina")="" then
PaginaActual=1
else
PaginaActual=CInt(Request.Querystring("pagina"))
end if
sql="select f.nro_factura,c.nombre,f.cliente,f.monto,f.estado, f.fecha_venc,f.id from facturas f, clientes c where f.cliente=c.id order by f.nro_factura desc"
set rs=server.createobject("adodb.recordset")

rs.PageSize=TamPagina
rs.CacheSize=TamPagina


rs.Open sql,cn,1,2
'response.write sql
'rs.open sql,cn,adOpenKeyset,adLockPessimistic
PaginasTotales=rs.PageCount
if PaginaActual < 1 then
PaginaActual = 1
end if
if PaginaActual > PaginasTotales then
PaginaActual = PaginasTotales
end if
if PaginasTotales=0 then
Response.Write("No se encontraron resultados.")
else
rs.AbsolutePage=PaginaActual 'esta es la linea 70 del error
CuantosRegistros=0
do while not rs.EOF and CuantosRegistros < TamPagina
%>

[ivan_noe]

Antes de abrir el recordset debes darle permiso para trabajar con el .

rst.cursorlocation=3

el 3 creo que es equivalente a la constante adUser...
Ahora mismo no me acuerdo, pero con la linea que te he escrito justo antes del rs.open te tiene que funcionar.

Espero que te sirva, aunque no me puede explicar mejor porque tengo prisa. Puedes buscar las constantes de valores que se pueden dar a un recordser, ahí te explicará esto mismo

Saludos

[pepelucho]

Gracias, FUNCIONO OK. porque en el win nt no necesito ponerle esa linea???