ASP實(shí)現(xiàn)智能搜索實(shí)現(xiàn)代碼
更新時(shí)間：2008年06月25日 17:23:03 作者：
asp下智能搜索功能的實(shí)現(xiàn)，方便大家學(xué)習(xí)
<%
Function AutoKey(strKey)
Const lngSubKey=2
lngLenKey=Len(strKey)
Select Case lngLenKey
Case 0 '若為空串，轉(zhuǎn)到出錯(cuò)頁(yè)
Response.Redirect "Error.htm"
Case 1 '若長(zhǎng)度為1，則不設(shè)任何值
strNew1=""
strNew2=""
Case Else '若長(zhǎng)度大于1，則從字符串首字符開(kāi)始，循環(huán)取長(zhǎng)度為2的子字符串作為查詢條件
For i=1 To lngLenKey-(lngSubKey-1)
strSubKey=Mid(strKey,i,lngSubKey)
strNew1=strNew1 & " Or U_Name like '%" & strSubKey & "%'"
strNew2=strNew2 & " Or U_Info like '%" & strSubKey & "%'"
Next
End Select
'得到完整的SQL語(yǔ)句
AutoKey="Select * from T_Sample where U_Name like '%" & strKey & "%' Or U_Info like '%" & strKey & "%'" & strNew1 & strNew2
End Function
%>
Function AutoKey(strKey)
Const lngSubKey=2
lngLenKey=Len(strKey)
Select Case lngLenKey
Case 0 '若為空串，轉(zhuǎn)到出錯(cuò)頁(yè)
Response.Redirect "Error.htm"
Case 1 '若長(zhǎng)度為1，則不設(shè)任何值
strNew1=""
strNew2=""
Case Else '若長(zhǎng)度大于1，則從字符串首字符開(kāi)始，循環(huán)取長(zhǎng)度為2的子字符串作為查詢條件
For i=1 To lngLenKey-(lngSubKey-1)
strSubKey=Mid(strKey,i,lngSubKey)
strNew1=strNew1 & " Or U_Name like '%" & strSubKey & "%'"
strNew2=strNew2 & " Or U_Info like '%" & strSubKey & "%'"
Next
End Select
'得到完整的SQL語(yǔ)句
AutoKey="Select * from T_Sample where U_Name like '%" & strKey & "%' Or U_Info like '%" & strKey & "%'" & strNew1 & strNew2
End Function
%>
相關(guān)文章
ASP 高亮顯示不區(qū)分大小寫(xiě)的關(guān)鍵字
今日，碰到一個(gè)問(wèn)題：如何在網(wǎng)頁(yè)中高亮顯示不區(qū)分大小寫(xiě)的關(guān)鍵字2010-01-01
ASP中實(shí)現(xiàn)定時(shí)發(fā)送郵件的代碼分享
這篇文章主要介紹了ASP中實(shí)現(xiàn)定時(shí)發(fā)送郵件的代碼分享,使用VBS的方式實(shí)現(xiàn),并運(yùn)行在數(shù)據(jù)庫(kù)中,需要的朋友可以參考下2014-07-07
【摘 要】本文詳細(xì)介紹關(guān)于asp代碼實(shí)例學(xué)習(xí)：注冊(cè)登陸代碼的文章專題。2008-05-05
透徹掌握ASP分頁(yè)技術(shù)很詳細(xì)的分析
一些論壇上面關(guān)于分頁(yè)的ASP程序依然有許多的關(guān)注者，但里面只有代碼，沒(méi)有詳細(xì)的解釋，對(duì)于初學(xué)者來(lái)說(shuō)，這樣總是得不到真正的掌握，此次我將針對(duì)分頁(yè)技術(shù)進(jìn)行詳解，讓大家來(lái)理解ASP分頁(yè)！2008-06-06
PerlScript編寫(xiě)ASP(轉(zhuǎn)載)
PerlScript編寫(xiě)ASP(轉(zhuǎn)載)...2007-01-01
ASP基礎(chǔ)入門(mén)第七篇（ASP內(nèi)建對(duì)象Response）
這篇文章主要介紹了ASP內(nèi)建對(duì)象Response的相關(guān)資料，需要的朋友可以參考下2015-10-10
ASP代碼的對(duì)象化...2006-10-10
用ASP實(shí)現(xiàn)寫(xiě)IIS日志的代碼
用ASP實(shí)現(xiàn)寫(xiě)IIS日志的代碼...2007-11-11
上一篇文章，我們將text中的數(shù)據(jù)插入到了textarea中，后臺(tái)就需要處理，在textarea中，回車(chē)符不是“\n”，應(yīng)該是chr(13)。2010-05-05
.Net core 的熱插拔機(jī)制的深入探索及卸載問(wèn)題求救指南
這篇文章主要介紹了.Net core 的熱插拔機(jī)制的深入探索及卸載問(wèn)題求救指南,本文給大家啊介紹的非常詳細(xì)，對(duì)大家的學(xué)習(xí)或工作具有一定的參考借鑒價(jià)值，需要的朋友可以參考下2020-11-11