<% If Clng(Session("CurrentPage"))>1 then %>
<
<% End if %>
<% If Clng(Session("CurrentPage"))< rs.pageCount then %>
>
<% End if %>
<% If rs.pageCount>1 then %>
Ir directamente a la página
<%
For j= 1 to rs.pageCount %>
<% =j %>
<%
Next
%>
<%
end if
rs.close
conn.close
Set rs=nothing
Set conn=nothing
%>