product_search.asp

多多网店系统v3.01 完全免费可用版-功能简介: 支持多模板皮肤色切换[8套] 支持按商品特性[推荐商品/特价商品/新品分类]浏览 支持按商品类别浏览 支持单件商品用支付宝交易按钮直接支付订

<%
//最上部调出或写入
dim dbpath
dbpath=""
%>
<!--#include file=Conn.asp -->
<!--#include file=include/MyRequest.asp -->
<!--#include file=Sub.asp-->
<!--#include file=include/Pages.asp-->
<%
dim rs,sql,root_info_aboutus
Set rs=Server.CreateObject("ADODB.Recordset")
sql="select root_info_aboutus from root_info where id=1"
rs.open sql,conn,1,1
root_info_aboutus =rs(0)
rs.close
set rs=nothing

//整体框架上部
call up("商品搜索","商品搜索","商品搜索")

//整体框架中部-主体
response.write "			<form name=form1 action=Product_ListSearch.asp method=get>"
response.write "			<tr><td valign=top>商品类别:</td>"
response.write "				<td><select name=cid size=5>"
response.write "					<option value='' selected>所有商品类别下</option>"
  									sql="select cid,product_class_name from product_class order by cid desc"
  									set rs=conn.execute (sql)
 	 								set cid=rs(0)
  									set product_class_name=rs(1)
  									do while not rs.eof
  									response.write "<option value="&cid&">"&product_class_name&"</option>"
 				 					rs.movenext
 				 					loop
  				 					rs.close
  				 					set rs=nothing
response.write "		 			</select>"
response.write "		 		</td>"
response.write "			</tr>"
response.write "			<tr><td>商品名称包含:</td><td><input type=text name=name size=30> 匹配多个关键字全部，可用空格或 AND 连接。</td></tr>"
response.write "			<tr><td>商品内容包含:</td><td><input type=text name=detail size=30></td></tr>"
response.write "			<tr><td>商品价格(本站价):</td><td><input size=6 name=UserPriceMin>元(小值)&nbsp; 至 <input size=6 name=UserPriceMax>元(大值)</td></tr>"
response.write "			<tr><td>商品特性:</td><td><input type=checkbox name=flag1 value=1>推荐&nbsp; <input type=checkbox name=flag2 value=2>新品 <input type=checkbox name=flag value=3>特价</td></tr>"
response.write "			<tr><td>  </td><td><input type=submit value='开始搜索'></td></tr>"
response.write "			</form>"

//整体框架下部
call down()
%>