jb51内容分页函数 原创
2006-08-31 00:00
330 查看
allpages=ubound(contentarray) for dxy_ii=0 to allpages pagelist1="当前"&dxy_ii+1&"/"&(allpages+1)&"页 " pagepre="" pagelast="" if dxy_ii>0 then cpage=cint(dxy_ii) if cpage<0 then cpage=0 if cpage=1 then cpage1=id&".htm" else cpage1=id&"_"&cpage&".htm" end if pagepre="<a href="&cpage1&">上一页</a> " end if if dxy_ii<allpages then pagelast="<a href="&id&"_"&dxy_ii+2&".htm>下一页</a>" for dxy_i=0 to allpages if dxy_i=0 then if dxy_ii=dxy_i then alist=dxy_i+1&" " else alist=alist&"<a href="&id&".htm>"&dxy_i+1&"</a> " end if else if dxy_ii=dxy_i then alist=alist&(dxy_i+1)&" " else alist=alist&"<a href="&id&"_"&dxy_i+1&".htm>"&dxy_i+1&"</a> " end if end if next pagelist=pagelist1&pagepre&alist&ahlist&pagelast alist=""
相关文章推荐
- jb51内容分页函数 原创
- 复制文件夹所有内容 和 删除整个文件夹的2个函数(原创)
- 复制文件夹所有内容 和 删除整个文件夹的2个函数(原创)
- 用于分页的两个函数(原创 vince6799)
- 同一域名对应多个IP时,PHP获取远程网页内容的函数[原创]
- 在ASP中利用ADO显示Excel文件内容的函数[原创]
- jb51生成所有页面的效果+分页生成 原创
- 长文章内容的分页函数的修改
- [原创 js] 点击即可修改内容函数
- 配合ckEditor分页标签,用javascript编写分页函数,实现文章内容分页
- [原创 js] 点击即可修改内容函数
- Html内容分页处理函数
- 手动分页方式显示文章具体的内容函数的使用
- 用于分页的两个函数(原创 vince6799)
- asp,php,asp.net长文章内容分页函数
- 简单的内容分页函数
- asp文章内容分页的函数
- PHP文章内容分页函数
- ASP长文章内容自动分页函数
- jb51生成所有页面的效果+分页生成 原创