高手进 这到底是怎么回事?
我做的一个留言本,做到分页时 我想让它一个页面显示3条留言
这是代码
<%
rs.pagesize=3
pagecount=rs.pagecount
page=int(request( "page "))
if page=0 then page=1
if(request( "page "))= " " then page=1
rs.absolutepage=page
%>
<% if page =1 and not page=pagecount then %>
第一页|上一页|
<a href= "index.asp?page= <%=page+1%> "> 下一页 </a>
<a href= "index.asp?page= <%=pagecount%> "> 最后一页 </a>
<%elseif page <> 1 and not page=pagecount then %>
<a href= "index.asp?page=1 "> 第一页 </a>
<a href= "index.asp?page= <%=page-1%> "> 上一页 </a>
<a href= "index.asp?page= <%=page+1%> "> 下一页 </a>
<a href= "index.asp?page= <%=pagecount%> "> 最后一页 </a>
<%elseif page=pagecount then%>
<a href= "index.asp?page=1 "> 第一页 </a>
<a href= "index.asp?page= <%=page-1%> "> 上一页 </a>
下一页
最后一页
<%end if%>
这段代码哪错了吗?第一页会显示所有的留言 从第二页才开始正常显示,这到底是怎么回事?
------解决方案--------------------看下面代码
rs.open sql conn,1,1
if not rs.eof then
rs.pagesize=3
pagecount=rs.pagecount
page=int(request( "page "))
if page=0 then page=1
if(request( "page "))= " " then page=1
rs.absolutepage=page
i = 1
do while not rs.eof
...
...
rs.movenext
i=i+1
if i> =rs.pagesize then exit do
loop
end if
.....
估计楼主没有 if end if