jb51内容分页函数 原创

软件发布|下载排行|最新软件

当前位置:首页IT学院IT技术

jb51内容分页函数 原创

  2021-03-16 我要评论
想了解jb51内容分页函数 原创的相关内容吗,在本文为您仔细讲解的相关知识和一些Code实例,欢迎阅读和指正,我们先划重点:jb51内容分页函数,下面大家一起来学习吧。
复制代码 代码如下:

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=""

Copyright 2022 版权所有 软件发布 访问手机版

声明:所有软件和文章来自软件开发商或者作者 如有异议 请与本站联系 联系我们