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