當前位置:編程學習大全網 - 源碼下載 - 信息網站源代碼

信息網站源代碼

如果妳有壹個包含大量內容的巨大網站,訪問者通常很難找到他們需要的內容。這時候妳就需要壹個現場搜索來幫助訪客更快的找到所請求的信息!現在用asp就可以輕松實現這個功能,更何況現在支持asp的網站還那麽多。有了這個搜索引擎,妳可以在妳的主頁上搜索任何文件或軟件信息,而且可以精確到每壹個字!說了這麽多妳心痛嗎?然後按照以下步驟構建自己的搜索引擎:

(1)首先用access97建立壹個名為list.mdb的數據庫,並在其中建立壹個名為list的表。然後,在列表中輸入壹些妳想要查詢的文件名,以及關鍵詞和相應的鏈接。下面建立了四個項目ID(編號)、title(主題)、word(關鍵字)和url(鏈接地址),如下表所示:

ID標題文字url

1 cgi教程本地調試cgi cgi/testcgi.htm

2下載中心聊天室,留言簿下載/index.htm

(2)、數據庫建立後,就可以建立妳的asp搜索頁面了。下面是壹個asp搜索頁面的源程序,文件名為search.htm。這個搜索引擎可以同時搜索標題和單詞的內容。當然,如果需要,您可以建立更多的搜索:

& lt!-# INCLUDE file = " adovbs . Inc "-& gt;

& lt% "建立到數據庫的連接。

con = " DBQ = "+server . mappath(" list . MDB ")+";default dir =;DIRVER={microsoft Access驅動程序(*。MDB)};"

"創建壹個連接對象並打開數據庫。

set mycon = server . createobject(" ADODB。連接”)

mycon . open . con % & gt;

“創建壹個記錄集對象例程,打開記錄集對象並傳遞SQL字符串和所有連接信息。

& lt% set RS = server . createobject(" ADODB。記錄集”)

rs.open "SELECT*FORM列表,其中標題和單詞如' % ' & amprequest . form(" word ")& amp;“%”、MyCon、adOpenStatie

% & gt

“查詢顯示信息和查詢頁面建立後,妳可以取任何妳想要的名字。

& lthtml & gt& lthead & gt& lttitle & gt查詢結果

& ltbody bgcolor = " # ffffff " & gt

& ltp align="center " >& ltbr & gt

“統計查詢* * *有

& ltdiv align="center " >& lt中心& gt

& lttable border = " 1 " align = " center " border color = " 000000 " berdorcoorlight = " # 000000 " bordercolordark = " # ffffff " & gt;

& lttr align="center " >

& ltTD width = " 20% " align = " center " bgcolor = " # ffffff " & gt。ID & lt/TD & gt;

& ltTD width = " 60% " align = " center " bgcolor = " # ffffff " & gt。主題

& ltTD width = " 20% " align = " center " bgcolor = " # ffffff " & gt。視角

& lttable border = " 1 " align = " center " border color = " 000000 " berdorcoorlight = " # 000000 " bordercolordark = " # ffffff " & gt;

& lttr align="center " >

& lt!-從數據庫中提取信息-& gt;

& lt% while not rs.eof % & gt

& lttr align="center " >

& ltTD width = " 20% " align = " center " bgcolor = " # ffffff " & gt。& lt% = RS(" id ")% & gt;& lt/TD & gt;

& ltTD width = " 60% " align = " center " bgcolor = " # ffffff " & gt。& lt% = RS(" title ")% & gt;& lt/TD & gt;

& ltTD width = " 20% " align = " center " bgcolor = " # ffffff " & gt。& lta href = " & lt% =rs("url") % >& gtGO & lt/a & gt;& lt/TD & gt;

& lt% rs.movenext % & gt& lt/tr & gt;& lt% wend % & gt& lt/table & gt;& lt/center & gt;& lt/div & gt;& lt% rs.close % & gt

& lt% mycon.close % & gt

“關閉鏈接

& lt/body & gt;& lt/html & gt;

讓我們建立壹個搜索頁面。

& lthtml & gt& lthead & gt& lttitle & gt搜索頁面

& lt!-創建搜索表-& gt;

& ltfrom method = " POST " action = " search . ASP " & gt;

& ltdiv align="center " >& lt中心& gt& ltp & gt& ltinput type = " text " name = " word " size = " 30 " >

& ltinput type = " submit " value = " submit " name = " b 1 " >& ltinput type = " reset " value = " clear " name = " B2 " & gt;& lt/p & gt;

& lt/center & gt;& lt/div & gt;& lt/form & gt;

& lthr width="600" align="center " >

& lthtml & gt

好了,這個站點搜索引擎到這裏就完成了,接下來妳要做的就是把東西輸入數據庫!

  • 上一篇:什麽是地量指標?
  • 下一篇:淩晨4點是PCL夏季錦標賽的最後壹輪。為什麽沈偉說這個圈子在搞人的心態?
  • copyright 2024編程學習大全網