您现在的位置是：网站首页> 编程资料编程资料

完美的ASP分页脚本代码_应用技巧_

2023-05-25 405人已围观

简介完美的ASP分页脚本代码_应用技巧_

直接写成函数的形式，如果输出生成好的页码，然后又程序输出或保存到文件中。

前十页为一批，第十页显示1,2,3…10；第十一页页码就变成了11,12…20
这种模式很多CMS都用到，比如5UCMS。函数名留点版权信息吧,cs=CatSeven

<% function csPage(id,all,url1,url2) if id<>1 then tmp="首页上一页" istart=((id-1)\10)*10+1 if(all-id)>9 then iend=((id-1)\10)*10+10 else iend=all end if for i=istart to iend if i=id then tmp=tmp&""&i&" " else tmp=tmp&""&i&" " end if next if id<>all then tmp=tmp&"下一页尾页" csPage=tmp end function 'DEBUG for j=1 to 40 response.write "#Page"&j&":"&csPage(j,40,"#TEST_","_View")&"
" next %>

生成效果如下：
#Page1:1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page2:首页上一页 1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page3:首页上一页 1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page4:首页上一页 1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page5:首页上一页 1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page6:首页上一页 1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page7:首页上一页 1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page8:首页上一页 1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page9:首页上一页 1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page10:首页上一页 1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page11:首页上一页 11 12 13 14 15 16 17 18 19 20 下一页尾页
#Page12:首页上一页 11 12 13 14 15 16 17 18 19 20 下一页尾页
#Page13:首页上一页 11 12 13 14 15 16 17 18 19 20 下一页尾页
#Page14:首页上一页 11 12 13 14 15 16 17 18 19 20 下一页尾页
#Page15:首页上一页 11 12 13 14 15 16 17 18 19 20 下一页尾页
#Page16:首页上一页 11 12 13 14 15 16 17 18 19 20 下一页尾页
#Page17:首页上一页 11 12 13 14 15 16 17 18 19 20 下一页尾页
#Page18:首页上一页 11 12 13 14 15 16 17 18 19 20 下一页尾页
#Page19:首页上一页 11 12 13 14 15 16 17 18 19 20 下一页尾页
#Page20:首页上一页 11 12 13 14 15 16 17 18 19 20 下一页尾页
#Page21:首页上一页 21 22 23 24 25 26 27 28 29 30 下一页尾页
#Page22:首页上一页 21 22 23 24 25 26 27 28 29 30 下一页尾页
#Page23:首页上一页 21 22 23 24 25 26 27 28 29 30 下一页尾页
#Page24:首页上一页 21 22 23 24 25 26 27 28 29 30 下一页尾页
#Page25:首页上一页 21 22 23 24 25 26 27 28 29 30 下一页尾页
#Page26:首页上一页 21 22 23 24 25 26 27 28 29 30 下一页尾页
#Page27:首页上一页 21 22 23 24 25 26 27 28 29 30 下一页尾页
#Page28:首页上一页 21 22 23 24 25 26 27 28 29 30 下一页尾页
#Page29:首页上一页 21 22 23 24 25 26 27 28 29 30 下一页尾页
#Page30:首页上一页 21 22 23 24 25 26 27 28 29 30 下一页尾页
#Page31:首页上一页 31 32 33 34 35 36 37 38 39 40 下一页尾页
#Page32:首页上一页 31 32 33 34 35 36 37 38 39 40 下一页尾页
#Page33:首页上一页 31 32 33 34 35 36 37 38 39 40 下一页尾页
#Page34:首页上一页 31 32 33 34 35 36 37 38 39 40 下一页尾页
#Page35:首页上一页 31 32 33 34 35 36 37 38 39 40 下一页尾页
#Page36:首页上一页 31 32 33 34 35 36 37 38 39 40 下一页尾页
#Page37:首页上一页 31 32 33 34 35 36 37 38 39 40 下一页尾页
#Page38:首页上一页 31 32 33 34 35 36 37 38 39 40 下一页尾页
#Page39:首页上一页 31 32 33 34 35 36 37 38 39 40 下一页尾页
#Page40:首页上一页 31 32 33 34 35 36 37 38 39 40

说实话我并不是很喜欢这种分页方式，我比较喜欢上次写的那个。
如果不超过10页，比如共5页。1,2,3,4,5；
如果最末页减当前页码不超过十，页码显示最后10页；
其他的是前四后五的方法。直接给出代码吧

 function csPage1(id,all,url1,url2) if id<>1 then tmp="首页上一页 " if all<10 or id<10 then istart=1 if all<10 then iend=all else iend=10 elseif all-id<10 then istart=all-10 iend=all else istart=id-4 iend=id+5 end if for i=istart to iend if i=id then tmp=tmp&""&i&" " else tmp=tmp&""&i&" " end if next if id<>all then tmp=tmp&"下一页尾页" csPage1=tmp end function for j=1 to 40 response.write "#Page"&j&":"&csPage1(j,40,"#TEST_","_View")&"
" next

生成效果如下：
#Page1:1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page2:首页上一页 1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page3:首页上一页 1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page4:首页上一页 1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page5:首页上一页 1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page6:首页上一页 1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page7:首页上一页 1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page8:首页上一页 1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page9:首页上一页 1 2 3 4 5 6 7 8 9 10 下一页尾页
#Page10:首页上一页 6 7 8 9 10 11 12 13 14 15 下一页尾页
#Page11:首页上一页 7 8 9 10 11 12 13 14 15 16 下一页尾页
#Page12:首页上一页 8 9 10 11 12 13 14 15 16 17 下一页尾页
#Page13:首页上一页 9 10 11 12 13 14 15 16 17 18 下一页尾页
#Page14:首页上一页 10 11 12 13 14 15 16 17 18 19 下一页尾页
#Page15:首页上一页 11 12 13 14 15 16 17 18 19 20 下一页尾页
#Page16:首页上一页 12 13 14 15 16 17 18 19 20 21 下一页尾页
#Page17:首页上一页 13 14 15 16 17 18 19 20 21 22 下一页尾页
#Page18:首页上一页 14 15 16 17 18 19 20 21 22 23 下一页尾页
#Page19:首页上一页 15 16 17 18 19 20 21 22 23 24 下一页尾页
#Page20:首页上一页 16 17 18 19 20 21 22 23 24 25 下一页尾页
#Page21:首页上一页 17 18 19 20 21 22 23 24 25 26 下一页尾页
#Page22:首页上一页 18 19 20 21 22 23 24 25 26 27 下一页尾页
#Page23:首页上一页 19 20 21 22 23 24 25 26 27 28 下一页尾页
#Page24:首页上一页 20 21 22 23 24 25 26 27 28 29 下一页尾页
#Page25:首页上一页 21 22 23 24 25 26 27 28 29 30 下一页尾页
#Page26:首页上一页 22 23 24 25 26 27 28 29 30 31 下一页尾页
#Page27:首页上一页 23 24 25 26 27 28 29 30 31 32 下一页尾页
#Page28:首页上一页 24 25 26 27 28 29 30 31 32 33 下一页尾页
#Page29:首页上一页 25 26 27 28 29 30 31 32 33 34 下一页尾页
#Page30:首页上一页 26 27 28 29 30 31 32 33 34 35 下一页尾页
#Page31:首页上一页 30 31 32 33 34 35 36 37 38 39 40 下一页尾页
#Page32:首页上一页 30 31 32 33 34 35 36 37 38 39 40 下一页尾页
#Page33:首页上一页 30 31 32 33 34 35 36 37 38 39 40 下一页尾页
#Page34:首页上一页 30 31 32 33 34 35 36 37 38 39 40 下一页尾页
#Page35:首页上一页 30 31 32 33 34 35 36 37 38 39 40 下一页尾页
#Page36:首页上一页 30 31 32 33 34 35 36 37 38 39 40 下一页尾页
#Page37:首页上一页 30 31 32 33 34 35 36 37 38 39 40 下一页尾页
#Page38:首页上一页 30 31 32 33 34 35 36 37 38 39 40 下一页尾页
#Page39:首页上一页 30 31 32 33 34 35 36 37 38 39 40 下一页尾页
#Page40:首页上一页 30 31 32 33 34 35 36 37 38 39 40

上面的代码在2009-2010年写过简单个两个分页（调取页码的函

上一篇：asp在iis7报错行号不准问题的解决方法_应用技巧_

下一篇：set rs=conn.execute,set rs=server.createobject(“ADODB.recordset”)的性能对比_应用技巧_

您现在的位置是：网站首页> 编程资料编程资料

完美的ASP分页脚本代码_应用技巧_

相关内容

点击排行

本栏推荐

猜你喜欢