解讀處理多關鍵詞查詢實例代碼_ASP教程

以下為引用的內容：

'關鍵字的搜索

str=select * from tableName where id>4

if srhKey<> then

keyArr=split(srhKey, )

j=UBound(keyArr)

t=0

dim keystrArr()

for i=0 to j

if keyArr(i)<> then

redim preserve keystrArr(t)

strfilter=(empZw like '%&keyArr(i)&%' or empDep like '%&keyArr(i)&%' or empGz like '%

strfilter=strfilter&keyArr(i)&%' or empWy1 like '%&keyArr(i)&%' or empWy2 like '%&keyArr(i)

strfilter=strfilter&%' or empYq like '%&keyArr(i)&%' or com_name like '%&keyArr(i)&%')

keystrArr(t)=strfilter

t=t 1

end if

next

keystr=join(keystrArr, and )

str=str& and &keystr

end if