📄 search.asp
字号:
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<LINK href="new.css" rel=stylesheet type=text/css>
<title>闽东二手交易中心</title>
</head>
<body>
<div align="center">
<center>
<table width="700" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="17%" bgcolor="#f0f0f0" valign="top">
<!--#include file="bar_left.asp"-->
</td>
<td width="83%" bgcolor="#ffffff" valign="top">
<!--text begin-->
<a name="top">
<%
dim ersokind(902)
ersokind(101)="电脑配件-台式机"
ersokind(102)="电脑配件-笔记本及掌上电脑"
ersokind(103)="电脑配件-CPU"
ersokind(104)="电脑配件-主板"
ersokind(105)="电脑配件-硬盘"
ersokind(106)="电脑配件-显示器"
ersokind(107)="电脑配件-内存"
ersokind(108)="电脑配件-光驱"
ersokind(109)="电脑配件-显卡"
ersokind(110)="电脑配件-声卡"
ersokind(111)="电脑配件-网络设备"
ersokind(112)="电脑配件-打印机"
ersokind(113)="电脑配件-扫描仪"
ersokind(114)="电脑配件-软件"
ersokind(115)="电脑配件-音箱"
ersokind(117)="电脑配件-鼠标"
ersokind(118)="电脑配件-键盘"
ersokind(116)="电脑配件-其他"
ersokind(201)="办公用具-复印机"
ersokind(202)="办公用具-传真机"
ersokind(203)="办公用具-投影仪"
ersokind(204)="办公用具-其他"
ersokind(301)="通讯器材-普通电话"
ersokind(302)="通讯器材-寻呼机"
ersokind(303)="通讯器材-移动电话及配件"
ersokind(304)="通讯器材-其他"
ersokind(401)="视听设备-影碟机"
ersokind(402)="视听设备-录象机"
ersokind(403)="视听设备-三用机"
ersokind(404)="视听设备-摄象机"
ersokind(405)="视听设备-随身听"
ersokind(406)="视听设备-功放与发烧音箱"
ersokind(407)="视听设备-影碟与录像带"
ersokind(408)="视听设备-CD与磁带"
ersokind(409)="视听设备-其他"
ersokind(501)="家用电器-电视"
ersokind(502)="家用电器-冰箱与冰柜"
ersokind(503)="家用电器-空调与电风扇"
ersokind(504)="家用电器-洗衣机"
ersokind(505)="家用电器-微波炉与烤箱"
ersokind(506)="家用电器-吸尘器"
ersokind(507)="家用电器-家用游戏机及游戏"
ersokind(508)="家用电器-小家电"
ersokind(509)="家用电器-其他"
ersokind(601)="家居用具-家具"
ersokind(602)="家居用具-餐具"
ersokind(603)="家居用具-灯具"
ersokind(604)="家居用具-装饰用品"
ersokind(605)="家居用具-床上用品"
ersokind(606)="家居用具-家用工具"
ersokind(607)="家居用具-洁具"
ersokind(608)="家居用具-其他"
ersokind(701)="穿戴物品-男式衣裤"
ersokind(702)="穿戴物品-女式衣裤"
ersokind(703)="穿戴物品-儿童衣裤"
ersokind(704)="穿戴物品-男式鞋"
ersokind(705)="穿戴物品-女式鞋"
ersokind(706)="穿戴物品-儿童鞋"
ersokind(707)="穿戴物品-装饰品"
ersokind(708)="穿戴物品-其他"
ersokind(801)="交通工具-自行车及配件"
ersokind(802)="交通工具-摩托车及配件"
ersokind(803)="交通工具-汽车及配件"
ersokind(804)="交通工具-其他"
ersokind(901)="二手杂物-一切可以买卖的"
ersokind(902)="二手杂物-吃的"
dim sel(09)
sel(01)="select * FROM data where content like '%" & cstr(request("ersosearch")) & "%' or goods like '%" & cstr(request("ersosearch")) & "%' or price like '%" & cstr(request("ersosearch")) & "%' or buydate like '%" & cstr(request("ersosearch")) & "%' or buyorsell like '%" & cstr(request("ersosearch")) & "%' or province like '%" & cstr(request("ersosearch")) & "%' or city like '%" & cstr(request("ersosearch")) & "%' or trademode like '%" & cstr(request("ersosearch")) & "%' order by goods"
sel(02)="select * FROM data where goods like '%" & cstr(request("ersosearch")) & "%' order by goods"
sel(03)="select * FROM data where content like '%" & cstr(request("ersosearch")) & "%' order by goods"
sel(04)="select * FROM data where price like '%" & cstr(request("ersosearch")) & "%' order by goods"
sel(05)="select * FROM data where buydate like '%" & cstr(request("ersosearch")) & "%' order by goods"
sel(06)="select * FROM data where province like '%" & cstr(request("ersosearch")) & "%' or city like '%" & cstr(request("ersosearch")) & "%' order by goods"
sel(07)="select * FROM data where buyorsell like '%" & cstr(request("ersosearch")) & "%' order by goods"
sel(08)="select * FROM data where degree like '%" & cstr(request("ersosearch")) & "%' order by goods"
sel(09)="select * FROM data where amount like '%" & cstr(request("ersosearch")) & "%' order by goods"
sele=request("select")
on error resume next
connstr = "DBQ="+server.mappath("data.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("adodb.connection")
Conn.Open connstr
set rs = server.createobject("adodb.recordset")
set Rs = Conn.Execute(sqlbyname)
sqlbyname=sel(sele)
rs.open sqlbyname,conn,1,1
fl_xj=rs.recordcount
response.write "<div align=center><TABLE BORDER=0 align=center valign=middle><TR><TD >"
response.write "<br> * 你所输入的字符: <i>" + request("ersosearch") + "</i><br>"
response.write " * 共搜索到以下 <b>"
response.write cstr(fl_xj)+"</b> 个符合项目:"
response.write "</td></tr><tr><td><br>"
if Rs.bof and Rs.eof then
response.write "<p align=center>对不起，没有您要找的物品!</p>"
response.write "<p align=center>请您再试试其他条件,或者直接到类型栏中选择.谢谢!</p><br>"
else
do while not Rs.eof
response.write " <img src='find.gif'>"
response.write " <a href=item.ASP?id="+cstr(Rs("ID"))+">"
response.write Rs("goods")+"</A> "
response.write "<A HREF='type.asp?kind=" & Rs("kind") & "' style='text-decoration: none; color=#CCCCCC''><font size=1>["
typen=cstr(rs("kind"))
response.write ersokind(typen)+ "]</A></font><br>"
Rs.movenext
loop
end if
Rs.close
Conn.close
response.write "<p align=center><b><font face=Arial Unicode MS size=1>^ </font></b><font face=tahoma size=1><a href=#top>Back to top</a></font></p>"
response.write "</td></tr></table> </div>"
%>
<!--text end-->
<!--#include file="adv.htm"--> </td>
</tr>
</td>
</tr>
</table>
</table>
</div> </body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -