[求助]关于分页显示
我想分页显示每页只显示一条记录,数据表中有三条记录,但在上一页,下一页的链接中不能点击看到第三条记录,只能输入HTTP://localhost/site/pag.asp?pageno=3才能看到,请哪位老大帮忙,先谢了
有没有一种更好的方法来实现这种功能?
分页显示的代码如下:
<%
set rsa=server.CreateObject("adodb.recordset")
Set rsa.ActiveConnection =db
'设置游标类型
rsa.CursorType = 3
sql="select * from visit order by id desc"
rsa.open sql
pageno=request.querystring("pageno")
i=1
rsa.pagesize=i
if request.querystring("pageno")="" then
pagno=1
end if
if request.querystring("pageno")<1 then
pageno=1
end if
if request.querystring("pageno") > rsa.pagecount then
pageno=cint(rsa.pagecount)
end if
if cint(request.querystring("pageno"))>=0 and cint(request.querystring("pageno"))<=rsa.pagecount then
pageno=cint(request.querystring("pageno"))
end if
rsa.absolutepage=pageno
%>
<% do while not rsa.eof and i>=0 %>
<table width="150" border="0" cellpadding="4" cellspacing="0">
<tr>
<td ><div align="center"><a href="visit.asp?id=<%=rsa("id")%>"><strong><font size="3"><%=rsa("title")%></font></strong> </a>
<p><%=rsa("title1")%></p></div></td></tr>
<tr>
<td>
<table width="101%" height="24" border="1">
<tr>
<td> <a href="visit.asp?id=<%=rsa("id")%>"> <%if rsa("img")<>"5.gif" then%><img src="images/<%=rsa("img")%>" width="145" border="0" ><%end if%></a></td>
</tr>
</table> </td>
</tr>
</table></div><%
i=i-1
rsa.movenext
loop
%>
<table width="150" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="150"><div align="center"><%
page_total=rsa.pagecount
response.write"共有"&page_total&"篇人物专访"&"<br>"
if cint(trim(pageno))>1 then
pageno=pageno-1
response.Write"<a href="&request.ServerVariables("script_name")&"?pageno="&pageno&">上一页 </a>"
else
response.write"这是第一页 "
end if
if cint(trim(pageno))<cint(trim(page_total)) then
pageno=pageno+1
'response.write "<a href=sousuo.asp?pageno="&i&">"&i&"</a> "
response.Write"<a href="&request.ServerVariables("script_name")&"?pageno="&pageno&">下一页 </a>"
else
response.write"这是最后一页 "
end if
%>
还出现的一种情况是,我希望当数据表中的IMG字段内容不为5.gif时,才让它显示图片,可是上面的程序
那个判断不起作用,我都受不了,
<a href="visit.asp?id=<%=rsa("id")%>"> <%if rsa("img")<>"5.gif" then%><img src="images/<%=rsa("img")%>" width="145" border="0" ><%end if%></a>