假如你擁有一個(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)然如果你有需要的話可以建立更多的搜索:
下面我們來(lái)建立搜索頁(yè)面
好了,這個(gè)站內(nèi)搜索引擎到這里就算完成了,你接下來(lái)要做的就是吧東西輸入數(shù)據(jù)庫(kù)了!
(一),首先利用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(鏈接地址),如下表所示:
| ID | title | word | url |
| 1 | cgi教程 | 本地調(diào)試cgi | cgi/testcgi.htm |
| 2 | 下載中心 | 聊天室,留言本 | download/index.htm |
(二),建立了數(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è)面,你想取什么名字都可以 ?。糷tml><head><title>查詢結(jié)果</title></head> <body bgcolor="#ffffff"> ?。紁 align="center"><br> "統(tǒng)計(jì)查詢共有<% Response.Write(RS.RecordCount) %>條紀(jì)錄</p><br> ?。糚 align="center"><center> <table border="1" align="center" bordercolor="000000" berdorcoorlight="#000000" bordercolordark="#ffffff"> ?。紅r align="center"> ?。紅d width="20%" align="center" bgcolor="#ffffff">ID</td> ?。紅d width="60%" align="center" bgcolor="#ffffff">主題</td> <td width="20%" align="center" bgcolor="#ffffff">查看</td></table> ?。紅able border="1" align="center" bordercolor="000000" berdorcoorlight="#000000" bordercolordark="#ffffff"> ?。紅r align="center"> <!--從數(shù)據(jù)庫(kù)提取信息--> ?。? while not rs.eof %> ?。紅r align="center"> <td width="20%" align="center" bgcolor="#ffffff"><% =rs("id") %></td> ?。紅d 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></P> ?。? 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"> <P 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></P></form> <hr width="600" align="center"> <html> |
好了,這個(gè)站內(nèi)搜索引擎到這里就算完成了,你接下來(lái)要做的就是吧東西輸入數(shù)據(jù)庫(kù)了!
標(biāo)簽:





