asp模块化分页制作详解- ASP - 软晨网（RuanChen.com）

当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp模块化分页制作详解

ASP: 实例详解ASP中断开记录集的使用方法; 代码指导用ASP木马实现FTP和解压缩; 防范脚本入侵，你做好准备了吗？; ASP中检查没有数据提交的页面; ASP程序代码执行时间统计类; ASP实现将长的标题用省略号收尾; ASP常用代码剪辑; 在ASP中利用“正则表达式” 对象实现UBB风格的论坛; ASP批量生成静态页; ASP生成柱型体，折线图，饼图源代码; 马克斯电影站生成Rss Feed的代码; ASP怎么谈到应用到类的？; ASP：判断访问是否来自搜索引擎的函数; ASP代码：rs.open语句详细说明; 用asp自动解析网页中的图片地址; ASP：True or False，明明白白你的If语句流程; ASP实现在提交表单到数据库的同时发邮件通知; “Web 匿名用户”帐户密码的位置; ASP分页效果之优化; 使用新云cms过程中的问题总结

No. « ‹ 8 9 10 11 › »

技术文章搜索

关键字

ASP 中的 asp模块化分页制作详解

出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 91 ::

收藏到网摘: n/a

Flash和Asp数据库的结合应用 ASP中使用SQL语句操作数据库

模块化分页

1.查询语句块

<%
取得当前文件名
temp = Split(request.ServerVariables("URL"), "/")
fy = temp(UBound(temp))
set rs=server.createobject("adodb.recordset")
if not isempty(request("page")) then
pagecount=cint(request("page"))
else
pagecount=1
end if
sql="select 查询语句"
rs.open sql,conn,1,1
rs.pagesize=10 分页记录数
if pagecount>rs.pagecount or pagecount<=0 then
pagecount=1
end if
if rs.eof and rs.bof then%>

<div align="center" class="001"> 
对不起，没有符合搜索条件的记录！ 
</div>

2.显示记录块

<%
else
rs.AbsolutePage=pagecount
do while not rs.eof %>

显示的记录

<% i=i+2
rs.movenext
if i>=rs.PageSize then exit do
loop
'www.knowsky.com
%>

3.
分页效果
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr align="center">
 <% if rs.pagecount=1 then %>
 <td height="35" colspan="4" class=001>共有[<%=rs.recordcount%>]条信息当前显示第 1～<%=rs.recordcount%>条</td>
</tr>
<tr>
 <%else%>
 <td width="19%" height="35" align="center" valign="middle" class=001>
 <% page_start=(pagecount-1)*rs.pagesize
 if pagecount=1 then page_start=1
 page_end=rs.pagesize*pagecount
 if pagecount*rs.pagesize=>rs.recordcount then page_end=rs.recordcount end if%>
 共有[<%=rs.recordcount%>]信息</td>
 <td width="58%" height="30" align="center" class="fy">
 <%
 if pagecount>5 and pagecount< rs.PageCount-5 and rs.pagecount>10 then
 qizu=pagecount-4
 min=pagecount+5
 response.write"<a href="&source&"?page=1&sortid="&sortid&"&typeid="&typeid&"&qylb="&qylb&"&title="&title&"&cityid="&cityid&">
首页</a> "
 response.write"<a href="&source&"?page="+cstr(pagecount-1)+"&sortid="&sortid&"&typeid="&typeid&"&qylb="&qylb&"&title="&title&"&cityid="&cityid&">
</a> "
 for ipage=qizu to min
 if ipage<>pagecount then
 response.write"<a href="&source&"?page="+cstr(ipage)+"&sortid="&sortid&"&typeid="&typeid&"&qylb="&qylb&"&cityid="&cityid&">"+cstr(ipage)+"</a> "
 else
 &nb

Flash和Asp数据库的结合应用 ASP中使用SQL语句操作数据库

ASP 中的 asp模块化分页制作详解

评论 (0) All