新微赢技术网

标题: [求助]asp自动分页问题?? [打印本页]

作者: 爱你 时间: 2009-12-27 00:52
标题: [求助]asp自动分页问题??
asp自动分页应该如何写??下面的要根据换行来判断不行,因为内容多数都是自动换行,如果根据字符多少来判断怎么写的??

dim page,pagecount,thispage,linenum,allline
const pageline=10
linenum=split(content,"<br>")
allline=ubound(linenum)+1
pagecount=int(allline\pageline)+1
page=request("page")
if isempty(page) then
thispage=1
else
thispage=cint(page)
end if
for i=0 to allline
if i+1>thispage*pageline-pageline and i<thispage*pageline then
response.write linenum(i) &"<br>"
end if
next
for i=1 to pagecount
if thispage=i then
response.write i & " "
else
response.write "<a href='?page="&i&"&zixunid="&zixunid&"'>"&i&"</a> "
end if
next

作者: ミつン戀ン 时间: 2009-12-27 00:52
请参看这个帖子
http://bbs.bc-cn.net/viewthread.php?tid=82904&extra=&page=100#

作者: ※为你歌唱※ 时间: 2009-12-27 00:52
已解决,谢谢!!

欢迎光临新微赢技术网 (http://bbs.weiying.cn/)