dim page
page=Clng(request("page"))
rs.pagesize=9
if page<1 then page=1
if page>rs.pagecount then page=rs.pagecount
rs.Absolutepage=page
i=1
do while not rs.eof
if i mod 3 =1 then
response.Write("<tr>")
end if%>
<td align="center"><a href="product_show.asp?id=<%=rs("id")%>" target="_blank"><img src="<%=rs("p_pic2")%>" alt="<%=rs("etitle")%>" width="100" height="100" border="0"/></a><br />
<a target="_blank" href="product_show.asp?id=<%=rs("id")%>"><%=rs("etitle")%></a><br /></td>
<%
rs.movenext
if i mod 3 =0 then
response.Write("</tr>")
end if
i=i+1
if i>rs.pagesize then exit do
loop
%>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<form name="form1" method="get" action="?classid="<%=classid%>&"">
<tr>
<td height="29" align="center">
<%
if page<>1 then
response.write "<a href=cproduct.asp?classid="&classid&"&id="&id&"&page=1>Home</a> "
response.write "<a href=cproduct.asp?classid="&classid&"&id="&id&"&page="&(page-1)&">Up</a> "
end if
if page<>rs.pagecount then
response.write "<a href=cproduct.asp?classid="&classid&"&id="&id&"&page="&(page+1)&">Next</a> "
response.write "<a href=cproduct.asp?classid="&classid&"&id="&id&"&page="&rs.pagecount&">Last</a> "
end if
%>
Pages<%=page%> Toal<%=rs.pagecount%>Pages <%= rs.pagesize %>Product/Pages
<select name="page">
<%
dim m
m=0
do while m < rs.pagecount
m=m+1%>
<option value="<%= m %>" <% if m=page then %>selected<% end if %>><%= m %></option>
<% loop %></select>
<input type="submit" method="submit" value="GO">
我在第一类下面的时候，点NEXT时，地址是cproduct.asp?classid=6&page=2
而在该类下面选择下拉二的时候，点GO，地址确是cproduct.asp?PAGE=2
怎么解决这个问题啊？》》
