程序代码： 以下为引用的内容： 复制代码 代码如下:'关键字的搜索 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

　　推荐阅读

　　asp form 表单验证函数

'************************************* '检测是否只包含英文和数字 '************************************* Function IsvalidValue(ArrayN, Str) IsvalidValue = False Dim GName For Each GName in ArrayN If >>>详细阅读

本文标题：ASP 多关键词查询实例代码

地址：http://www.17bianji.com/kaifa2/ASP/32110.html

 1/2    1