asp做产品搜索

来源:百度知道 编辑:UC知道 时间:2024/09/21 22:15:52
就按产品名称查询!
下面的是产品显示页
<%
dim typeid
typeid=trim(request("typeid"))
'classname=cstr("classname")
if typeid<>"" then
sql="select * from design where typeid="&typeid&" order by id desc"
else
sql="select * from design order by id desc"
end if

set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
Response.Write "<p align=center><font color='#959595'><br><br> <strong>此类本站暂无作品,请查看其它类别......</strong></font></p><br><br>"
else
rs.pagesize=12
allpage=rs.pagecount
hang=4

if Not IsEmpty(Request("Page")) then
Page=CInt(Request("Page"))
if Page>rs.PageCount then
page=Rs.pageCount
rs.AbsolutePage=rs.PageCount
else
rs.AbsolutePage=Page
end if

帮你加了一个:
<%
dim typeid
typeid=trim(request("typeid"))
sousuo=request("sousuo")
neirong=request("neirong")
'classname=cstr("classname")
if typeid<>"" and neirong<>"" then
sql="select * from design where typeid="&typeid&" and filename like '%"&neirong&"%'order by id desc"
else
sql="select * from design order by id desc"
end if

set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
Response.Write "<p align=center><font color='#959595'><br><br> <strong>此类本站暂无作品,请查看其它类别......</strong></font></p><br><br>"
else
rs.pagesize=12
allpage=rs.pagecount
hang=4

if Not IsEmpty(Request("Page")) then
Page=CInt(