asp 按照标签实现长文章分页_巳时三刻

来源:百度文库 编辑:神马文学网 时间:2024/05/02 07:27:32
asp 按照标签实现长文章分页2009-07-27 16:53 标签:NextPage <%
If Request.QueryString("page")="" Then
pageNum=0
Else
pageNum=Request.QueryString("page")-1
End if content = Split(content,"[NextPage]")
for i=0 to ubound(content)
if pageNum=i and pageNum<=ubound(content) then
response.Write content(i)
end if
next
%>


本文共分
<%
For p = 0 to ubound(content)
%>
<%=p+1%>
<% Next %> 添加标签:
    内容:



注:手动分页符标记为:点击插入,注意大小写