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