ASP中上一页下一页检测

来源:百度知道 编辑:UC知道 时间:2024/06/24 08:45:38
在ASP中,我们习惯性的会做一个分页显示内容,无论是新闻还是产品;
在下面都会加上一个 “上一页” “下一页”
当页面被显示为最后一页的时候,“下一页”的连接则消失,只显示上一页连接;同理,当处于第一页时,“上一页”的连接消失,只显示下一页连接;
请问这个判断过程,如何写呢?谢谢;
要有代码解析过程,不要到处去复制;

'============================================
'asp分页函数 参数 本页名(包括参数),总记录数,每页记录数,后三个参数是true false 显示总数、转向 的开关
'作用范围为(a)过程,在showpage过程调用不到其值。解决:当前页码变量存储成页变量(其作用域为整个页面)。
' ============================================
sub showpage(sfilename,totalnumber,maxperpage,ShowTotal,ShowAllPages,strUnit)
if totalnumber>0 then
dim n, i,strTemp,strUrl
'显示几页
if totalnumber mod maxperpage=0 then
n= totalnumber \ maxperpage
else
n= totalnumber \ maxperpage+1
end if
strTemp=strTemp & "共 <font size=2><b>" & totalnumber & "</b></font> " & strUnit & "   "
strUrl=JoinChar(sfilename)
if PageNo<2 then
strTemp=strTemp & "首页 上一页 "
else
strTemp=strTemp & "<a href='"& strUrl & "PageNo=1'>首页</a> "
strTemp=strT