company_hirelist.asp

嘉缘人才6.0精简 ,很好用的人才系统

align="center" bgcolor="#dbdbdb" border="0">
<tbody>
<tr>
<td bgcolor="#FFFFFF"><table cellspacing="0" cellpadding="0" width="100%" 
border="0">
<tbody>
<tr>
<td align="center" bgcolor="#999900" height="2"></td>
</tr>
<tr>
<td align="center" bgcolor="#FF6600" height="20"><font color="#ffffff"><b>您已经选择的专业（最多三个）</b></font></td>
</tr>
<tr>
<td bgcolor="#CCCCCC" height="1"></td>
</tr>
<tr>
<td><div style="MARGIN-top:10px">
<SELECT name=tempprofession size=7 multiple id="tempprofession" style="WIDTH: 230px" >
<%if hire_profession<>"" and not isnull(hire_profession) then
if hire_profession="0000" then
response.write "<OPTION value='0000'>专业要求不限</option>"
else
pstring=split(hire_profession,",")
for i=0 to ubound(pstring)
mainprofession_name=""
subprofession_name=""
profession=trim(pstring(i))
if profession<>"" then
mystring=split(profession,"*")
length=ubound(mystring)
select case length
case "0"
mainprofession=trim(mystring(0))
sql="select profession_name from job_profession where profession_id="&mainprofession&""
rs.open sql,conn,1,1
if not rs.eof then
mainprofession_name=rs("profession_name")
end if
rs.close
if mainprofession_name<>"" then
response.write "<OPTION value="&profession&">"&mainprofession_name&"-不限</option>"
end if
case "1"
mainprofession=trim(mystring(0))
subprofession=trim(mystring(1))
sql="select profession_name from job_profession where profession_id="&mainprofession&""
rs.open sql,conn,1,1
if not rs.eof then
mainprofession_name=rs("profession_name")
end if
rs.close
sql="select profession_name from job_profession where profession_id="&subprofession&""
rs.open sql,conn,1,1
if not rs.eof then
subprofession_name=rs("profession_name")
end if
rs.close
if mainprofession_name<>"" and subprofession_name<>"" then
response.write "<OPTION value="&profession&">"&mainprofession_name&"-"&subprofession_name&"</option>"
end if
end select
end if
next
end if
end if
%>
</SELECT>
</div></td>
</tr>
</tbody>
</table></td>
</tr>
</tbody>
</table></td>
</tr>
<tr>
<td colspan="3" height="12"><font color="#000000">
<input name="profession" type="hidden" id="workadd3" />
</font></td>
</tr>
</tbody>
</table></td>
</tr>
<tr>
<td align="right">学&nbsp;&nbsp;&nbsp;历：</td>
<td><select name="edu">
<option value="0" selected>不限</option>
<%
sql="select edu_id,edu_name from job_edu order by edu_id desc"
rs.open sql,conn,1,1
do while not rs.eof
if hire_edu=rs("edu_id") then
response.write"<OPTION value="&rs("edu_id")&" selected>"&rs("edu_name")&"</option>"
else
response.write"<OPTION value="&rs("edu_id")&">"&rs("edu_name")&"</option>"
end if
rs.movenext
loop
rs.close
set rs=nothing
%>
</select>
或以上</td>
</tr>
<tr>
<td align="right">工作经验：</td>
<td><select name=experience size=1 id="select21">
<option value=-100 selected>不限</option>
<option value=-1 <%if hire_edu=-1 then response.write "selected" end if%>>在读学生</option>
<option value=0 <%if hire_edu=0 then response.write "selected" end if%>>毕业生</option>
<%
for i=1 to 10
if hire_edu=i then
response.write "<option value='"&i&"' selected>"&i&"年</option>"
else
response.write "<option value='"&i&"'>"&i&"年</option>"
end if
next
%>
</select>
或以上 &nbsp; </td>
</tr>
<tr>
<td align="right">性&nbsp;&nbsp;&nbsp;&nbsp;别：</td>
<td><SELECT name=sex size=1>
<OPTION value=0 selected>不限</OPTION>
<OPTION value=1 <%if hire_sex=1 then response.write "selected" end if%>>男性</OPTION>
<OPTION value=2 <%if hire_sex=2 then response.write "selected" end if%>>女性</OPTION>
</SELECT></td>
</tr>
<tr>
<td align="right">&nbsp;年&nbsp;&nbsp;&nbsp; 龄：</td>
<td><SELECT name=age1 size=1 id="age1">
<OPTION value=0 selected>不限</OPTION>
<%
for i=16 to 60
if hire_age1=i then
response.write "<option value='"&i&"' selected>"&i&"</option>"
else
response.write "<option value='"&i&"'>"&i&"</option>"
end if
next
%>
</SELECT>
至
<SELECT name=age2 size=1 id="select2">
<OPTION value=0 selected>不限</OPTION>
<%
for i=16 to 60
if hire_age2=i then
response.write "<option value='"&i&"' selected>"&i&"</option>"
else
response.write "<option value='"&i&"'>"&i&"</option>"
end if
next
%>
</SELECT></td>
</tr>
</table>
<span class="maintit">公司联系方式</span>
<table width="100%" border="0" cellspacing="1" cellpadding="2">
  <tr>
    <td align="right"><font 
                              color="#ff6600">＊</font>公司名称：</td>
    <td><input name="comname" type="text" id="comname" value="<%=hire_name%>" size="38" maxlength="50" readonly /></td>
  </tr>
  <tr>
    <td width="18%" align="right">通讯地址：</td>
    <td width="82%"><input name="address" type="text" size="38" maxlength="50" value="<%=hire_address%>" /></td>
  </tr>
  <tr>
    <td align="right">&nbsp;邮&nbsp;&nbsp;&nbsp;编：</td>
    <td><input name="post" id="post" size="6" maxlength="6" value="<%=hire_post%>" /></td>
  </tr>
  <tr>
    <td align="right"><font 
                              color="#ff6600">＊</font>联 系 人：</td>
    <td><input name="contact" id="contact" size="28" maxlength="25" value="<%=hire_contact%>" /></td>
  </tr>
  <tr>
    <td align="right"><font 
                              color="#ff6600">＊</font>联系电话：</td>
    <td><input name="tel" type="text" id="tel" size="38" maxlength="100" value="<%=hire_tel%>" />
      <br />
      <INPUT id=telshowflag type=checkbox value=0 name=telshowflag <%if hire_telshowflag=0 then response.write "checked" end if%>>
      <font color="#000000">合则约见，谢绝来电（如果您不想告知求职者联系电话，请选择此项，系统将隐藏您的联系电话。）</font></td>
  </tr>
  <tr>
    <td align="right">传&nbsp;&nbsp;&nbsp;真：</td>
    <td><input name="fax" type="text" id="fax" size="38" maxlength="100" value="<%=hire_fax%>" /></td>
  </tr>
  <tr>
    <td align="right"><font 
                              color="#ff6600">＊</font>电子邮件：</td>
    <td><input maxlength="100" size="38" name="email" value="<%=hire_email%>" />
      <br />
      <INPUT name=emailshowflag type=checkbox id="emailshowflag" value=0 <%if hire_emailshowflag=0 then response.write "checked" end if%>>
屏蔽电子邮件 （求职者看不到电子邮箱地址，但仍能在线发送简历到该职位的电子邮箱，这样可以在不公开你邮箱地址的同时仍然可以进行招聘。）</td>
  </tr>
</table>
<div align="center">
    <input name="Submit6" type="submit" class="inputa3" value="发 布" />
    &nbsp;
    <input name="Reset" type="reset" class="inputa3" value="取 消" />
  </div>
</form>
<%End Sub%></div>
<%call bottom()
conn.close:set conn=nothing%>
<%Sub SaveData()
hire_place=CheckStr(trim(request("place")))
If hire_place="" or isnull(hire_place) Then 
	response.write "<script language=javascript>alert('职位名称不能为空，请重新输入！');location.href='javascript:history.back()';</script>"
	response.end 
end if
hire_dept=CheckStr(trim(request("dept")))
set rs=server.createobject("ADODB.Recordset")
if request("id")="" then
	sql="select hire_place from job_c_hire where hire_place='"&hire_place&"' and hire_dept='"&hire_dept&"' and hire_cmember='"&cmember_login&"'"
else
	hire_id=clng(trim(request("id")))
	sql="select hire_place from job_c_hire where hire_place='"&hire_place&"' and hire_dept='"&hire_dept&"' and hire_cmember='"&cmember_login&"' and hire_id<>"&hire_id&""
end if
rs.open sql,conn,1,1
if not rs.eof then
	rs.close
	set rs=nothing
	Response.Write ("<script language=JavaScript>{alert('该职位您已经发布过了！同一部门的同一职位不允许重复发布。');location.href = 'javascript:history.go(-1)';}</script>")
	Response.End
end if
hire_introduce=CheckStrbox(request("introduce"))
If lenmix(hire_introduce)>=8000 Then
	response.write "<script language=javascript>alert('错误：详细说明太长了，要求不多于8000个字符!！');location.href='javascript:history.back()';</script>"
	response.end 
end if
hire_type=cint(trim(request("type")))
hire_trade=cint(trim(request("trade")))
hire_position=trim(request("position"))
hire_workadd=trim(request("workadd"))
hire_number=cint(trim(request("number")))
if request("pay")<>"" and IsNumeric(request("pay")) then
	hire_pay=cint(trim(request("pay")))
else
	hire_pay=0
end if
hire_enddate=cdate(request("foundate"))
if hire_enddate<date() then
	response.Write "<script language=javascript>alert('你输入的截止日期小于今天,请返回修改！');location.href='javascript:history.back()';</script>"
	response.End()
end if
hire_usergroup=cint(trim(request("usergroup")))
hire_profession=trim(request("profession"))
hire_edu=cint(trim(request("edu")))
hire_experience=cint(trim(request("experience")))
hire_sex=cint(trim(request("sex")))
hire_age1=cint(trim(request("age1")))
hire_age2=cint(trim(request("age2")))
hire_comname=CheckStr(trim(request("comname")))
hire_address=CheckStr(trim(request("address")))
hire_post=CheckStr(trim(request("post")))
hire_contact=CheckStr(trim(request("contact")))
hire_tel=CheckStr(trim(request("tel")))
if trim(request("telshowflag"))<>"" then
	hire_telshowflag=cint(trim(request("telshowflag")))
else
	hire_telshowflag=1
end if
hire_fax=CheckStr(trim(request("fax")))
hire_email=CheckStr(trim(request("email")))
if trim(request("emailshowflag"))<>"" then
	hire_emailshowflag=cint(trim(request("emailshowflag")))
else
	hire_emailshowflag=1
end if
if trim(request("resetcontactinfo"))<>"" then '同步更新
	resetcontactinfo=cint(trim(request("resetcontactinfo")))
else
	resetcontactinfo=0
end if
set rsw=conn.execute("select * from job_member where member_login='"&cmember_login&"'")
company_id=rsw("member_id")
company_hirenums=rsw("Member_hirenums")
rsw.close
set rsw=nothing
'添加招聘信息
set rs=server.CreateObject("adodb.recordset")
if hire_id<>"" then
	sql="select * from job_c_hire where hire_cmember='"&cmember_login&"' and hire_place='"&hire_place&"' and hire_id="&hire_id&""
	rs.open sql,conn,1,3
	if not rs.eof then
	rs("hire_type")=hire_type
	rs("hire_trade")=hire_trade
	rs("hire_position")=hire_position
	rs("hire_place")=hire_place
	rs("hire_dept")=hire_dept
	rs("hire_workadd")=hire_workadd
	rs("hire_number")=hire_number
	rs("hire_pay")=hire_pay
	rs("hire_enddate")=hire_enddate
	rs("hire_introduce")=hire_introduce
	rs("hire_usergroup")=hire_usergroup
	rs("hire_profession")=hire_profession
	rs("hire_edu")=hire_edu
	rs("hire_experience")=hire_experience
	rs("hire_sex")=hire_sex
	rs("hire_age1")=hire_age1
	rs("hire_age2")=hire_age2
	rs("hire_comname")=hire_comname
	rs("hire_address")=hire_address
	rs("hire_post")=hire_post
	rs("hire_contact")=hire_contact
	rs("hire_tel")=hire_tel
	rs("hire_telshowflag")=hire_telshowflag
	rs("hire_fax")=hire_fax
	rs("hire_email")=hire_email
	rs("hire_emailshowflag")=hire_emailshowflag
	rs("hire_receiveresume")=0
	rs("hire_visitcount")=0
	rs("hire_sendinterview")=0
	rs("hire_command")=0
	rs("hire_announcedate")=now()
	if AdminHirCheckReg=1 then
	rs("hire_status")=0
	else
	rs("hire_status")=1
	end if
	rs.update
	end if
else
'企业可消费点数检测
if CheckCFlag("Climits",1)=False then
	if CheckCFlag("Cdianshus",0)=False then
	response.write "<script language=javascript>alert('你的消费点数不够发布职位');location.href='javascript:history.back()';</script>"
	Response.end()
	end if
end if

'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
sql="select * from job_c_hire where hire_cmember='"&cmember_login&"' and hire_place='"&hire_place&"'"
rs.open sql,conn,1,3
	if rs.eof and rs.bof then
		rs.addnew
		rs("company_id")=company_id
		rs("hire_type")=hire_type
		rs("hire_trade")=hire_trade
		rs("hire_position")=hire_position
		rs("hire_place")=hire_place
		rs("hire_dept")=hire_dept
		rs("hire_workadd")=hire_workadd
		rs("hire_number")=hire_number
		rs("hire_pay")=hire_pay
		rs("hire_enddate")=hire_enddate
		rs("hire_introduce")=hire_introduce
		rs("hire_usergroup")=hire_usergroup
		rs("hire_profession")=hire_profession
		rs("hire_edu")=hire_edu
		rs("hire_experience")=hire_experience
		rs("hire_sex")=hire_sex
		rs("hire_age1")=hire_age1
		rs("hire_age2")=hire_age2
		rs("hire_comname")=hire_comname
		rs("hire_address")=hire_address
		rs("hire_post")=hire_post
		rs("hire_contact")=hire_contact
		rs("hire_tel")=hire_tel
		rs("hire_telshowflag")=hire_telshowflag
		rs("hire_fax")=hire_fax
		rs("hire_email")=hire_email
		rs("hire_emailshowflag")=hire_emailshowflag
		rs("hire_cmember")=cmember_login
		rs("hire_announcedate")=now()
		if AdminHirCheckReg=1 then
		rs("hire_status")=0
		else
		rs("hire_status")=1
		end if
		rs.update
		rs.close
		set rs=nothing
	end if
'更新发布职位的数量
	if company_hirenums="" or isnull("company_hirenums") then
		conn.execute("update JOB_Member set Member_hirenums=1 where member_login='"&cmember_login&"'")
	else
		conn.execute("update JOB_Member set Member_hirenums=Member_hirenums+1 where member_login='"&cmember_login&"'")
	end if
end if
if CheckCFlag("Climits",1)=False then
	if CheckCFlag("Cdianshus",0)=True then
	set rsds=server.CreateObject("adodb.recordset")
	sqlds="select Member_consumenums from JOB_member where member_login='"&cmember_login&"'"
	rsds.open sqlds,conn,1,3
	member_consumenums=rsds("member_consumenums")
	rsds("member_consumenums")=clng(member_consumenums)-clng(Group_Climits(0))
	rsds.update
	rsds.close
	lastmember_consumenums=clng(member_consumenums)-clng(Group_Climits(0))
	response.write "<script language=javascript>alert('你的消费点数还剩"&lastmember_consumenums&"点,此次消费"&Group_Climits(0)&"点！');location.href='company_hirelist.asp';</script>"
	response.end
	end if
else
response.write "<script language=javascript>alert('操作成功！');location.href='company_hirelist.asp';</script>"
response.end
end if
End Sub%>