KesionCMS制作人才招聘系统站内高级搜索
很多科汛fans已对系统自带的的简单搜索感谢不满足了，比如做人才网的用户希望能根据职位类型，工作地点，关键字等进行精确搜索，这时如果用ＫesionCMS自带搜索标签显然不符合要求．很幸运KesionCMS是完全开源的．您完全可以自由的DIY搜索．这里我就大家举个例子说明吧。
假设我们利用科汛强大的自定义模型自定义了一个叫"人才招聘"的系统,模型ＩＤ号为110,基类型（文章类）．里面含有自定义字段包括:职位类型(KS_ZWLX),工作地点(KS_GZD),学历要求(KS_XL)等等,那么我们需要按照KS_ZWLX,KS_GZD这两个字段进行搜索．实现如下图效果：
根据以上分析．我们就可以在模板里写出搜索表单
代码如下
<table border=0>
<form name="searchform" action="/plus/search.asp" method="get">
<input type="hidden" name="channelid" value="110">
<input type="hidden" name="searchtype" value="1">
<tr>
<td>
<select name="KS_ZWLX">
<option value="">选择行业类别</option>
<option value="计算机硬件及网络设备">计算机硬件及网络设备</option>
<option value="计算机软件">计算机软件</option>
<option value="IT服务（系统/数据/维护）/多领域经营">IT服务（系统/数据/维护）/多领域经营</option>
</select>
</td>
</tr>
<tr>
<td>
<select name="KS_GZD">
<option value="">选择工作地区(必选)</option>
<option value="北京">北京</option>
<option value="上海">上海</option>
<option value="广东省">广东省</option>
<option value="天津">天津</option>
</select>
</td>
</tr>
<tr>
<td>
<input type="text" name="keyword" value="请输入职位或公司名称" onclick="this.value=''">
</td>
</tr>
<tr>
<td>
<inpu type="submit" value="搜索职位">
</td>
</tr>
</form>
</table>
自写表单代码说明：
１、表单处理文件/plus/search.asp
２、必须提交的字段ChannelID（模型ＩＤ）,SearchType(搜索类型),KeyWord(搜索关键字)
channelid 模型的ID号，可以后台的模模型管理处查到
SearchType 搜索类型,取值说明
1 表示按标题title搜索（这个例子我们定义为职位名称或公司名称)
2 表示按文章内容ArticleContent（这个例子里我们可以定义为职位介绍）
3 表示按作者
4 表示按录入者
100 表示按添加时间
.....
3、自定义字段 KS_ZWLX,KS_GZD
上面已经完成在模板里的写的搜索表单代码。接下来就是修改下搜索处理文件 /plus/search.asp
KesionCMS 对文章系统模型的搜索条件构造函数在/plus/search.asp文件里的Sub ArticleSearch()函数，那么我们就打并找到Sub ArticleSearch() 函数
Sub ArticleSearch()
Dim SqlStr,Param
Param=" Where Verific=1 And DelTF=0"
Select Case SearchType
Case 100
If IsDate(KeyWord) Then
If CInt(DataBaseType) = 1 Then
Param=Param & " And AddDate>='" & KeyWord & " 00:00:00' and AddDate<='" &KeyWord & " 23:59:59'"
else
Param=Param & " And AddDate>=#" & KeyWord & " 00:00:00# and AddDate<=#" &KeyWord & " 23:59:59#"
end if
Else
Exit Sub
End If
Case 1
If (FuzzySearch=1) Then
For I=0 To Ubound(KeyWordArr)
If I=0 Then
Param=Param & " And (Title Like '%" & KeyWordArr(i) & "%'"
Else
Param = Param & " or Title Like '%" & KeyWordArr(i) & "%'"
End If
Next
Else
Param=Param & " And (Title Like '%" & KeyWord & "%'"
End If
Param=Param & ")"
Case 2:Param=Param & " And ArticleContent Like '%" & KeyWord & "%'"
Case 3:Param=Param & " And Author Like '%" & KeyWord & "%'"
Case 4:Param=Param & " And ArticleInput Like '%" & KeyWord & "%'"
Case 5:Param=Param & " And KeyWords Like '%" & KeyWord & "%'"
Case else
if (FuzzySearch=1) Then
For I=0 To Ubound(KeyWordArr)
If I=0 Then
Param=Param & " And (Title Like '%" & KeyWordArr(i) & "%'"
Else
Param = Param & " or Title Like '%" & KeyWordArr(i) & "%'"
End If
Next
Else
Param=Param & " And (Title Like '%" & KeyWord & "%' or Author Like '%" & KeyWord & "%'"
End If
Param=Param & ")"
End Select
If ClassID<>"0" Then Param=Param & " And Tid In(" & KS.GetFolderTid(ClassID) & ")"
If ChannelID=110 Then
Param= Param & " and KS_ZWLX='" & KS.S("KS_ZWLX") & "' and KS_GZD='" & KS.S("KS_GZD") & "'"
End If
SqlStr="Select * From " & KS.C_S(ChannelID,2) & Param & " Order By ID Desc"
Set RS=Server.CreateObject("ADODB.RECORDSET")
RS.Open SqlStr,Conn,2,1
上面加红色代码就是我们根据自定义搜索补充的条件。相信有点sql基础的朋友，对这条语句能一目了然吧,不清楚的朋友不好紧。
自定义模型条件对
if channelid=110 then
....
end if
请一定要加上if channelid=110 ....这样对原系统功能的搜索就不会影响。您如果有多个自定义模板都想要自己写搜索表单，就在下面接下去写if then end if 条件对吧
搜索结果的模板页就不用我多说了，只需注意在搜索模板页里调用自定义字段格式是{$KS_自定义字段名称}即可.
希望以上的教程能对初学者起到抛砖引玉的作用。非常感谢谢大家一直以来对科汛的支持！真心希望我们的工作能给您带来方便。