運行環境：IIS指令碼語言：VBScript資料庫：Access/SQL Server資料庫語言：SQL 1．概要：
不論是在論壇，還是新聞系統，或是下載系統等動態網站中，大家經常會看到搜尋功能：搜尋文章，搜尋使用者，搜尋軟體（總之搜尋索引鍵）等，本文則是介紹如何建立一個高效實用的，基於ASP的站內多值搜尋。
本文面對的是“多條件模糊比對搜尋”，理解了多條件的，單一條件搜尋也不過小菜一碟了。一般來講，有兩種方法進行多條件搜尋：
枚舉法和
遞進法。搜尋條件不太多時（
n<=3）,可使用枚舉法，其語句頻度為2的
n次方，成指數增長，
n為條件數。很明顯，當條件增多以後，無論從程式的效率還是可實現性考慮都應採用遞進法，其語句頻度為
n，成線性增長。需要指出的是，枚舉法思路非常簡單，一一判斷條件是否為空白，再按非空條件搜尋，同時可以利用真值表技術來對付條件極多的情況（相信沒人去幹這種事，4條件時就已經要寫16組語句了）；遞進法的思想方法較為巧妙，重在理解，其巧就巧在一是使用了標誌位（flag）,二是妙用SQL中字串串連符&。下面以執行個體來講解引擎的建立。
2．執行個體：
我們建立一通訊錄查詢引擎，資料庫名為addressbook.mdb,表名為address,欄位如下：
IDNameTelSchool1張 三33333333電子科技大學電腦系2李 四44444444四川大學生物系3王 二22222222西南交通大學建築系…………
Web搜尋介面如下：
姓名：電話：學校：搜尋按鈕
採用
枚舉法的來源程式如下：<%@ CODEPAGE = "936" %>'串連資料庫<%dim conn dim DBOathdim rsdim sql Set conn=Server.CreateObject("ADODB.Connection") DBPath = Server.MapPath("addressbook.mdb") conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPathSet rs=Server.CreateObject("ADODB.Recordset")'從Web頁擷取姓名、電話、學校的值dim Namedim Teldim SchoolName=request("Name")Tel=request("Tel")School=request("School")'枚舉法的
搜尋核心，因為有3個條件所以要寫8組If判斷語句 if trim(Name)="" and trim(Tel)="" and trim(School)="" then sql="select * from address order by ID asc" end if if trim(Name)="" and trim(Tel)="" and trim(School)<>"" then sql="select * from address where School like '%"&trim(School)&"%' order by ID asc" end if if trim(Name)="" and trim(Tel)<>"" and trim(School)="" then sql="select * from address where Tel like '%"&trim(Tel)&"%' order by ID asc" end if if trim(Name)="" and trim(Tel)<>"" and trim(School)<>"" then sql="select * from address where Tel like '%"&trim(Tel)&"%' and School like '%"&trim(School)&"%' order by ID asc" end if if trim(Name)<>"" and trim(Tel)="" and trim(School)="" then sql="select * from address where Name like '%"&trim(Name)&"%' order by ID asc" end if if trim(Name)<>"" and trim(Tel)="" and trim(School)<>"" then sql="select * from address where Name like '%"&trim(Name)&"%' and School like '%"&trim(School)&"%' order by ID asc" end if if trim(Name)<>"" and trim(Tel)<>"" and trim(School)="" then sql="select * from address where Name like '%"&trim(Name)&"%' and Tel like '%"&trim(Tel)&"%' order by ID asc" end if if trim(Name)<>"" and trim(Tel)<>"" and trim(School)<>"" then sql="select * from address where Name like '%"&trim(Name)&"%' and Tel like '%"&trim(Tel)&"%' and School like '%"&trim(School)&"%' order by ID asc" end ifrs.open sql,conn,1,1'顯示搜尋結果if rs.eof and rs.bof then response.write "目前通訊錄中沒有記錄"else do while not rs.eof response.write "姓名："&rs("Name")&"電話："&rs("Tel")&"學校："&rs("School")&"<br>" rs.movenext loopend if'斷開資料庫set rs=nothing conn.close set conn=nothing%>
理解上述程式時，著重琢磨核心部分，8組語句一一對應了3個搜尋方塊中的8種狀態
NameTelSchool空空空空空非空空非空空空非空非空非空空空非空空
