% page=request("page")
kind=trim(request("kind"))
if kind="" then
kind="办公桌"
end if
sql="select * from product where kind='"&kind&"' and isbest=0 order by addtime desc"
rs.open sql,conn,1,1
rs.pagesize=6
if page="" or isnumeric(page)=false or page<1 then
page=1
end if
page=cint(page)
if page>rs.pagecount then
page=rs.pagecount
end if
%>
<% if not rs.eof then
rs.absolutepage=page
end if
%>
<% Select Case kind
Case "木制家具"
Vdetail = "detail_wood.asp"
Case Else
Vdetail = "detail.asp"
End Select
%>
<%
sql2="select * from type order by id desc"
set rs2=conn.execute(sql2)
%>