<%
bigclass=trim(Request.QueryString("bigclass"))
set rs=server.createobject("adodb.recordset")
sql="select * from product where bigclass='"&bigclass&"'"
rs.Open sql,conn,1,3
PageSize=12
%>
<table width="560" border="0" cellspacing="0">
<tr>
<td height=33 colspan="3" background="images/bgbg1.gif"><img src="images/ring02.gif" width="23" height="15" align="absmiddle"> <a href=index.asp>宏源电子</a> >> <%=bigclass%></td>
</tr>
<tr>
<td background="images/small.gif">&nbsp;</td>
</tr>

<!--#INCLUDE FILE="inc/page_up_down.asp"-->
<tr>
<td height="327" valign="top">
<%
if rs.eof then
response.write ("对不起，没有任何数据")
else
do while not rs.eof
if processedrecord >=pagesize then
exit do
end if
%>

<table width="100%" class="table-xia" border="0" cellspacing="0" cellpadding="10" align="center">
<tr>
<td width="28%" rowspan="5" class="table-you" align="center">
<TABLE onMouseOver="this.style.backgroundColor='#FF6600'" onMouseOut="this.style.backgroundColor=''" width=100 height=100 cellSpacing=1 cellPadding=2 bgColor=#e1e1e1 border=0>
<TBODY>
<TR>
<TD width=100 height=100 bgColor=#ffffff align=center> <a href="readProduct.asp?productID=<%=rs("productID")%>" target="_blank"><img src="admin/<%=trim(rs("bigpic"))%>" width=100 border=0 height=77></a></td>
</tr>
</tbody>
</table></td>
<td colspan="2"><img src="images/ring01.gif"> <font color="#ff6600"><%=(rs("product"))%> </td>
</tr>

<tr>
<td colspan="2" valign="top">产品类别：<%=rs("bigclass")%>>>><a href="smallProList.asp?bigclass=<%=rs("bigclass")%>&smallclass=<%=rs("smallclass")%>"><%=rs("smallclass")%></a></td>
</tr>
<tr>
<td width="53%" valign="top"> 内容简介：<font color="#666666">
<%if len(trim(rs("content")))>100 then
response.write left(trim(rs("content")),98)&"..."
else
response.write trim(rs("content"))
end if%>
</font></td>
<td width="19%" valign="top">&nbsp;</td>
</tr>
</table>

<%
processedrecord=processedrecord+1
rs.movenext
loop
end if
rs.close
set rs=nothing
%>

</td>
</tr>
<tr>
<td align="center">
<table width="99%" border="0" cellspacing="1" cellpadding="1" align="center">
<form action="bigprolist.asp" method="post">
<tr height="25">
<td align="center">总记录数：<%=RecordCount%>　每页显示：<%=PageSize%>　总计页数：<%=pagecount%>　当前页数：<%=Page_No%>　
<%if page_no>1 then%>
<a href="?page_no=<%=page_no-1%>">上一页</a> |
<%end if%>
<a href="?page_no=<%=page_no%>">刷新</a>
<%if page_no<pagecount then%>
| <a href="?page_no=<%=page_no+1%>">下一页</a>
<%end if%>
转到第
<select name="page_no" size="1">
<option value="<%=page_no%>" selected><%=Page_No %></option>
<%For i=1 to pagecount%>
<option value="<%=i%>"><%=i%></option>
<%Next%>
</select>
页
<input name="submit" type="submit" value="GO">
</td>
</tr>
</form>
</table></td>
</tr>
</table>
</TD>
</TR>

如果我去掉“粗体”部分可以显示下一页
我没有去掉就不能显示
该怎么改啊

page_up_down.asp里的 代码如下：


<%
CurrentPage=0
PageCount=0
RecordCount=0
page_no=Trim(Request("page_no"))

if page_no="" then
page_no=1
else
page_no=Cint(page_no)
end if


Do While Not rs.EOF
RecordCount = RecordCount + 1
rs.MoveNext
Loop

if Not rs.BOF then
rs.MoveFirst
end if

PageCount = Round(RecordCount/PageSize)
If PageCount < RecordCount/PageSize then
PageCount = PageCount + 1
end if

CurrentPage=Page_No

if CurrentPage>pagecount then
CurrentPage=pagecount
end if
Page_No=CurrentPage

startrecord=(CurrentPage-1)*pagesize

if not rs.eof then
rs.MoveFirst
end if

if not rs.eof then
rs.Move startrecord
end if
processedrecord=0

%>