用ASP建立站內(nèi)搜索_ASP教程
推薦：ASP整合一個(gè)SQL語(yǔ)句類我們?cè)趯慳sp數(shù)據(jù)庫(kù)程序的時(shí)候，通常都會(huì)用到SQL語(yǔ)句，而在增加數(shù)據(jù)和更新數(shù)據(jù)的時(shí)候，通常會(huì)使用一下方式：insert into message (incept,sender,title,content,sendtime,flag,issend) values ('incept(i)','membername','title','message',Now(),0,1) 當(dāng)字段比較多的時(shí)
假如你擁有一個(gè)龐大的網(wǎng)站，內(nèi)容又多，那么來(lái)訪者往往很難找到自己所需要的東東，這時(shí)候你就需要一個(gè)站內(nèi)搜索來(lái)幫助來(lái)訪者更快的找到索要的資料了！現(xiàn)在你就可以用asp輕易的實(shí)現(xiàn)這種功能，何況現(xiàn)在支持asp的站點(diǎn)這么多，利用這個(gè)搜索引擎可以搜索到你的主頁(yè)里面任何一個(gè)文件或者軟件資料，它可以精確到每個(gè)字！說(shuō)了這么多你是不是怦然心動(dòng)了啊，那就按照下面的步驟來(lái)建立自己的搜索引擎吧：
（一），首先利用access97建立一個(gè)名為list.mdb的數(shù)據(jù)庫(kù)，在里面建立一個(gè)名為list的表，然后在list表里面輸入一些你想要被查詢的文件名字，關(guān)鍵的搜索詞還有相對(duì)應(yīng)的鏈接，下面建立了四個(gè)項(xiàng)目ID（編號(hào)），title（主題），Word（關(guān)鍵詞），url（鏈接地址），如下表所示：
（二），建立了數(shù)據(jù)庫(kù)以后就可以建立你的asp搜索頁(yè)面了，下面是一個(gè)文件名為search.htm的asp搜索頁(yè)面的源程序，這個(gè)搜索引擎可以同時(shí)搜索title和word里面的內(nèi)容，當(dāng)然如果你有需要的話可以建立更多的搜索：
<!--#INCLUDE file="ADOVBS.inc"-->
<% "建立數(shù)據(jù)庫(kù)的連接
con="DBQ="+server.mappath("list.mdb")+";DefaultDir=;DIRVER={microsoft Access Driver(*.mdb)};"
"建立CONNECTION對(duì)象并打開(kāi)數(shù)據(jù)庫(kù)
set mycon=server.createobject("ADODB.CONNECTION")
mycon.open.con %>
"創(chuàng)建Recordset對(duì)象的例程，打開(kāi)Recordset對(duì)象傳遞SQL串以及所有的連接信息
<% set rs=server.createobject("ADODB.Recordset")
rs.open "SELECT*FORM list where title and word like '%'&request.form("word")&"%'",MyCon,adOpenStatie
%>
"建立查詢后的顯示信息和查詢頁(yè)面,你想取什么名字都可以
<html><head><title>查詢結(jié)果</title></head>
<body bgcolor="#ffffff">
<p align="center"><br>
"統(tǒng)計(jì)查詢共有<% Response.Write(RS.RecordCount) %>條紀(jì)錄</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">
<!--從數(shù)據(jù)庫(kù)提取信息-->
<% 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 %>
"關(guān)閉鏈接
</body></html>
下面我們來(lái)建立搜索頁(yè)面
<html><head><title>搜索頁(yè)面</title></head>
<!--創(chuàng)建搜索表格-->
<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>
好了，這個(gè)站內(nèi)搜索引擎到這里就算完成了，你接下來(lái)要做的就是吧東西輸入數(shù)據(jù)庫(kù)了！
本文由沙灘小子整理，您可以轉(zhuǎn)載，但請(qǐng)務(wù)必注明其出處及保持其完整性，謝謝！
分享：ASP模板類代碼Class Template Private m_FileName, m_Root, m_Unknowns, m_LastError, m_HaltOnErr Private m_ValueList, m_BlockList Private m_RegExp Private Sub Class_Initialize Set m_ValueList = CreateObject(Scripting.Dictionary) Set m_BlockList = CreateObject(Script
- asp FSO 讀寫文件本文件實(shí)現(xiàn)代碼
- asp中isNull、isEmpty和空字符串的區(qū)別
- asp獲取用戶真實(shí)IP地址的方法
- asp連接sqlserver數(shù)據(jù)庫(kù)實(shí)現(xiàn)代碼
- asp中正則表達(dá)式過(guò)濾html代碼函數(shù)
- asp中g(shù)et post提交表單區(qū)別
- 網(wǎng)頁(yè)模板:ASP內(nèi)建對(duì)象Request
- xmlhttp的open方法使用詳解
- ASP的常用的自定義函數(shù)大全
- asp中用for循環(huán)的一個(gè)小技巧
- eWebEditor v3.8 列目錄
- ASP無(wú)組件分頁(yè)實(shí)現(xiàn)思路及代碼
- 相關(guān)鏈接：
- 教程說(shuō)明：
ASP教程-用ASP建立站內(nèi)搜索
。