ASP分页的脚本案例-创新互联

这篇文章主要介绍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
%>