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