Paginacion con error

[normab]

Hola chicos
tengo un ejemplo de paginacin que funciona perfecto, pero cuando yo lo modifico para que busque los registros con la opcion where me debuelve solo sos primeros y cuandio quiero acceder a la siguiente pagina me da uin error
Les mando el codigo, el error y la linea que me marca
Gracias
<%


Server.ScriptTimeOut=180

Set Conexion=Server.CreateObject("adodb.connection")
Conexion.Open "Driver={Microsoft Access Driver (*.mdb)}; " & "Dbq=" & Server.MapPath("db/base.mdb")
tamanopagina=3
paginaabsoluta=request.querystring("paginaabsoluta ")
if paginaabsoluta="" then
paginaabsoluta=1
end if
orden=request.querystring("")
if orden = "" then
orden="pendiente"
oficina = request.form("destino")
end if
set rs = Server.CreateObject("ADODB.Recordset")
rs.CursorType = adOpenKeyset
rs.cursorlocation=adUseClient
rs.LockType = adLockOptimistic
sqltxt="SELECT * FROM servicios where estado='" & orden & "' and destino='" & oficina & "' "

rs.Open sqltxt, conexion

if tamanopagina <> "all" then

rs.pagesize= cint(tamanopagina)

rs.absolutepage=cint(paginaabsoluta)
contador=1%>
<table align="center">

<% do while not rs.eof and contador <= cint(tamanopagina) %>

<tr>
<td width="99" bgcolor="#EFEFEF" height="1">
<p align="center">
<font face="Tahoma" size="1" style="font-family: Verdana, Arial, Helvetica, sans-serif"><%=rs.Fields("Abonado")%></font></td>
<td width="198" bgcolor="#EFEFEF" height="1">
<p align="center">
<font face="Tahoma" size="1" style="font-family: Verdana, Arial, Helvetica, sans-serif"><%=rs.Fields("Servicio")%></font></td>
<td width="79" bgcolor="#EFEFEF" height="1">
<p align="center"><font face="Tahoma" size="1"><%=rs.Fields("puntodeventa")%></font></td>
<td width="88" bgcolor="#EFEFEF" height="1">
<p align="center">
<font face="Tahoma" size="1" style="font-family: Verdana, Arial, Helvetica, sans-serif"><%=rs.Fields("estado")%></font></td>
<td width="77" bgcolor="#EFEFEF" height="1" style="font-family: Verdana, Arial, Helvetica, sans-serif">
<p align="center">
<font face="Tahoma" size="1" style="font-family: Verdana, Arial, Helvetica, sans-serif"><%=rs.Fields("fecha")%></font></td>
<td width="100" bgcolor="#EFEFEF" height="1">
<p align="center"><font face="Tahoma" size="1"><a href="delete.asp?id=<%=rs("id")%>">
<font color="#FFFFFF" size="2">
<img border="0" src="images/topic_delete.gif" alt="Eliminar Solicitud pendiente" align="center"></font></a></font></td>

</tr>
<%rs.movenext

contador=contador+1

loop%>

</table>

<p align="center">Pulsa en la página a la que deseas ir </p>

<table align="center" bgcolor="#ffffff">

<tr>

<%j=0

if cint(paginaabsoluta) <> 1 then

atras=cint(paginaabsoluta)-1

response.write "<td align=center><a href=paginar.asp?destino="&oficina&"&tamanopagina= "&tamanopagina&"&paginaabsoluta=" & atras & ">"&"&lt;&lt;"&"</a></td>"

j=j+1

end if

for i = 1 to rs.pagecount

j=j+1

if j>20 then

response.write "</tr><tr>"

j=1

end if

if cint(i) = cint(paginaabsoluta) then

response.write "<td bgcolor=#00ff00 align=center>"&i&"</td>"

else

response.write "<td align=center><a href=listados.asp?orden="&orden&"&destino="&oficin a&"&tamanopagina="&tamanopagina&"&paginaabsoluta =" & i & ">"&i&"</a></td>"

end if

next

end if%>

<%if cint(paginaabsoluta) <> rs.pagecount then

atras=cint(paginaabsoluta)+1

response.write "<td align=center><a href=listados.asp?estado="&rs.Fields("estado")&"&d estino="&oficina&"&tamanopagina="&tamanopagina&"&p aginaabsoluta=" & atras & ">"&"&gt;&gt;"&"</a></td>"

end if%>

el error es este :ADODB.Recordset error '800a0bcd'

El valor de BOF o EOF es True, o el actual registro se eliminó; la operación solicitada requiere un registro actual.
y corrsponde a la linea roja

[trasgukabi]

después de
sqltxt="SELECT * FROM servicios where estado='" & orden & "' and destino='" & oficina & "' "
pon

Código:

response.write sqltxt
response.end

para comprobar el valor de sqltxt
me da la sensación que la variable oficina la tienes sin valor, ya que se lo das con el request.form en la primera entrada, pero después no lo mandas. lo solucionarías metiendo la consulta sql en una sesión.

[normab]

hola, gracias por responder, pero ya lo hice y me devuleve los valor bien, pero el error lo marca en rs.absolutepage=cint(paginaabsoluta)
y ese tambien tiene valor y lo muestra.
Ahora si yo no lo condiciono y selecciono todo de la tabla, sin asignar valor a nada anda perfecto para atras y delante