%
name=Trim(Request.Form("name"))
name=replace(name,"'","")
kind=Trim(Request.Form("kind"))
kind=replace(kind,"'","")
jewel=Trim(Request.Form("jewel"))
jewel=replace(jewel,"'","")
aabb="aabb"
if name="" then
if kind="" then
if jewel="" then
sql="SELECT * from product where jewel='"&aabb&"' order by p_id desc"
else
sql="SELECT * from product where jewel='"&jewel&"' order by p_id desc"
end if
else
if jewel="" then
sql="SELECT * from product where kind1='"&kind&"' or kind2='"&kind&"' order by p_id desc"
else
sql="SELECT * from product where (kind1='"&kind&"' or kind2='"&kind&"') and jewel='"&jewel&"' order by p_id desc"
end if
end if
else
if kind="" then
if jewel="" then
sql="SELECT * from product where name='"&name&"' order by p_id desc"
else
sql="SELECT * from product where name='"&name&"' and jewel='"&jewel&"' order by p_id desc"
end if
else
if jewel="" then
sql="SELECT * from product where name='"&name&"' and kind1='"&kind&"' or kind2='"&kind&"' order by p_id desc"
else
sql="SELECT * from product where name='"&name&"' and jewel='"&jewel&"' and (kind1='"&kind&"' or kind2='"&kind&"') order by p_id desc"
end if
end if
end if
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
%>
<%
if not isempty(request("page")) then
pagecount=cint(request("page"))
else
pagecount=1
end if
rs.PageSize=9
if rs.eof and rs.bof then
response.write "
=====对不起:没有符合要求的记录=====
"
response.end
end if
if pagecount>rs.pagecount or pagecount<=0 then
pagecount=1
end if
rs.AbsolutePage=pagecount
dim i
i=0
%>
莎福瑞珠宝