求一个C#的分页源代码

tometoo 2007-09-21 05:38:52
网络上找了一些但是菜鸟我水平有限,看不懂~~
希望各位兄弟帮忙我一下
...全文
68 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
hailei1984 2007-09-21
  • 打赏
  • 举报
回复
给你个看看
'''''
<%
exec="select * from kq"
set rs=server.createobject("adodb.recordset")
rs.CursorLocation = 3
rs.PageSize = 10
rs.CacheSize = 5
rs.open exec,conn,1,1
%>
<%
if request("pages0")="" then
pages0=1
else
pages0=cint(request("pages0"))
end if
if request("pages1")="" then
pages1=1
else
pages1=cint(request("pages1"))
end if
if not rs.eof then
rs.AbsolutePage=pages1
end if
if not rs.eof then
recPerpage=0
%>
''''''''
<%do while not rs.EOF and recPerpage<rs.pageSize%>
'''''''
<%
rs.MoveNext
recPerpage=recPerPage+1
loop
end if
%>
<tr class=NMTable>
<td align=right colspan="8">
<a href="admin_kqcx1.asp?pages1=1"><font color="#FFFF00">首页</font></a><font color="#FFFF00">  
</font>
<a href="admin_kqcx1.asp?pages1=<%if pages1>1 then Response.Write pages1-1 else Response.Write 1 end if%>">
<font color="#FFFF00">上页</font></a><font color="#FFFF00">  
</font>
<a href="admin_kqcx1.asp?pages1=<%if rs.pagecount > 0 then if cint(pages1) < rs.PageCount then Response.Write cint(pages1)+1 else Response.Write rs.PageCount end if else response. write 1 end if%>">
<font color="#FFFF00">下页</font></a><font color="#FFFF00">  
</font>
<a href="admin_kqcx1.asp?pages1=<%if rs.PageCount > 0 then response.Write rs.PageCount else response.Write 1 end if%>">
<font color="#FFFF00">末页</font></a><font color="#FFFF00">  
第<%=pages1%>页 
共<%=rs.PageCount%>页<%=rs.RecordCount%>条记录 
</font>

28,390

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧