列表框和文本框组合查询的功能。代码如下，可就是没有起效果，不知错在哪里了。麻烦

快速查找:	商品编号 商品名称 入库日期

<% sql="select * from kcsp where 1=1" if request("action")="se" then sql=sql&" and "&request("type")&" like '%"&request("sqptext")&"%'" end if sql=sql&" order by kcsp_id asc" set rs=server.createobject("adodb.recordset") rs.open sql,conn,1,1 if rs.recordcount>0 then rs.pagesize=10 page=request("page") if not isnumeric(page) then page=1 end if page=clng(page) if page<1 then page=1 if page>rs.pagecount then page=rs.pagecount href="kcsp.asp" rs.absolutepage=page for ipage=1 to rs.pagesize %> <% rs.movenext if rs.eof then exit for next %>

编号	名称	型号	价格	数量	单位	类别	入库时间
<%=rs("kcsp_id")%>	<%=rs("kcsp_name")%>	<%=rs("kcsp_xh")%>	<%=rs("kcsp_jg")%>	<%=rs("kcsp_sl")%>	<%=rs("kcsp_jldw")%>	<%=rs("kcsp_lb")%>	<%=rs("kcsp_lksj")%>