(一),首先利用access97建立一个名为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里面的内容,当然如果你有需要的话可以建立更多的搜索:
<!--#INCLUDE 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"
value="提交" name="B1"><input type="reset"
value="清除" name="B2"></p>
</center></div></form>
<hr width="600"
align="center">
<html>
好了,这个站内搜索引擎到这里就算完成了,你接下来要做的就是吧东西输入数据库了!
本文由沙滩小子整理,您可以转载,但请务必注明其出处及保持其完整性,谢谢!
Word教程网 | Excel教程网 | Dreamweaver教程网 | Fireworks教程网 | PPT教程网 | FLASH教程网 | PS教程网 |
HTML教程网 | DIV CSS教程网 | FLASH AS教程网 | ACCESS教程网 | SQL SERVER教程网 | C语言教程网 | JAVASCRIPT教程网 |
ASP教程网 | ASP.NET教程网 | CorelDraw教程网 |