现在很多商城系统都有搜索价格区间的功能，方便客户搜索从某个最低价位到最高价位之间的商品，在ecshop之类购物系统都有，这个功能很实用，相信也有不少人也需要这个功能，科汛自带的商城却没有这样的功能，各位不要着急，科汛不是自称最强大的ＣＭＳ系统吗。。。呵呵^_^

此主题相关图片如下：未命名.jpg

 

言归正题，我们就开始来对科汛ＣＭＳ做一些小小修改：

打开plus/search.asp文件，找到第21行

把 Private ChannelID,ClassID,SearchType,KeyWord,SearchForm改为 Private ChannelID,ClassID,SearchType,KeyWord,Little,Big,SearchForm

再找到45行，在KeyWord=KS.S("KeyWord")下面插入

Little=KS.S("Little")
Big=KS.S("Big")

找到428行    Case 5:Param=Param & " And KeyWords Like '%" & KeyWord & "%'"
在下面插入如下代码

Case 6
     If Little="" Then Call KS.AlertHintScript("你没有输入最低价格!"):response.end
  If Big="" Then Call KS.AlertHintScript("你没有输入最高价格!"):response.end
  if (not IsNumeric(little)) Then Call KS.AlertHintScript("最低价请输入小写数字!"):response.end
  if (not IsNumeric(Big)) Then Call KS.AlertHintScript("最高价请输入小写数字!"):response.end
     Param=Param & "And Price_Original>=" & Little & " And Price_Original<=" & Big &""

文件存盘。

现在我们就完成了对search.asp的改造，接下来我们还要对ks_cls/KS.ManageCls.asp文件进行修改，

找到428行，在      SearchJS = SearchJS & "          <option value=""5"">商品Tags</option>" & vbCrLf的下面添加

      SearchJS = SearchJS & "          <option value=""6"">价格范围</option>" & vbCrLf

找到445行，在      SearchJS = SearchJS & "        <input name=""KeyWord"" type=""text"" class=""textbox""  value=""关键字"" onfocus=""this.select();""/>" & vbCrLf的下面添加

SearchJS = SearchJS & "        起始价<input name=""Little"" type=""text"" style=""width:50""  value="""" onfocus=""this.select();""/>" & vbCrLf
      SearchJS = SearchJS & "        结束价<input name=""Big"" type=""text"" style=""width:50""  value="""" onfocus=""this.select();""/>" & vbCrLf

现在完成所有文件的修改，不过调用{$GetShopSearch}标签时还不能看到效果，最后一步：

进入后台，添加新的一个栏目或修改一下栏目，系统就自动更新了shop下面的search.js文件，刷新一下页面吧，大功告成！

以上在4.5　utf-8 sp3测试通过！

*上面的修改还有一点就是不能检测输入全角数字，会出错，那位高手指点一下，不胜感激!^-^

留个记号...

做个记号

你真牛

本人第一个精华，呵呵。。自个儿再顶一下

先给你加精华。没有测试。

欢迎测试。