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

asp 按照标签实现长文章分页 _巳时三刻 asp 按照标签实现长文章分页 2009-07-27 16:53 标签： NextPage lt;% 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 pageNumlt;=ubound(content) then response.Write content(i) end if next %gt; lt;pgt;lt;/pgt; 本文共分 lt;% For p = 0 to ubound(content) %gt; lt;a href=?page=lt;%=p+1%gt;amp;news_id=lt;%=News_id %gt;gt;lt;%=p+1%gt;lt;/agt; lt;% Next %gt; 添加标签： lt;trgt; lt;td height=23 align=rightgt;lt;bgt; 内容： lt;/bgt;lt;brgt; lt;input name=button type=button class=ACT_btn st