利用索引服務和ASP建立面向整個網站搜尋程式

來源:互聯網
上載者:User
程式|索引|索引 配置Index Server
在執行Web伺服器上的搜尋之前,首先必須建立至少一個索引,並遵循以下步驟完成這項工作。

⒈啟動Windows 2000 Server伺服器上的索引。

預設情況下選擇表徵圖位於管理工具組中的電腦管理。視窗的右邊提供關於當前在伺服器上
存在的索引資訊。預設有兩個索引:System和Web。

⒉要建立新的索引,用滑鼠右鍵單擊索引服務或右邊的面板,選定建立編錄。

顯示添加編錄對話方塊,指定索引的名稱並用瀏覽按鈕選取位置。索引服務不會立即開始索引,此時將彈出一條訊息框,單
擊確定繼續。為了達到最佳的效能,索引服務可以放在和Web伺服器隔離開的硬碟上。

⒊指定索引的目錄,用按右鍵建立的編錄名,從彈出選單中選定屬性,將出現如圖2所示的對話方塊。

第一個選項卡常規顯示剛剛輸入的內容,在第二個選項卡跟蹤中的WWW伺服器下拉式清單中選取你要索引的Web網站。

⒋有了建立的編錄,現在可以挑選你想在索引中包括的目錄。

這個強大的特性使你能建立幾個用不同方式搜尋內容的索引。例如,你可能想快速探索從完整的文本中所引出的章節,這
個特性使你能在Index Server內執行這項任務。要添加一個目錄,用按右鍵右邊的面板,選定建立目錄。在出現的對話
框中通過瀏覽按鈕選擇目錄並指定別名。如果必須登入到伺服器才能得到需要的內容,則可以提供將使用的使用者名稱和密
碼,以便得到需要的內容。如果想檢查受保護的內容,則更要維護內容的安全性,這一特性非常有用,這樣只有被授權的
使用者(也許是那些為此付錢的人)才能得到完整的內容。

還可以使用這個工具排除Web網站中不想索引的子目錄。例如,檢索Scripts/CGI目錄就不會對使用者有什麼用。為此,只要
雙擊該目錄,將包括在索引中選定為否即可,見圖3。

⒌在已經為網站包括/排除了所有目錄後,用按右鍵右面板,從彈出選單中選定啟動,重新啟動Index Server服務。

伺服器將開始瀏覽已經建立的索引並開始檢索內容。

來源程式:
1、search.asp
<HTML>
<HEAD>
<TITLE>The Indexing Service</TITLE>
<STYLE TYPE="text/css">
BODY {font-family:Tahoma,Arial,sans-serif; font-size:10pt}
.heading {font-family:Tahoma,Arial,sans-serif; font-size:14pt; font-weight:bold}
.cite {font-family:Tahoma,Arial,sans-serif; font-size:8pt}
</STYLE>
</HEAD>
<BODY BGCOLOR="#FFFFFF">
<SPAN CLASS="heading">Searching The Indexing Service Using ADO</SPAN><HR>
<!--------------------------------------------------------------------------->

<FORM Name="frmSearch" ACTION="QueryIndexServer.asp" METHOD="POST">
Search For: <INPUT TYPE="TEXT" NAME="txtSearchFor">
<P>
<INPUT TYPE="SUBMIT" VALUE="Perform Search">
<INPUT TYPE="RESET" VALUE="Clear Form">
</FORM>

</BODY>
</HTML>
2、QueryIndexServer.asp
<TITLE>The Indexing Service</TITLE>
<STYLE TYPE="text/css">
BODY         {font-family:Tahoma,Arial,sans-serif; font-size:10pt}
.heading    {font-family:Tahoma,Arial,sans-serif; font-size:14pt; font-weight:bold}
.cite        {font-family:Tahoma,Arial,sans-serif; font-size:8pt}
.document    {font-size:10pt; font-weight:bold; background-color:lightgrey; width:100%}
</STYLE>
</HEAD>
<BODY BGCOLOR="#FFFFFF">
<SPAN CLASS="heading">Results of search for
<I><%=Request.Form("txtSearchFor")%></I>
</SPAN><HR>
<!--------------------------------------------------------------------------->

<%

  Dim strSearch

  Set rsSearch = Server.CreateObject("ADODB.Recordset")

  ' create the connection string
  strConn = "Provider=MSIDXS; Data Source=web"

  ' construct the search string
  strSearch = "SELECT DocTitle, Path, FileName, Characterization, Size,write" & _
              " FROM SCOPE()" & _
              " WHERE CONTAINS ('" & Request.Form("txtSearchFor") & "')"

  ' open the recordset on the search
  rsSearch.Open strSearch,strConn

  ' show what's been searched for
  While Not rsSearch.EOF
    Response.Write "<SPAN CLASS='document'>" & rsSearch("DocTitle") & "</SPAN><BR>" & _
                   rsSearch("Characterization") & "<BR>" & _
                   "<A HREF='" & rsSearch("Path") & "'>" & rsSearch("write") & "</A>" & _
                   " (" & rsSearch("Size") & " bytes)<P>"
    rsSearch.MoveNext
  Wend

  ' tidy up
  rsSearch.Close
  Set rsSearch = Nothing
%>


</BODY>
</HTML>
採用預設的web索引利用索引服務和ASP建立面向整個網站搜尋程式 (網站建設相關 -- ASP & ASP+, 人氣:9)  
網友對本文的評論共有0篇 [查看/發表評論]    [專業IT技術論壇]  
  
配置Index Server
在執行Web伺服器上的搜尋之前,首先必須建立至少一個索引,並遵循以下步驟完成這項工作。

⒈啟動Windows 2000 Server伺服器上的索引。

預設情況下選擇表徵圖位於管理工具組中的電腦管理。視窗的右邊提供關於當前在伺服器上
存在的索引資訊。預設有兩個索引:System和Web。

⒉要建立新的索引,用滑鼠右鍵單擊索引服務或右邊的面板,選定建立編錄。

顯示添加編錄對話方塊,指定索引的名稱並用瀏覽按鈕選取位置。索引服務不會立即開始索引,此時將彈出一條訊息框,單
擊確定繼續。為了達到最佳的性



相關文章

Cloud Intelligence Leading the Digital Future

Alibaba Cloud ACtivate Online Conference, Nov. 20th & 21st, 2019 (UTC+08)

Register Now >

Starter Package

SSD Cloud server and data transfer for only $2.50 a month

Get Started >

Alibaba Cloud Free Trial

Learn and experience the power of Alibaba Cloud with a free trial worth $300-1200 USD

Learn more >

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。