账号通
    

账号  

密码  

8603

查看

20

回复
主题:让搜索支持多关键词查询 [收藏主题] 本贴被认定为精华 转到:  
7seren 当前离线

218

主题

0

广播

0

粉丝
添加关注
级别:二年级

用户积分:2165 分
登录次数:171 次
注册时间:2007/11/23
最后登录:2013/5/21
7seren 发表于:2010/11/16 15:08:00   | 显示全部帖子 查看该作者主题 楼主 
科汛智能建站系统
参照以下方式,设置通用多条件组合筛选

http://www.kesion.com/kfrz/12928.html

功能实现:可以输入:中国 人民     (空格)  来查找  keywords中同时包含 中国   和  人民  的文章



也可以扩展成:   包含有   中国  或  人民  的文章 把  and  换成 or 即可



欢迎大家测试反馈,共同把这个功能完美,如果您有更简单的方法实现,也请提出来,共同研究



已知问题:这样搜索出来的文章,如果再来用排序功能,关键词就乱了   会变成:中国%20人民



空格被转换成  %20 了,不知有没有解决办法



找到

index.asp文件 中



If Not KS.IsNul(Key) And Key<>"0" Then

             Param=Param & " And Title Like '%" & Key & "%'"

         End If





替换成





'LDY 增加多词搜索功能,把 Title 换成了 KeyWords

dim strkeyword,multkeyword,Arrayi

multkeyword=split(key," ")   

Arrayi=ubound(multkeyword)   

if arrayi=0 then '只有一个关键字时,就不用执行循环了.   

Param=Param & " And KeyWords Like '%" &key& "%'"

else   

for i=0 to Arrayi   

if i=0 then'循环到第一个关键词时

Param=Param & " And KeyWords Like '%" &multkeyword(i)& "%' and "  

else   

if i=arrayi then '循环到最后关键词时   

Param=Param & " KeyWords Like '%" &multkeyword(i)& "%'"  

else   

Param=Param & " KeyWords Like '%" &multkeyword(i)& "%' and"  

end if   

end if   

next   

end if   
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
7seren 当前离线

218

主题

0

广播

0

粉丝
添加关注
级别:二年级

用户积分:2165 分
登录次数:171 次
注册时间:2007/11/23
最后登录:2013/5/21
7seren 发表于:2010/11/16 18:15:00   | 显示全部帖子 查看该作者主题 沙发 
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
7seren 当前离线

218

主题

0

广播

0

粉丝
添加关注
级别:二年级

用户积分:2165 分
登录次数:171 次
注册时间:2007/11/23
最后登录:2013/5/21
7seren 发表于:2010/11/17 22:15:00   | 显示全部帖子 查看该作者主题 藤椅 
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
<上一主题 | 下一主题 >
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行0.09375秒 powered by KesionCMS 9.0