处理多关键词查询实例代码

作者:网络 来源:佚名 更新时间:2008-12-11 23:37:54 点击:
,欢迎访问网页设计爱好者web开发。

在中经常遇到多关键词对对单个字段查询,我一般是通过动态数组来实现的。当然多个关键词的一般是用空格或,隔开,我这几假设多个关键词用空格隔开,关键字字符串为keystr,具体代码为。

程序代码:

以下为引用的内容:

'关键字的搜索
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