基於ASP的站內多值搜尋

來源:互聯網
上載者:User
  運行環境: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空空空空空非空空非空空空非空非空非空空空非空空



相關文章

Beyond APAC's No.1 Cloud

19.6% IaaS Market Share in Asia Pacific - Gartner IT Service report, 2018

Learn more >

Apsara Conference 2019

The Rise of Data Intelligence, September 25th - 27th, Hangzhou, China

Learn more >

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 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。