searchinfo.asp

商业网站开发有源代码可以运行

<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td background="images/bj_x.gif" height="1"></td>
  </tr>
  <tr> 
    <td height="22" bgcolor="EDECEC"> 
      <table cellspacing=0 cellpadding=0 width=170 height="20">
        <tr> 
          <td width=5>&nbsp;</td>
          <td> 
            <div align="center"></div>
             &nbsp;商品搜索</td>
        </tr>
      </table>
    </td>
  </tr>
  <tr> 
    <td height="1" background="images/bj_x.gif"></td>
  </tr>
  <tr> 
    <td> <br>
      <table width="88%" border="0" align="center" cellpadding="1" cellspacing="1">
        <form name="form2" method="post" action="research.asp">
          <tr> 
            <td align="center">关键字词： 
              <input name="searchkey" style="BORDER-RIGHT: #ffffff 1px groove; BORDER-TOP: #ffffff 1px groove; BORDER-LEFT: #ffffff 1px groove; COLOR: #333333; BORDER-BOTTOM: #ffffff 1px groove; HEIGHT: 18px; BACKGROUND-COLOR: #FFFFFF"; type="text" size=10>
            </td>
          </tr>
          <tr> 
            <td align="center">查询分类： 
              <%set rs=server.CreateObject("adodb.recordset")
		  rs.open "select * from shop_anclass order by anclassidorder",conn,1,1
		  %>
              <select name="anclassid">
                <option value="0">所有分类</option>
                <%do while not rs.eof%>
                <option value="<%=rs("anclassid")%>"><%=trim(rs("anclass"))%></option>
                <%rs.movenext
		  loop
		  rs.close
		  set rs=nothing%>
              </select>
            </td>
          </tr>
          <tr> 
            <td height="38" align="center"> 
              <input type="image" border="0" name="submit" src="images/kscx.gif" width="54" height="18">
              &nbsp; <a href="search.asp"><img src="images/gjcx.gif" width="54" height="18" border="0"></a> 
            </td>
          </tr>
        </form>
      </table>
    </td>
  </tr>
</table>