info_search.asp

来自「网上购物,不错的购物系统,花了好长时间来改的」· ASP 代码 · 共 25 行

<table width="100%" height="31" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <form name="form2" method="post" action="research.asp">
      <td width="37%" height="31" align="center" background="images/main/bbgg.gif">&nbsp;</td>
      <td width="63%" align="center" background="images/main/bbgg.gif">关键字词：
        <input name="searchkey"  type="text" size=10>
查询分类：
<%set rs=server.CreateObject("adodb.recordset")
		  rs.open "select * from sh_sort 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>
<input type="image" border="0" name="submit" src="images/search1.gif" width="52" height="20">
&nbsp; <a href="search.asp"><img src="images/search2.gif" width="52" height="20" border="0"></a> </td>
    </form>
  </tr>
</table>