请问asp分页函数如何分成1,2,3,4,5。。。之关的样式

[xcwwhr]

这是目前的代码，生成的分页是一个下拉式选择分页，我想做成1,2,3,4,5....这种风格的，请问代码该怎么写了?

<select name="select" onChange="MM_jumpMenu('parent',this,0)">
<% For i = 1 to PCount %>
<option value="?PageNo=<%= i %>&btnSltArea1=<%= Area %>&Key=<%= Key %>&KeyClass=<%= KeyClass %>" <% If i = PageNo Then Response.write "Selected"%>><%=i%></option>
<% Next %>
</select>

[bdmh]

你既然会循环添加的列表，就不会循环创建链接吗

[Assassin_]

<% For i = 1 to PCount %>
<a href="?PageNo=<%= i %>&btnSltArea1=<%= Area %>&Key=<%= Key %>&KeyClass=<%= KeyClass %>" 
<% If i = PageNo Then Response.write "Selected"%>>
<%=i%>
</a>
<% Next %>

[混沌鳄鱼]

<% intPerPage = 30 '设定每页30行 if IsNumeric(Trim(request.querystring("page"))) = true then intCurPage = CLng(request.querystring("page")) else intCurPage = 1 end if '这里打开数据集 rs.pagesize = intPerPage intMaxPage = rs.pagecount if intCurPage > rs.pagecount then intCurPage = rs.pagecount elseif intCurPage < 1 then intCurPage = 1 end if if rs.pagecount > 0 then rs.absolutepage = intCurPage end if intCurRec = 1 %> <table> <% while not rs.eof and intCurRec <= intPerPage %> <tr>.....</tr> <% rsStudent.movenext intCurRec = intCurRec + 1 wend %> </table> <% call showPageCtrl(intMaxPage,intCurPage,"admin_student.asp?page=") '显示页面控制 sub showPageCtrl(intMaxPage,intCurPage,strUrl) dim I if intCurPage > 1 then response.write "<a href='" & strUrl & "1'>首页</a>  <a href='" & strUrl & intCurPage - 1 & "'>上一页</a>  " else response.write "首页  上一页  " end if response.write "第 <font color='red'>" & intCurPage & "</font>/" & intMaxPage & " 页  " if intCurPage < intMaxPage then response.write "<a href='" & strUrl & intCurPage + 1 & "'>下一页</a>  <a href='" & strUrl & intMaxPage & "'>尾页</a>  " else response.write "下一页  尾页  " end if response.write "跳转到：<select onChange=""window.open('" & strUrl & "' + this.value,'_self');"">" for I = 1 to intMaxPage response.write "<option value='" & I & "'>第 " & I & " 页</option>" next response.write "</select>" end sub

[shelly]

可以用数据库分页啊，用到row_number()over数据库函数，把页码和页面大小传参数到数据库。

[hia0571]

百度搜索: AspNetPager741DLL.zip AspNetPager741Samples.zip 并下载,学习后就不会为这个问题困惑了.以后写程序也会经常用到.

[xcwwhr]

这个是asp.net的吧，我的是asp