在发布文章时,在你想让它分页的地方加上预设的分页符。实现步骤:
一、我后台的编辑器用的是FCK,怎样让它具备这个功能呢?最简单的办法,就是把一个不常用的按钮替换成“插入分页符”按钮。(在FCK文件夹“fckeditor\editor\js”里有两个文件,fckeditorcode_gecko.js和fckeditorcode_ie.js,给它们动下手术就OK了,具体不说了,手头没源文件,我不知道具体的代码,有兴趣的朋友PM我)我预设了“<div>::</div>”作为分页符,这个随便设,只要它不会在文章要正常显示的地方出现就行了。
二、写前台文章显示页的代码,怎么链接数据库,读取数据库等代码就不说了。以下是关键代码:
'文章页码参数,从1开始
page = Request.QueryString("page")
'按分页符分割文章
arrContent = split(rs("文章正文字段"),"<div>::</div>")
'显示指定页的文章正文
arrContent(page-1)
'文章分页页码链接
Call TextPage(ubound(arrContent))
TextPage函数代码:
以下是引用片段: 代码: <% function TextPage(Pages) if Pages > 0 then Response.Write(VbCrlf & "<div class=""textpage"">") for p = 1 to Pages+1 Response.Write("<a href=""?id="& id &"&page="& p &""">第" & p & "页</a> | ") next Response.Write("</div>") End if End function %> |