<%
p=request("p")
if p="" then
p=1
else
p=cint(p)
end if
if p>1 then
%>
<a href="index.asp?page=<%=page%>&p=<%=p-1%>">向前10页</a>
<% end if
if (p*10)>=rs.pagecount then
for y=((p-1)*10+1) to rs.pagecount
if y=page then
response.write"[<font color='#ff0000'>"&y&"</font>] "
else
response.write"[<a href='index.asp?page="&y&"&p="&p&"' class='xiahuanxian'>"&y&"</a>] "
end if
next
else
for q=((p-1)*10+1) to (p*10)
if q=page then
response.write"[<font color='#ff0000'>"&q&"</font>] "
else
response.write"[<a href='index.asp?page="&q&"&p="&p&"'>"&q&"</a>] "
end if
next
end if
if (p*10)<=rs.pagecount then
%>
<a href="index.asp?page=<%=page%>&p=<%=p+1%>">向后10页</a><% end if %>