一篇文章如字数太多,则用1,2,3.... 分成多页,便于用户浏览。
<% set recordset1=server.createobject("adodb.recordset") exec="SELECT * FROM news where id="&id recordset1.Open exec,conn,1,1 %> .......
<% 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 %>
| <%if ubound(ContentStr)>=1 then%>
本文共分 <% For p = 0 to ubound(ContentStr) if p+1= Request("page")+1 then a="" aa="" else a="" aa="" end if %> &page=<%=p%>"><%=a%><%=p+1%><%=aa%> <% Next %> 页 | <%end if%>
添加文章时,在想分页的地方,加入分割符 ||| 即可。关键词标签:代码,手动,文章,实现, 相关阅读
热门文章
ASP编程代码:隐藏图片的真实地址
ASP教程:0177:800401f3错误解决
ASP代码中如何屏蔽ip地址 禁止某IP段访问网站
错误80004005信息处理方法 人气排行
ASP下标越界的解决方法
ASP代码中如何屏蔽ip地址 禁止某IP段访问网站
“文件共享锁定数溢出” 原因及解决方法
无法写入数据库的解决方法
ASP教程:0177:800401f3错误解决
ASP常用函数列表
如何用ASP来获取客户端真实IP的地址
ASP用FSO生成HTML简单实例+详解[原创] |
查看所有0条评论>>