![]() |
#2
yms1232009-07-28 22:11
|
<%
exec="select * from tj order by id desc"
set rs=Server.CreateObject("ADODB.Recordset")
rs.open exec,conn,1,1
rs.pagesize=2
if request.Querystring("page")="" then
page=1
else
page=request.querystring("page")
end if
rs.absolutepage=page
if not rs.eof then
for i=1 to rs.pagesize
if not rs.eof then
%>
^^^^^^^
<%
rs.movenext
end if
next
end if %>
<tr>
^^^^^^^^
<%
if page<>1 then
response.write("<a href='index.asp?page=1'>首页</a> ")
response.write("<a href='index.asp?page="&(page-1)&"'>上一页</a> ")
end if
pagex=rs.pagecount
if page<>pagex then
response.write("<a href='index.asp?page="&(page+1)&"'>下一页</a> ")
response.write("<a href='index.asp?page="&rs.pagecount&"'>尾页</a>")
else
end if
%>
显示出来,为什么到最后一页了还是会显示下一页和尾页,而且点下一页会一直往下走,可都是空页.
请高手指教