查询分页，求助高人，感激不尽!100分。

[dawuzj]

<!--#include file="conn.asp" -->
<!--#include file="showpage.asp" -->
<%
sql="select * from bugtable where project_name='"&request("project_name")&"'"
set rs = server.createobject("adodb.recordset")
rs.open sql,conn,1,3
rs.pagesize=1
page=Clng(request("pagetext"))
if Rs.eof then
response.write "<span class=p9>还没记录!</span>"
%>

<%
else
if page<1 then page=1
if page>rs.pagecount then page=rs.pagecount
showpage rs,page
%>
<TABLE valign=top border=0 cellPadding=0 cellSpacing=3 width=450 >
<form method=POST action=page.asp>
<td>
<%
if page<>1 then
response.write"<a href=page.asp?pagetext=1><<首页</a><a href=page.asp?pagetext="&(page-1)&">前页</a>"
end if
if page<>rs.pageCount then
response.write"<a href=page.asp?pagetext="&(page+1)&">后页</a> <a href=page.asp?pagetext="&rs.pageCount&">尾页>></a>"
end if
%>
页次：<strong><%=Page%></strong>/<strong><%=rs.pageCount%></strong>页 转到:<input type=text name=pagetext size=5 maxlength=10 class=smallInput value=<%=Page%>><input class=buttonface type=submit value=Go name=B1></span></p>
</form>
</td></TABLE>
<% end if %>
第二页显示“还没记录!”而第二页的确应有。

[dawuzj]

这是：showpage.asp:
<table width="1062" border=1 bordercolor="#C8ECE9" cellspacing="0" cellpadding="0">
<tr><td width="53" bgcolor="#666699"><font color="#F7FBFF">项目名称</font></td><td width="54" bgcolor="#666699"><font color="#F7FBFF">模块名称</font></td><td width="52" bgcolor="#666699"><font color="#F7FBFF">小类名称</font></td><td width="171" align="center" bgcolor="#666699"><font color="#F7FBFF">现象</font></td><td width="289" align="center" bgcolor="#666699"><font color="#F7FBFF">操作步骤</font></td><td width="32" bgcolor="#666699"><font color="#F7FBFF">类别</font></td><td width="26" bgcolor="#666699"><font color="#F7FBFF">程度</font></td><td width="30" bgcolor="#666699" align="center"><font color="#F7FBFF">机率</font></td><td width="54" bgcolor="#666699" align="center"><font color="#F7FBFF">发现人</font></td><td width="53" bgcolor="#666699">
<p align="center"><font color="#F7FBFF">修改状态</font></p>
</td><td width="67" bgcolor="#666699">
<p align="center"><font color="#F7FBFF">发现时间</font></p>
</td></tr>
</table>
<table width="1063" border=0 bordercolor="#C0C0C0" cellspacing="1" cellpadding="0" height="1" bgColor=B0CFE4 >
<%
sub showpage(rs,page)
rs.Absolutepage=page
for i=1 to rs.pagesize
%>
<tr bgcolor="#F6F6F6">
<td width=51 height="1"><%=rs("project_name")%></td>
<td width="53" height="1"><%=rs("unit_name")%></td>
<td width="51" height="1"><%=rs("class_name")%></td>
<td width="167" height="1"><%=rs("subject")%></td>
<td width="283" height="1"><%=rs("content")%></td>
<td width="32" height="1"><%=rs("bug_class")%></td>
<td width="27" height="1"><%=rs("serious")%></td>
<td width="30" height="1"><%=rs("version")%></td>
<td width="51" height="1"><%=rs("founder")%></td>
<td width="52" height="1"><%=rs("testcheck")%></td>
<td width="65" height="1"><%=rs("foundtime")%></td>
</tr>
<%
rs.movenext
next
end sub
%>
</table>

[mingyuexingguang]

rs.open sql,conn,1,3
rs.pagesize=1

这个反咯哦

pagesize打开前可写(但要声明成recordset后)
打开数据库后是只读

[baronwinly]

同意楼上的
rs.open sql,conn,1,3 打开数据库为可更新方式，分页代码rs.open sql,conn,1

[CXL_2005]

分页代码rs.open sql,conn,1,1
打开记录集为只读
rs.open sql,conn,1,3
打开为可UPDATE

[fisherboy]

http://www.goldly.com
疯狂程序员论坛
汇聚 c c++ vc vb java asp,php,jsp
欢迎你,我们需要你
期待你的到来,我们一起学习 一起进步

[3573745]

呵呵！
告诉你吧！
我曾经也有你这样的问题
后来想了好久终于知道！

你搜索的时候当选择下一页的时候你搜索的参数没有带过去
比如关键字啊．搜索条件啊／你都要使用　　隐含域　　放到表单之中传递过去．

[yb2008]

查询条件第二页没有值,当然找不到了....

首页......下一页...全部加上条件:

response.write"<a href=page.asp?pagetext="&(page+1)&"&project_name="&request("project_name")&">后页</a>"

加上Project_Name