高考问答推销烟 脱口秀:ASP中新闻内容过长，需要按字数分页怎么做？
来源：百度文库 编辑：高考问答 时间：2024/04/27 19:10:14
能给我详细说明吗？
我刚学，不太懂懂！
希望高手多多指点哦！
<%
if not isEmpty(request.QueryString("id")) then
id=request.QueryString("id")
else
id=1
end if
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From Conews where id="&id, conn,3,3
'纪录访问次数
rs("counter")=rs("counter")+1
rs.update
nCounter=rs("counter")
'定义内容
content=ubbcode(rs("content"))
%>
<%=rs("title")%> //新闻标题
<%=content%> //新闻内容--也就是要分页的内容
<%rs.close%>
这就是新闻中有用到的ASP代码。
谁能帮我分一下页吗？谢谢！
我刚学，不太懂懂！
希望高手多多指点哦！
<%
if not isEmpty(request.QueryString("id")) then
id=request.QueryString("id")
else
id=1
end if
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From Conews where id="&id, conn,3,3
'纪录访问次数
rs("counter")=rs("counter")+1
rs.update
nCounter=rs("counter")
'定义内容
content=ubbcode(rs("content"))
%>
<%=rs("title")%> //新闻标题
<%=content%> //新闻内容--也就是要分页的内容
<%rs.close%>
这就是新闻中有用到的ASP代码。
谁能帮我分一下页吗？谢谢！
这种分页中最大的一个难题是在于如何判断一句代码的完整性，比如，你如果按代码的长度来分，也许你会把一个图片的HTML代码给分开
我的想法：
我们实际要做的只是正确判断两个标签:"<"与">"
如果一页规定不大于800字，那么
先取载取一段字符串长度为800的代码，查找最后一个标签"<"之后是否在">"
如果存在，则证明分对了，可以进行分隔，如果不存在，则证明取错了，那么就除去"<"标签之后的所有字符，这样的所得到的每页字符数一定是小于等于800的，其它的细化再想吧
兄弟，可以看看这篇贴子：超长字符的智能分页-支持HTML
http://www.knowsky.com/2622.html
代码成就天地人生，程序造就你我辉煌!
让我们在程序的路上一起走得更远 !
ASP+图形+网页讨论群2318126 RLBY工作室
老兄，我也在为这个烦恼，加我们一起学习
关注。。。