Class AutoPaging
'*************************************************************
'目 的:自动将长文章分页输出
'属 性:Splitchar:分页搜索标志。以一维数组方式输入,默认array("<br/>","<BR>","<Br>","<bR>")
' PagingString:要进行分页的字符串
' PagingSize:分页长度
' CurrentPage:当前输出页码
' DefaultRange:默认搜索分页标志范围
' StepRange:搜索步长
'方 法:getTotalPageCount():返回总分页数
' OutputString:输出当前分页内容
'*************************************************************
public Splitchar'分页搜索标志,数组
public PagingString'分页字符串
public PagingSize'页面最大长度
public CurrentPage'当前页码
public DefaultRange'默认起始范围
public StepRange'步长
private Truncate'2维数组m,n。m0=页码、m1=起始字符、m2=结束字符,n=总页数
private intStart'开始
长文章自动分页类
最新推荐文章于 2021-12-31 11:13:23 发布
这是一个VBScript的AutoPaging类,用于自动将长文章根据指定的分页长度和分页标志进行分页。它支持多种分页标志,并提供获取总页数和输出当前分页内容的方法。调用示例和应用场景也给出,适用于网页中长内容的分页显示。注意,使用时需避免分页内容包含影响页面布局的标签如<table>。
摘要由CSDN通过智能技术生成