⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 company_hirelist.asp

📁 嘉缘人才6.0精简 ,很好用的人才系统
💻 ASP
📖 第 1 页 / 共 4 页
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../conn/conn.asp"-->
<!--#include file="../inc/Commoncode.asp"-->
<!--#include file="../inc/CommonFunction.asp"-->
<%link="company_hirelist.asp"
Dim page,i
Dim totalPut
const MaxPerpage=10
Const strFileName="company_hirelist.asp"
page=Trim(Request("page"))
If page<>"" And IsNumeric(page) Then
	If page<1 Or Len(page)>10 Then
		page=1
	Else
    	page=CLng(page)
	End If
Else
	page=1
End If%>
<!--#include file="checkcmember.asp" -->
<!--#include file="flagandexpend.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>招聘职位管理-企业会员管理中心-<%=SiteTitle%></title>
<link href="../css/<%=MainWebCss%>.css" rel="stylesheet" type="text/css" />
<script src="../inc/main.js" language="javascript"></script><script language="JavaScript">
<!--
  function CheckAll(form)
  {
  for (var i=0;i<form.elements.length;i++)
    {
    var e = form.elements[i];
    if (e.name != 'chkall')
       e.checked = form.chkall.checked;
    }
  }
  function showconfirm(id,page)
{
	var flag=false; //是否有选择职位信息
	var k=0;
	var refid;
	for(i=0;i<document.thisForm.elements.length;i++) 
	{
		if (document.thisForm.elements[i].name=="checks")
		{		
			if (document.thisForm.elements[i].checked==true) 
			{
				flag=true;
				break;
			}
		}
	}
	if (flag==false)
	{
		alert("请先选择一个职位!");
		return false;
	}
	//删除职位资料
	if (id==1)
	{
		if(confirm("您真的要删除选中的招聘信息吗?")==true)
		{
			document.thisForm.action="company_hirelist.asp?step=Delete&page="+page+"";
			thisForm.submit();
		}
	}
	//刷新职位信息
	if (id==2)
	{
	 document.thisForm.action="company_hirelist.asp?step=Refresh&page="+page+"";
	 thisForm.submit();
	}
	//重新发布职位信息
	if (id==3)
	{
		if(confirm("重新发布选中的招聘信息后,这些信息会有更多机会被求职者浏览!")==true)
		{
			document.thisForm.action="company_hirelist.asp?step=Republish&page="+page+"";
			thisForm.submit();
		}
	}
	//激活职位信息
	if (id==4)
	{
		if(confirm("激活选中的招聘信息后,使这些信息重新有效!")==true)
		{
			document.thisForm.action="company_hirelist.asp?step=Activate&page="+page+"";
			thisForm.submit();
		}
	}
	//屏蔽职位信息
	if (id==5)
	{
		if(confirm("屏蔽选中的招聘信息后,使这些信息无效并对求职者不可见!")==true)
		{
			document.thisForm.action="company_hirelist.asp?step=Deactivate&page="+page+"";
			thisForm.submit();
		}
	}			
}
//-->
</script></head>
<body>
<center>
<iframe height=0 width=0 src="" id="positionframe"></iframe>
<iframe height=0 width=0 src="" id="capitalframe"></iframe>
<iframe height=0 width=0 src="" id="cityframe"></iframe>
<iframe height=0 width=0 src="" id="professionframe"></iframe>

<div id="head">
<div id="logo"><img src="<%=SiteUrl&InstallDir&LogoUrl%>" alt="欢迎访问<%=SiteName%>" /></div>
<div id="banner"><%Call Loginshow()%></div>
<ul><%Call Membernav(2)%></ul>
</div>
<%Call Cmembermenu(2)%>
<div class="maintaba">
<%
step=trim(request("step"))
hiredept=CheckStr(trim(request("hiredept")))
keyword=CheckStr(trim(request("keyword"))) 
hirestatus=CheckStr(trim(request("hirestatus")))
checks=trim(request("checks"))
hire=split(checks,",")
Select Case step
Case "SaveData"
	Call SaveData()
Case "Addhire"
	if CheckCFlag("Climits",0)=False then
	response.write "<script language=javascript>alert('您所在的会员组不能发布职位信息,请联系网站客服进行升级!');location.href='company_hirelist.asp';</script>"
	response.end()
	end if
	if CheckCFlag("Climits",1)=False then
		if CheckCFlag("Cdianshus",0)=False then
		response.write "<script language=javascript>alert('您发布的职位信息已达到最大限制,请联系网站客服进行升级!');location.href='company_hirelist.asp';</script>"
		response.end()
		else
		response.write "<script language=javascript>alert('您发布的职位信息已达到最大限制,此次消费将扣除部分可用点数!');</script>"
		end if
	end if
	Call Addhire()
Case "Modify"
	Call Addhire()
Case "Clone"
	if CheckCFlag("Climits",0)=False then
	response.write "<script language=javascript>alert('您所在的会员组不能发布职位信息,请联系网站客服进行升级!');location.href='company_hirelist.asp';</script>"
	response.end()
	end if
	if CheckCFlag("Climits",1)=False then
		if CheckCFlag("Cdianshus",0)=False then
		response.write "<script language=javascript>alert('您发布的职位信息已达到最大限制,请联系网站客服进行升级!');location.href='company_hirelist.asp';</script>"
		response.end()
		else
		response.write "<script language=javascript>alert('您发布的职位信息已达到最大限制,此次消费将扣除部分可用点数!');</script>"
		end if
	end if
	Call Addhire()
Case "Delete"
	for i=0 to ubound(hire)
	id=trim(hire(i))
	conn.execute("delete from job_c_hire where hire_id="&id)
	next
	response.redirect "company_hirelist.asp?page="&page&""
	response.end
Case "Refresh"
	for i=0 to ubound(hire)
	id=trim(hire(i))
	conn.execute("update job_c_hire set hire_announcedate='"&now()&"' where hire_id="&id&"")
	next
	response.redirect "company_hirelist.asp?page="&page&""
	response.end
Case "Republish"
	for i=0 to ubound(hire)
	id=trim(hire(i))
	if FR_HR_DataBaseType=1 then
	sql="update JOB_C_hire set hire_announcedate="&FR_HR_Now&",hire_enddate='"&dateadd("d",30,date())&"' where hire_id="&id&""
	else
	sql="update JOB_C_hire set hire_announcedate="&FR_HR_Now&",hire_enddate=#"&dateadd("d",30,date())&"# where hire_id="&id&""
	end if
	conn.execute(sql)
	next
	response.redirect "company_hirelist.asp?page="&page&""
	response.end
Case "Activate"
	for i=0 to ubound(hire)
	id=trim(hire(i))
	conn.execute("update job_c_hire set hire_status=1 where hire_id="&id&" and hire_status=2")
	next
	response.redirect "company_hirelist.asp?page="&page&""
	response.end
Case "Deactivate"
	for i=0 to ubound(hire)
	id=trim(hire(i))
	conn.execute("update job_c_hire set hire_status=2 where hire_id="&id&" and hire_status=1")
	next
	response.redirect "company_hirelist.asp?page="&page&""
	response.end
Case Else
	Call ShowData()
End Select%>
<%Sub ShowData()%>
<span class="maintit">职位管理</span>
<table width="98%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#99CCFF" class="tabb">
<form action="company_hirelist.asp" method="post" name="searchhire" id="searchhire">
<tbody>
<tr>
<td width="80" height="25" align="right">部门:</td>
<td width="437"><select name="hiredept" size="1" id="select2">
<option value="" selected="selected">----请选择部门----</option>
<%
Set rs= Server.CreateObject("ADODB.RecordSet")
sql="select dept_id,dept_name from job_c_dept where dept_cmember='"&cmember_login&"'"
rs.open sql,conn,1,1
do while not rs.eof
response.write"<OPTION value="&rs("dept_name")&">"&rs("dept_name")&"</option>"
rs.movenext
loop
rs.close
%>
</select>
</td>
</tr>
<tr>
<td height="25" bgcolor="#f9f9f9" align="right">职位关键字:</td>
<td bgcolor="#f9f9f9"><input name="keyword" id="keyword" style="WIDTH: 150px" />
</td>
</tr>
<tr>
<td height="25" align="right">状态:</td>
<td><input name="hirestatus" type="radio" value="" checked="checked" />
全部
<input type="radio" value="1" name="hirestatus" />
<font color="#008000">招聘 </font>
<input type="radio" value="2" name="hirestatus" />
<font color="#808080">屏蔽</font>
<input type="radio" value="3" name="hirestatus" />
<font color="#ff0000">过期</font>
<input type="submit" value=" 查 询 " name="b1" />
</td>
</tr>
</tbody>
</form>
</table>
<br class="br" />
<table width="98%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#99CCFF" class="tabb">
<tbody>
<%
sql="select count(*) as hirecount from job_c_hire where hire_cmember='"&cmember_login&"'"
rs.open sql,conn,1,1
hirecount=rs("hirecount")
rs.close
%>
<tr>
<td valign="bottom" align="right" colspan="9"><font color="#FF0000">贵公司共发布 <font class="num"><b><%=hirecount%></b> </font>个职位</font></td>
</tr>
<tr bgcolor="#E7E7E7">
<td width="10%" height="29" align="middle" ><b>部门</b></td>
<td width="18%" align="middle" ><b>招聘职位</b></td>
<td width="15%" align="middle" ><b>状态</b></td>
<td width="9%" align="middle" ><b>浏览次数</b></td>
<td width="9%" align="middle" ><b>收到简历</b></td>
<td align="middle"><b>起止日期</b></td>
<td width="7%" align="middle" ><b>修改</b></td>
<td width="7%" align="middle" ><b>复制</b></td>
<td width="7%" align="middle" ><img height="12" src="../images/sel_ico.gif" width="13" /> </td>
</tr>
</tbody>
<form action="" method="post" name="thisForm" id="thisForm">
<%sql="select * from job_c_hire where hire_cmember='"&cmember_login&"'"
if hiredept<>"" then
sql=sql&" and hire_dept='"&hiredept&"'"
end if
if keyword<>"" then
sql=sql&" and hire_place like '%"&keyword&"%'"
end if
if hirestatus<>"" then
sql=sql&" and hire_status="&hirestatus&""
end if
sql=sql&" order by hire_announcedate desc"
rs.open sql,conn,1,1
If not rs.eof then
	totalPut=rs.recordcount
	if (page-1)*MaxPerpage>totalput then
		if (totalPut mod MaxPerpage)=0 then
			page= totalPut \ MaxPerpage
		else
			page= totalPut \ MaxPerpage + 1
		end if
	end if
	if page=1 then
		Call MainInfo()
	else
		if (page-1)*MaxPerpage<totalPut then
			rs.move  (page-1)*MaxPerpage
			dim bookmark
			bookmark=rs.bookmark
			Call MainInfo()
		else
			page=1
			Call MainInfo()
		end if
	end if
end if
rs.close
set rs=nothing
%>
<br class="br" />
<table width="98%" height="20" border="0" align="center" cellpadding="6" cellspacing="0" bordercolor="#111111" style="BORDER-COLLAPSE: collapse">
<tr>
<td class="font-title">说&nbsp;明:</td>
</tr>
</table>
<table cellspacing="1" cellpadding="2" width="98%" align="center" 
border="0">
<tbody>
<tr>
<td height="18"><font 
color="#000000">“<strong>删除</strong>”</font><font 
color="#333333">即对已经招聘完成,以后不再需要招聘的职位彻底进行删除。</font> </td>
</tr>
<tr>
<td height="18"><font color="#333333"><font 
color="#000000">“<strong>刷新职位</strong>”</font>更新职位的发布日期,能将职位排到网站搜索结果的前面,提高招聘效果; </font></td>
</tr>
<tr>
<td height="18"><font 
color="#000000">“<strong>重新发布</strong>”</font><font 
color="#333333">即对已经过期的职位重新进行招聘。招聘有效期自动改为30天(以当天为开始日期);</font> </td>
</tr>
<tr>
<td height="18"><font 
color="#000000">“<strong>激活</strong>”</font><font 
color="#333333">即对已经屏蔽的职位重新进行招聘。</font> </td>
</tr>
<tr>
<td height="18"><font 
color="#000000">“<strong>屏蔽</strong>”</font><font 
color="#333333">即隐藏暂时不需要招聘的职位,以后如果需要招聘时再激活该职位即可。(建议使用)</font></td>
</tr>
</tbody>
</table>
<%End Sub%>
<%
Sub MainInfo()	
do while not rs.eof
%><TR align=middle bgColor=#f7f7f7>
<TD height=25><%=rs("hire_dept")%></TD>
<TD><%=rs("hire_place")%></TD>
<TD>
<%
if rs("hire_enddate")<date() then
response.write "<font color='#ff0000'>已经过期</font>"
else
select case rs("hire_status")
case "0"
response.write "<font color='#cccccc'>等待审核</font>"
case "1"
response.write "<font color='#008000'>正在招聘</font>"
case "2"
response.write "<font color='#808080'>暂时屏蔽</font>"
end select
end if
If rs("hire_command")=1 And rs("hire_commandenddate")>Date() Then Response.Write("&nbsp;<font color=red>已推荐</font>")
%>
</TD>

<TD><%=rs("hire_visitcount")%></TD>
<TD><%=rs("hire_receiveresume")%></TD>
<TD><%=year(rs("hire_announcedate"))%>-<%=month(rs("hire_announcedate"))%>-<%=day(rs("hire_announcedate"))%>~<%=rs("hire_enddate")%></TD>
<TD><A style='COLOR: #0a40e2' href='company_hirelist.asp?step=Modify&id=<%=rs("hire_id")%>'><U>修改</U></A></TD>
<TD><A style='COLOR: #0a40e2' href='company_hirelist.asp?step=Clone&id=<%=rs("hire_id")%>'><U>复制</U></A></TD>
<TD><input type='checkbox' name='checks' value='<%=rs("hire_id")%>'></TD>
</TR>
<%

i=i+1
if i>=MaxPerPage then exit do
rs.movenext
loop
%>
<tr>
<td height="24" colspan="9" align="right"><input name="chkall" onclick="CheckAll(this.form)" type="checkbox" value="on" />
选中所有招聘职位 </td>
</tr>
<tr>
<td colspan="11" align="right"><!--删除职位-->
<input name="Submit" type="button" class="inputa3" value="删 除" onclick="javascript:showconfirm(1,<%=page%>)" />
<input name="Submit4" type="button" class="inputa2" value="刷新职位" onclick="javascrpt:showconfirm(2,<%=page%>)" />
<!--刷新职位-->
<!--重新发布-->
<input name="Submit5" type="button" class="inputa2" value="重新发布" onclick="javascript:showconfirm(3,<%=page%>)" />
<!--激活职位-->
<input name="Submit2" type="button" class="inputa3" value="激 活" onclick="javascript:showconfirm(4,<%=page%>)" />
<!--屏蔽职位-->
<input name="Submit3" type="button" class="inputa3" value="屏 蔽" onclick="javascript:showconfirm(5,<%=page%>)" />
</td>
</tr>
</form>
<tr>
<td colspan="11" align="right" bgcolor="#f9f9f9"><%If totalput>0 Then
	Call Showpage(strFileName,totalput,MaxPerPage,false,true,"个职位")
End If%>
</td>
</tr>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -