per_searcher_add.asp

直接附加数据库！ 修改 Include/ Class_Main.asp 为自己信息 后台admin admin 绍兴人才网程序

                            <tr> 
                              <td width="18%" height="25" align="right" bgcolor="f9f9f9">职位更新日期：</td>
                              <td height="25" bgcolor="f9f9f9"> <select style="width:180px;"  name=publishdate>
                                  <option value=0>更新日期不限</option>
                                  <option value=1>近一天</option>
                                  <option value=2>近二天</option>
                                  <option value=3>近三天</option>
                                  <option value=7>近一周</option>
                                  <option value=14>近两周</option>
                                  <option value=30>近一月</option>
                                  <option value=60>近两月</option>
                                  <option value=90>近三月</option>
                                </select></td>
                            </tr>
                            <tr> 
                              <td width="18%" height="25" align="right">学历要求：</td>
                              <td height="25"> <select name="edus" id="edus" style="width:70px;">
                                  <option value="0" selected>-不限-</option>
                                  <option value="10">小学</option>
                                  <option value="20">初中</option>
                                  <option value="30">高中</option>
                                  <option value="40">中专</option>
                                  <option value="50">专科</option>
                                  <option value="60">本科</option>
                                  <option value="70">硕士</option>
                                  <option value="80">博士</option>
                                  <option value="90">博士后</option>
                                </select> </td>
                            </tr>
                            <tr> 
                              <td width="18%" height="25" align="right" bgcolor="f9f9f9">工作年限：</td>
                              <td height="25" bgcolor="f9f9f9"><select name="works" id="works" style="width:70px;">
                                  <option value="0" selected>-不限-</option>
                                  <option value="1">一年以上</option>
                                  <option value="2">二年以上</option>
                                  <option value="3">三年以上</option>
                                  <option value="4">四年以上</option>
                                  <option value="5">五年以上</option>
                                  <option value="10">十年以上</option>
                                  <option value="20">二十年以上</option>
                                  <option value="30">三十年以上</option>
                                  <option value="50">退休人员</option>
                                </select></td>
                            </tr>
                            <tr> 
                              <td width="18%" height="25" align="right">性别要求：</td>
                              <td height="25"><select name="sex" size="1"  style="width:70px;">
                                  <option selected value="2">-不限-</option>
                                  <option value="1">男</option>
                                  <option value="0">女</option>
                                </select></td>
                            </tr>
                            <tr> 
                              <td width="18%" height="25" align="right" bgcolor="f9f9f9">年龄要求：</td>
                              <td height="25" bgcolor="f9f9f9"><select name="min_age" size="1" id="min_age"  style="width:70px;">
                                  <option selected value="0">-不限-</option>
                                  <% 
								  For i=18 to 60
								   Response.write "<option value="&i&">"&i&"</option>"
								  Next 
								   %>
                                </select>
                                至 
                                <select name="max_age" size="1" id="max_age"  style="width:70px;">
                                  <option selected value="0">-不限-</option>
                                  <% 
								  For i=18 to 60
								   Response.write "<option value="&i&">"&i&"</option>"
								  Next 
								   %>
                                </select></td>
                            </tr>
                            <tr>
                              <td height="25" align="right">现所在地：</td>
                              <td height="25"> 
                                <!--#include file="../Include/Class_Locus3.asp" -->
                              </td>
                            </tr>
                          </table>
                          <table width="99%" border="0" align="center" cellpadding="0" cellspacing="0">
                            <tr> 
                              <td height="2"></td>
                            </tr>
                          </table> </td>
                      </tr>
                    </table></td>
                </tr>
                <tr> 
                  <td height="40" align="center"> 
                    <input type="submit" name="Submit" value=" 新增搜索器 " style="height:30px;">
                    <SCRIPT language=JavaScript>
  var objJobCPSelector, objJobCCSelector, objAreaSelector, objCitySelector

  objAreaSelector = new PlaceAssociateList(document.theForm.slt_workplacearea, null, document.theForm.slt_workplacecity, ALOptions);
  objAreaSelector.addedOptions   = new Array("不限-|工作地区不限");
  objAreaSelector.init();
  objCitySelector = new PlaceAssociateList(document.theForm.slt_workplacecity, document.theForm.slt_workplacearea, null, CLOptions);
  objCitySelector.incPValue = true;
  objCitySelector.incPValueFormat = "%PText%－不限"
  objCitySelector.addedOptions   = new Array("不限-不限|不限");
  objCitySelector.init();
  
  objJobCPSelector = new JobCategoryAssociateList(document.theForm.slt_category, null, document.theForm.slt_subcategory, PCLOptions);
  objJobCPSelector.addedOptions   = new Array("0-|职位类别不限");
  objJobCPSelector.init();
  objJobCCSelector = new JobCategoryAssociateList(document.theForm.slt_subcategory, document.theForm.slt_category, null, CCLOptions);
  objJobCCSelector.incPValue = true;
  objJobCCSelector.incPValueFormat = "%PText%－不限"
  objJobCCSelector.addedOptions   = new Array("0-0|不限");
  objJobCCSelector.init();  
                    </SCRIPT> </td>
                </tr>
             </Form> 
            </table></td>
        </tr>
      </table>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td height="1" bgcolor="#eeeeee"></td>
  </tr>
</table>
<!--#include file="../Include/Footer.asp" -->
	  </td>
  </tr>
</table>

</body>
</html>
<% 
Sub Add_Submit()
 Perid           = Session("Person")(2)
 UserName        = Session("Person")(0)
 '//检测该用户的搜索器是否达到3个
 SQL = "Select Count(Ncid) From [pH_Person_Searcher] Where Perid='"&Perid&"'"
 Set Rs = Conn.Execute(SQL)
 If Rs(0) >= 3 Then
   Response.Write "<script>alert('对不起！您已经创建了3个搜索器...');location.href='Per_Searcher.asp';</script>"
   Response.End()
 End if
 Rs.Close
 
 Searcher_Name   = Replace_Text(Request.Form("Name"))
 JobClass        = Replace_Text(Request.Form("slt_selectedjobs"))
 Work            = Replace_Text(Request.Form("slt_selectedplaces"))
 PublishDate     = Replace_Text(Request.Form("PublishDate"))
 Edus            = Replace_Text(Request.Form("Edus"))
 Works           = Replace_Text(Request.Form("Works"))
 Sex             = Replace_Text(Request.Form("Sex"))
 MinAge          = Replace_Text(Request.Form("Min_Age"))
 MaxAge          = Replace_Text(Request.Form("Max_Age"))
 Locus_Area      = Replace_Text(Request.Form("x_suozaidi"))
 Locus_City      = Replace_Text(Request.Form("x_suozaidi1"))
 
 Work            = Split(Work,"-")
 
 SQL = "Insert Into [pH_Person_Searcher]  (Perid,UserName,Searcher_Name,WorkWillClass,Area,City,PublishDate,Edus,Works,Sex,MinAge,MaxAge,Locus_Area,Locus_City) Values ('"&Perid&"','"&Username&"','"&Searcher_Name&"','"&JobClass&"','"&Work(0)&"','"&Work(1)&"',"&PublishDate&","&Edus&","&Works&","&Sex&","&MinAge&","&MaxAge&",'"&Locus_Area&"','"&Locus_City&"')"

 Conn.Execute(SQL)
 
 Response.Redirect "Per_Searcher.asp"
 
End Sub

'//关闭数据库连接
CloseDB
 %>