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

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

ASP: 使用ASP和Word进行服务器端拼写检查; 文本中首字母全改为大写; 检测整数和长整数的函数; 谈谈如何在不支持数据库的asp主页上运用ado; 在多行文本框中显示读取信息; 生成一个不重复的随即数字; 网上追捕(很多实用的port); 用javascript隐藏超级链接的真实地址; 给浏览器的滚动条加上颜色; asp+中是如何连接数据库ado+的; 几个对图形进行动态处理的dhtml代码; 域名登记查询(whois)很复杂吗--方法一; 域名登记查询(whois)很复杂吗--方法二; 用ASP创建多栏选项列表; asp中的一个奇怪的函数; 瞒天过海html文件技术一瞥; 如何在服务器上保存一定时间的信息; 用ASP发 WAP MAIL(=); 创建弹出式“每日提示”窗口; 用两行代码在浏览器中实现文件上传

No. « ‹ 179 180 181 182 › »

技术文章搜索

关键字

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

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

收藏到网摘: 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