用ASP建立站內資訊搜尋系統

　假如你擁有一個龐大的網站，內容又多，那麼來訪者往往很難找到自己所需要的東東，這時候你就需要一個站內搜尋來協助來訪者更快的找到索要的資料了！現在你就可以用asp輕易的實現這種功能，何況現在支援asp的網站這麼多，利用這個搜尋引擎可以搜尋到你的首頁裡面任何一個檔案或者軟體資料，它可以精確到每個字！說了這麼多你是不是怦然心動了啊，那就按照下面的步驟來建立自己的搜尋引擎吧：

　　（一），首先利用access97建立一個名為list.mdb的資料庫，在裡面建立一個名為list的表，然後在list表裡面輸入一些你想要被查詢的檔案名稱字，關鍵的搜尋字詞還有相對應的連結，下面建立了四個項目ID（編號），title（主題），word（關鍵詞），url（連結地址），如下表所示：

ID titlewordurl 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＞
　　好了，這個站內搜尋引擎到這裡就算完成了，你接下來要做的就是吧東西輸入資料庫了！