ASP站内搜索代码#

最新推荐文章于 2023-03-20 07:45:52 发布

sontin

最新推荐文章于 2023-03-20 07:45:52 发布

阅读量2.8k

点赞数 6

分类专栏： ASP 文章标签： ASP 数据库搜索引擎 Word

本文链接：https://blog.csdn.net/sontin/article/details/9943281

版权

ASP 专栏收录该内容

12 篇文章 0 订阅

订阅专栏

方法一：利用各大搜索的收录

<script type="text/javascript">  
function Gsitesearch(curobj){  
var domainroot=curobj.domainroot[curobj.domainroot.selectedIndex].value  
curobj.q.value="site:"+domainroot+" "+curobj.qfront.value  
}  
</script>  
<form action="http://www.Google.com/search" method="get" onSubmit="Gsitesearch(this)">  
<input name="q" type="hidden" />  
<input name="qfront" type="text" style="width: 180px" /> <input type="submit" value="立刻搜索" /><br /><br />  
站点:  
<select name="domainroot">  
<option value="www.nokucun.com" selected="1">本站</option>  
</select>  
</form>

方法二：自己建库

用ASP建立站内搜索代码实例假如你拥有一个庞大的网站，内容又多，那么来访者往往很难找到自己所需要的
东东，这时候你就需要一个站内搜索来帮助来访者更快的找到索要的资料了！现在你
就可以用asp轻易的实现这种功能，何况现在支持asp的站点这么多，利用这个搜索引
擎可以搜索到你的主页里面任何一个文件或者软件资料，它可以精确到每个字！说了
这么多你是不是怦然心动了啊，那就按照下面的步骤来建立自己的搜索引擎吧：

（一），首先利用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里
面的内容，当然如果你有需要的话可以建立更多的搜索：

<% "建立数据库的连接
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>

好了，这个站内搜索引擎到这里就算完成了，你接下来要做的就是吧东西
输入数据库了！

sontin

关注

6
点赞
踩
11

收藏

觉得还不错? 一键收藏
0
评论
ASP站内搜索代码#

方法一：利用各大搜索的收录 function Gsitesearch(curobj){ var domainroot=curobj.domainroot[curobj.domainroot.selectedIndex].value curobj.q.value="site:"+domainroot+" "+curobj.qfront.value }
复制链接

扫一扫