晓夏

小皇

教育信息化方案砖家

asp站内搜索代码

浏览量:2390

以下代码能同时筛选:区域、大类、小类、商品—商家《单选框》、关键字

《一》,首先利用Access 2003建立一个名为list.mdb的数据库,在里面建立一个名为list的表,然后在list表里面输入一些你想要被查询的文件名字,关键的搜索词还有相对应的链接,下面建立了四个项目ID《编号》,title《主题》,word《关键词》,url《链接地址》,如下表所示:



ID        title           word            url
1        cgi教程        本地调试cgi       cgi/testcgi.htm
2        下载中心       聊天室,留言本    download/index.htm




《二》,建立了数据库以后就可以建立你的asp搜索页面了,下面是一个文件名
为search.htm的asp搜索页面的源程序,这个搜索引擎可以同时搜索title和word里面的内容,当然如果你有需要的话可以建立更多的搜索:


<!--#i nclude file="ADOVBS.inc"-->
<% "建立数据库的连接
con="DBQ="+server.mappath《"list.mdb"》+";DefaultDir=;DIRVER={microsoft Access Driver《*.mdb》};"
"建立CONNECTION对象并打开数据库
set mycon=server.createobject《"ADODB.CONNECTION"》
mycon.open.con %>
"创建Recordset对象的例程,打开Recordset对象传递SQL串以及所有的
连接信息
<% set rs=server.createobject《"ADODB.Recordset"》
rs.open "SELECT*FORM list where title and word like ""%""
&request.form《"word"》&"%""",MyCon,adOpenStatie
%>



"建立查询后的显示信息和查询页面,你想取什么名字都可以

<html><head><title>查询结果</title></head>
<body bgcolor="#ffffff">
<p align="center"><br>
"统计查询共有<% Response.Write《RS.RecordCount》 %>条纪录</p><br>
<div align="center"><center>
<table border="1" align="center"
bordercolor="000000" berdorcoorlight="#000000"
bordercolordark="#ffffff">


<tr align="center">
<td width="20%" align="center" bgcolor="#ffffff">ID</td>
<td width="60%" align="center" bgcolor="#ffffff">主题</td>
<td width="20%" align="center" bgcolor="#ffffff">查看</td></table>
<table border="1" align="center"
bordercolor="000000" berdorcoorlight="#000000"
bordercolordark="#ffffff">

<tr align="center">
<!--从数据库提取信息-->
<% while not rs.eof %>
<tr align="center">
<td width="20%" align="center" bgcolor="#ffffff"><% =rs《"id"》 %></td>
<td width="60%" align="center" bgcolor="#ffffff"><% =rs《"title"》 %></td>
<td width="20%" align="center" bgcolor="#ffffff"><a href="<% =rs《"url"》 %>">GO</a></td>
<% rs.movenext %></tr> <% wend %></table></center></div><% rs.close %>
<% mycon.close %>
"关闭链接
</body></html>

下面我们来建立搜索页面

<html><head><title>搜索页面</title></head>
<!--创建搜索表格-->
<from method="POST" action="search.asp">
<div align="center"><center><p><input type="text" name="word" size="30">
<input type="submit" ="提交" name="B1"><input type="reset" ="清除" name="B2"></p>
</center></div></form>
<hr width="600" align="center">
<html>


神回复

发表评论:

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。