下面是查询数据库后的显示页数信息,PageCount有100,显示是:1 2 3 4 5 6 7 ......一直到100,晕!
怎样可以把它改成像这样子的:
首页 | 上页 | [1] [2] [3] [4] [5] [6] ...下页 | 尾页 | 第 1 页 | 共 100 页

<%
'显示页数信息

Response.Write"请选择页数"
For I=1 to rs.PageCount
If I=page_no then
Response.Write "<font color=red>" & I &"</font>&nbsp"
Else
Response.Write"<a href='index.asp?page_no="&I&"&name="&name&"'>"& I &"</a>&nbsp"
End If
Next
%>

谁能帮我改改呀，先谢谢了!

谢谢版主和chaojimali，
版主，我用你的代码，
分页后成：1  　2  　3  　4  　5  　6  　7  　8  　9  　10 1 2 3 4 5
点后面那个2后分页成：　11  　12  　13  　14  　15  　16  　17  　18  　19  　20 -4 -3 -2 -1 0  
点后面的那个3后分页成：　21  　23  　24  　25  　26  　27  　28  　29  　30  　31 -4 -3 -2 -1 0


这是怎么回事？

搞了一天了，头晕了

顶