ASP智能搜索的實現

2024-05-04 11:03:09

字體：大中小

來源：轉載

供稿：網友

用ASP實現搜索引擎的功能是一件很方便的事，可是，如何實現類似3721的智能搜
索呢？比如，當在搜索條件框內輸入“中國人民”時，自動從中提取“中國”、
“人民”等關鍵字并在數據庫內進行搜索。看完本文后，你就可以發現，這個功
能實現起來竟然是如此的簡單。OK，Follow Me！
    第一步，我們要建立一個名為db_sample.mdb的數據庫（本文以Access2000數
據庫為例），并在其中建立表T_Sample。表T_Sample包括如下字段：
        ID            自動編號
        U_Name    文本
        U_Info      備注
    第二步，我們開始設計搜索頁面Search.asp。該頁面包括一個表單
（Frm_Search），表單內包括一個文本框和一個提交按鈕。并將表單的method屬
性設為“get” ，action屬性設為“Search.asp"，即提交給網頁自身。代碼如下
：
    
    <form name="frm_Search" method="get" action="Search.asp">
       請輸入關鍵字：
       <input type="text" name="key" size="10">
       <input type="submit" value="搜索">
    </form>
    下面，就進入了實現智能搜索的關鍵部分。
    首先，建立數據庫連接。在Search.asp的開始處加入如下代碼：
    <%
    Dim strProvider,CNN
        strProvider="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
        strProvider=strProvider & Server.MapPath("/") &
"/data/db_Sample.mdb"  '假設數據庫存放在主頁根目錄下的data目錄下
        Set CNN = Server.CreateObject("ADODB.connection")
        CNN.Open strProvider  '打開數據庫連接
    %>
    接下來，判斷 ASP頁所接收到的數據，并在數據庫中進行搜索。
    <%
    Dim S_Key,RST,StrSQL
        S_Key = Trim(Request("key"))   '得到搜索關鍵字的值
        If S_Key <>"" then
            Set RST=Server.CreateObject("ADODB.RecordSet")

上一篇：CJJ專用ASP類庫中的某個class

下一篇：ASP編程實用20例