searchbar.asp

来自「全功能网上商城」· ASP 代码 · 共 49 行

ASP
49 行
字号 
<%
sqlsearch="select distinct LarCode,LarSeq from ProdClass order by LarSeq asc"
set rssearch=Server.Createobject("ADODB.RecordSet")
rssearch.Open sqlsearch,conn,1,1
%>

<head>
<title></title>
</head>

<body bgcolor="#CCFFCC">

<TABLE cellpadding=2 cellspacing=0 border=0 width=100% align=center height="10">
  <form name=fmsearch action="search.asp" method=post><TR>
	  <TD align=right width="50%" height="2"> 
        <p align="left"><font color="#FFFFFF">
        &nbsp;
        <marquee align="bottom" scrolldelay="120">欢迎光临我的商城！能为您服务是我的荣幸！</marquee>
        </font>
      </TD>
	  <TD align=right width="40%" height="2"> 
        <p align="right"> 
        <select name="LarCode">
          <%
if rssearch.bof and rssearch.eof then
	response.write "<option value='' selected>目前还没有分类</option>"
else
response.write "<option value='' selected>搜索商品类别</option>"
	Do While Not rssearch.eof %>
			  <option value="<%=rssearch("LarCode")%>"><%=rssearch("LarCode")%></option>
	<% if rssearch.eof then
		 exit do
	 end if
	rssearch.movenext
	Loop
end if
rssearch.close
set rssearch=nothing
%>
        </select>
        <INPUT TYPE="text" NAME="keywords" > 
        </p>
      </TD>
      <TD align="center" width="10%" height="2"> 
        <input type=image src="images/search.gif" border=0 name="search">
      </TD>
</TR></form>
</TABLE>

searchbar.asp - 源码说明

本页面展示了「全功能网上商城」中的 searchbar.asp 源码文件，采用 ASP 编程语言编写，共 49 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与网上商城相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?