日期:2014-05-17  浏览次数:20715 次

高手进 这到底是怎么回事?
我做的一个留言本,做到分页时   我想让它一个页面显示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