想按下面的程序设计一个搜索程序玩玩.可是老是没法正常运行!不知那里出错了.有那位高手能帮我搞好发个附件给我再慢慢研究吗?万分感谢了.实在没办法了.或者你们有些什么好点的带数据库的搜索程序发个给小弟研究一下.学习学习.
(一),首先利用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>