内容载入中...
在分页中，我第一页用
sheying4.asp?page=1&ttype=<%=rs("ttype")%> 可以实现，其中page=1
但如果要显示最后一页，由于这个数是不固定的，该怎么定义
就是最后页面的page应该=几？
首先你了解一下分页的原理吧!
set objrs = server.createobject("adodb.recordset")
objrs.open strsql, conn,1,1
recordNum=objrs.recordcount '数据总数
maxperpage=15
objrs.pagesize=maxperpage '每页显示的记录
totalpage=objrs.PageCount '总页数
if request.querystring("page")="" then
page=1
else
page=cint(request.querystring("page"))
end if
if not objrs.eof then
objrs.AbsolutePage=page
end if
if objrs.eof then
response.write "没有找到任何记录!"
else
'开始显示记录
for i=1 to objrs.pagesize
-----------
'显示分页
<%k = page
if k <> 1 then '如果当前不是第一页
<a href=plue.asp?page=1 class=td1>首页</a>
<a href=plue.asp?page=<%=cstr(k-1)%> class=td1>上一页</a>
<%else%>
<span class="td1">首页 上一页 </span>
<%end if%>
<%if k<>totalpage then%> '如果当前页不是最后一页
<a href=plue.asp?page=<%=cstr(k+1)%> class=td1>下一页</a> <a href=plue.asp?page=<%=totalpage%> class=td1>尾页</a>
<%else%>
<span class="td1">下一页 尾页 </span>
<%end if%>
