|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
问题是他们究竟是喜欢他们是使用软件时,速度快还是速度慢好.(当然在3秒以内).无论是他们输入资料时,查找资料时,分析资料时.分页 方才看到一个网友提到分页的成绩,就想起之前为了弄个分页功效伤透了头脑,如今我将分页做成自以为是最复杂的后果,让人人参考。
这一段是翻开表并停止要素的赋值(省去了毗连数据库的操作,请人人自行处理):
<%sql="……………………"
rs.open sql,conn,1,1 '毗连表
rs.pagesize=10 '这是每页显示几笔记录10代表是10条
page=clng(request("page")) '获得页码值
if page="" or page<1 then page=1 '处置不法页码成绩
if page>rs.pagecount then page=rs.pagecount
rs.AbsolutePage=page%>
接上去将上面的代码放到需求的地位,用于显示翻页链接:
<%if page<>1 then%><a href="page.asp?page=1">首页</a><%else%>首页<%end if%> |
<%if page>1 then%><a href="page.asp?page=<%=page-1%>">上一页</a><%else%>上一页<%end if%> |
<%if page<rs.pagecount then%><a href="page.asp?page=<%=page+1%>">下一页</a><%else%>下一页<%end if%> |
<%if page<>rs.pagecount then%><a href="page.asp?page=<%=rs.pagecount%>">末页</a><%else%>末页<%end if%> |
共<%=rs.pagecount%>页/第<%=page%>页/<%=rs.recordcount%>笔记录
再接上去将没有效分页时的语句:
While not rs.eof
……
rs.movenext
wend
交换为以下代码:
for ipage=1 to rs.pagesize
…………
if rs.eof then exit for '最初纪录跳出轮回
rs.movenext
next
好了,如许够复杂吧。。我刚入手下手玩这个的时分找来找去都是一大片代码,弄得我头都快晕了。。希望对人人有所匡助。
第一次在这里贴“原创”,但不晓得够不敷资历上“文档中间”哦。。呵呵。。
SunLine
2003.1.10</p> asp可以轻松地实现对页面内容的动态控制,根据不同的浏览者,显示不同的页面内容。而浏览者一点觉察不出来,就像为他专门制作的页面一样。使用各种各样的组件,asp可以完成无比强大的功能。 |
|