网站首页 手机版
 注册 登录
您现在的位置: 畅无忧设计 >> 网络编程 >> ASP教程 >> 正文
最新文章
· FSO 组件asp生成html静态页面碰到缓存
· asp实现长文章自动分页插件
· 在ASP中访问和更新Cookies集合
· ASP错误提示大全
· 学习ASP的几个观点
· ASP用两级联动下拉列表来显示大类和小
· ASP取当前页面地址和参数
· ASP删除记录的同时删除相关图片
· asp将查询结果导出到excel
· ASP批量导入Excel到Access或者Sql Se
热门文章
 化境ASP无组件上传类 - upload_5xs
 一个获取ACCESS数据库表名以及表名
 asp将查询结果导出到excel
 艾恩ASP无组件上传修改版
 ASP批量导入Excel到Access或者Sql 
 ASP读取数据库的Flash+JS图片切换特
 ASP用两级联动下拉列表来显示大类和
 ASP+JS实现网页歌曲连播、点播功能
 使用ASP重启服务器
 asp批量替换access数据库中指定字段
相关文章
asp实现长文章手动分页和自动分页的函数
一个纯ASP代码判断图片尺寸的方法
ASP长文章手动分页
asp单篇文章手动分页函数
ASP用分页符实现长篇文章手动分页显示
ASP实现长文章手动分页的代码
来源:学网 更新时间:2009/12/10 9:22:37 阅读次数:
字体:[ ] 我要投稿

一篇文章如字数太多,则用1,2,3....  分成多页,便于用户浏览。

       <% 
set recordset1=server.createobject("adodb.recordset") 
exec="SELECT * FROM news  where id="&id 
recordset1.Open exec,conn,1,1 
%>
 <table width="85%" border="0" align="center" cellpadding="3" cellspacing="0">
          <tr>  <td >
.......

<%
If Request("page")="" Then
pageNum=0
Else
pageNum=Request("page")
End if
Content=Replace(recordset1("content"),"|||","|||")
ContentStr=split(Content,"|||")
For i=pageNum to pageNum
%>
<%=ContentStr(i)%> 
<% Next %>
            </td>
          </tr>
 <%if ubound(ContentStr)>=1 then%>
          <tr> 
            <td height="30" >本文共分 
<%
For p = 0 to ubound(ContentStr)
if p+1= Request("page")+1 then
a="<font color=red>"
aa="</font>"
else
a=""
aa=""
end if
%>
              <a href="detail.asp?ID=<%=request("ID")%>&page=<%=p%>"><%=a%><%=p+1%><%=aa%></a> 
              <% Next %>
              页 </td>
          </tr>
          <%end if%>

 
         添加文章时,在想分页的地方,加入分割符 ||| 即可。

  • 上一篇文章:
  • 下一篇文章:
  • 关于我们 - 联系我们 - 广告服务 - 在线投稿 - 友情链接 - 网站地图 - 版权声明
    CopyRight 2008-2010, CWYDESIGN.COM - 畅无忧设计, Inc. All Rights Reserved
    滇ICP备09005765号