用途:文章表內文章關鍵字查詢
查詢格式:百度google 百度好還是google好百度+google (也可不輸入條件全部查詢)
<!--#includefile="conn.asp"-->
<%
FunctionSearshSQL(Tname,Lname,Str)'Tname-表名Lname-列名Str-查詢的字符
IfTrim(Str)=""then
MySql="Select*From"&Tname
Else
Str=SqlEncode(Str)'預處理查詢字符串
ArrStr=split(Str,"")'用空格分割處理後字符串
Umax=Ubound(ArrStr)'分割後數組上維,確定分割成關鍵詞的個數
IfUmax>0Then'關鍵詞中多個空格的處理,從第2維開始處理
Fori=1toUmax
StrTemp=ArrStr(i)
IfTrim(StrTemp)=""ThenStrTemp="/~~~~~/"'分割成的元素為空用特殊字符代替
Sql=Sql&"Or"&Lname&"like'%"&StrTemp&"%'"
Next
EndIf
MySql="Select*From"&Tname&"where"&Lname&"like'%"&ArrStr(0)&"%'"&Sql
Do
j=InStr(1,MySql,"%/~~~~~/%",1)
Ifj=0Then
ExitDo
EndIf
MySql=Replace(MySql,"Or"&Lname&"like'%/~~~~~/%'","")