手机
当前位置:查字典教程网 >编程开发 >ASP教程 >jb51内容分页函数 原创
jb51内容分页函数 原创
摘要:复制代码代码如下:allpages=ubound(contentarray)fordxy_ii=0toallpagespagelist1="...

复制代码 代码如下:

allpages=ubound(contentarray)

fordxy_ii=0toallpages

pagelist1="当前"&dxy_ii+1&"/"&(allpages+1)&"页"

pagepre=""

pagelast=""

ifdxy_ii>0then

cpage=cint(dxy_ii)

ifcpage<0thencpage=0

ifcpage=1then

cpage1=id&".htm"

else

cpage1=id&"_"&cpage&".htm"

endif

pagepre="<ahref="&cpage1&">上一页</a>"

endif

ifdxy_ii<allpagesthenpagelast="<ahref="&id&"_"&dxy_ii+2&".htm>下一页</a>"

fordxy_i=0toallpages

ifdxy_i=0then

ifdxy_ii=dxy_ithen

alist=dxy_i+1&""

else

alist=alist&"<ahref="&id&".htm>"&dxy_i+1&"</a>"

endif

else

ifdxy_ii=dxy_ithen

alist=alist&(dxy_i+1)&""

else

alist=alist&"<ahref="&id&"_"&dxy_i+1&".htm>"&dxy_i+1&"</a>"

endif

endif

next

pagelist=pagelist1&pagepre&alist&ahlist&pagelast

alist=""

【jb51内容分页函数 原创】相关文章:

利用ASP发送和接收XML数据的处理方法

如何限制同一用户名同时登陆

asp中去除内容HTML标签的三个function函数

jb51生成所有页面的效果+分页生成 原创

asp:生成静态页面函数

上一篇,下一篇过程代码

随机增加网站点击的一个不错的方法 原创

MusicGet 类

验证码识别技术

本人常用的asp代码 原创

精品推荐
分类导航