📄 company_works.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../conn/conn.asp"-->
<!--#include file="../inc/Commoncode.asp"-->
<!--#include file="../inc/CommonFunction.asp"-->
<%link="company_works.asp"%>
<!--#include file="checkcmember.asp" -->
<!--#include file="flagandexpend.asp"-->
<%
Dim page,i
Dim totalPut
const MaxPerpage=10
Const strFileName="company_works.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
if trim(request("action"))<>"" then
action=trim(request("action"))
checks=trim(request("checks"))
set rs=Server.CreateObject("Adodb.Recordset")
myreceive=split(checks,",")
select case action
case "myexpert" '放入人才库
If CheckCFlag("Climits",2)=False Then
alert "您无权使用人才库！",1
else
if CheckCFlag("Climits",3)=False Then
alert "您的人才库已满，请先删除无效人才信息！",1
end if
End If
for i=0 to ubound(myreceive)
id=trim(myreceive(i))
sql="select * from job_c_myreceive where myreceive_id="&id
rs.open sql,conn,1,1
hireid=rs("myreceive_hireid")
resumeid=rs("myreceive_resumeid")
name=rs("myreceive_name")
sex=rs("myreceive_sex")
birth=rs("myreceive_birth")
edu=rs("myreceive_edu")
pmember=rs("myreceive_pmember")
rs.close
sql="select * from job_c_myexpert where myexpert_pmember='"&pmember&"'" '存入人才库
rs.open sql,conn,1,3
if rs.eof then
rs.addnew
rs("myexpert_resumeid")=resumeid
rs("myexpert_name")=name
rs("myexpert_sex")=sex
rs("myexpert_birth")=birth
rs("myexpert_edu")=edu
rs("myexpert_cmember")=cmember_login
rs("myexpert_pmember")=pmember
rs("myexpert_date")=now()
rs.update
else
response.write"<script>alert(""该人才已经存在，请不要重复添加！"");history.back();</script>"
response.end
end if
rs.close
'把工作申请记录中相应信息的收藏标志置1
conn.execute("update job_p_mysend set mysend_favorite=1 where mysend_hireid="&hireid&" and mysend_pmember='"&pmember&"'")
next
case "comrecycle" '放入回收站
for i=0 to ubound(myreceive)
id=trim(myreceive(i))
sql="select * from job_c_myreceive where myreceive_id="&id
rs.open sql,conn,1,1
resumeid=rs("myreceive_resumeid")
name=rs("myreceive_name")
sex=rs("myreceive_sex")
birth=rs("myreceive_birth")
edu=rs("myreceive_edu")
hireid=rs("myreceive_hireid")
place=rs("myreceive_place")
pmember=rs("myreceive_pmember")
myreceive_date=rs("myreceive_date")
myreceive_content=rs("myreceive_content")
rs.close
sql="select * from job_c_recycle " '存入回收站
rs.open sql,conn,1,3
rs.addnew
rs("comrecycle_resumeid")=resumeid
rs("comrecycle_name")=name
rs("comrecycle_sex")=sex
rs("comrecycle_birth")=birth
rs("comrecycle_edu")=edu
rs("comrecycle_hireid")=hireid
rs("comrecycle_place")=place
rs("comrecycle_cmember")=cmember_login
rs("comrecycle_pmember")=pmember
rs("comrecycle_date")=myreceive_date
rs("comrecycle_content")=myreceive_content
rs.update
rs.close
'删除简历
conn.execute("delete from job_c_myreceive where myreceive_id="&id)
next
case "delete" '删除选中的应聘简历
for i=0 to ubound(myreceive)
id=trim(myreceive(i))
conn.execute("delete from job_c_myreceive where myreceive_id="&id)
next
end select
response.redirect "company_works.asp?page="&page&""
response.end
end if%>
<!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 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_interviewsend.asp?action=myreceive";
document.thisForm.target="_blank";
thisForm.submit();
}
}
//发送简历回复
if (id==2)
{
if(confirm("您确定要发送简历回复吗？")==true)
{
document.thisForm.action="company_responsesend.asp";
document.thisForm.target="_blank";
thisForm.submit();
}
}
//发送拒收简历
if (id==3)
{
if(confirm("您确定要发送拒收简历吗？")==true)
{
document.thisForm.action="company_denysend.asp";
document.thisForm.target="_blank";
thisForm.submit();
}
}
//放入人才库
if (id==4)
{
if(confirm("您确定要放入人才库吗？")==true)
{
document.thisForm.action="company_works.asp?action=myexpert&page="+page+"";
thisForm.submit();
}
}
//放入回收站
if (id==5)
{
if(confirm("您确定要放入回收站吗？")==true)
{
document.thisForm.action="company_works.asp?action=comrecycle&page="+page+"";
thisForm.submit();
}
}
//删除
if (id==6)
{
if(confirm("您确定要删除简历吗？")==true)
{
document.thisForm.action="company_works.asp?action=delete&page="+page+"";
thisForm.submit();
}
}
}
//-->
</script></head>
<body>
<center>
<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(3)%>
<div class="maintaba">
<span class="maintit">收到应聘简历</span>
<%
Set rsw= Server.CreateObject(FR_HR_RS)
hireid=trim(request("hireid"))
'If CheckInfo(2)=False Then
'sqlOther=" top "&OutInfo("JOB_C_cmembertype","type_id","rehirenums",session("user_type"))
'End If
'sql="select "& sqlOther &" * from job_c_myreceive where myreceive_cmember='"&cmember_login&"'"
sql="select * from job_c_myreceive where myreceive_cmember='"&cmember_login&"'"
if hireid<>"" then
hireid=clng(hireid)
sql=sql&" and myreceive_hireid="&hireid&""
end if
sql=sql&" order by myreceive_date desc"
rsw.open sql,conn,1,1
if rsw.eof and rsw.bof then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>尚未收到应聘简历！</li>"
else
totalPut=rsw.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
rsw.move (page-1)*MaxPerpage
dim bookmark
bookmark=rsw.bookmark
Call MainInfo()
else
page=1
Call MainInfo()
end if
end if
end if
rsw.close
set rsw=nothing
if FoundErr=True then
call Show_Err()
end if
%>
<%Sub MainInfo()%>
<TABLE width="98%" border=0 align="center" cellPadding=2 cellSpacing=1 bgcolor="#99CCFF" class="tabb">
<TBODY>
<TR>
<TD vAlign=bottom align=left colSpan=10>查看应聘
<SELECT onchange=javascript:window.location.href=this.value name=oWorkNo>
<OPTION value=company_works.asp>(全 部)</OPTION>
<%
hireid=trim(request("hireid"))
set rst=server.createobject("ADODB.Recordset")
sql1="select hire_id,hire_place from job_c_hire where hire_cmember='"&cmember_login&"' order by hire_announcedate desc"
rst.open sql1,conn,1,1
for a=1 to rst.recordcount
if hireid=rst("hire_id") then
response.write "<OPTION value='company_works.asp?hireid="&rst("hire_id")&"' selected>"&rst("hire_place")&"</OPTION>"
else
response.write "<OPTION value='company_works.asp?hireid="&rst("hire_id")&"'>"&rst("hire_place")&"</OPTION>"
end if
rst.movenext
next
rst.close
%>
</SELECT>
职位的求职人员信息</TD>
</TR>
<TR bgcolor="#E7E7E7">
<TD height=29 align=middle><B>姓名</B></TD>
<TD align=middle><B>性别</B></TD>
<TD align=middle><B>年龄</B></TD>
<TD align=middle><B>学历</B></TD>
<TD align=middle><B>应聘职位</B></TD>
<TD align=middle><B>发送时间</B></TD>
<TD align=middle><b>是否已读</b></TD>
<TD align=middle><IMG height=12 src="../images/sel_ico.gif" width=13> </TD>
</TR>
<FORM name="thisForm" action="" method="post">
<%do while not rsw.eof%>
<TR align=middle bgColor=#f7f7f7>
<TD height=30><a href="../person/cnresume_view.asp?rid=<%=rsw("myreceive_resumeid")%>" target="_blank"><%=rsw("myreceive_name")%></a></TD>
<TD><%=Hiresex(rsw("myreceive_sex"))%></TD>
<TD><%=year(date())-year(rsw("myreceive_birth"))%></TD>
<TD><%=Hireedu(rsw("myreceive_edu"))%></TD>
<TD><%=rsw("myreceive_place")%></TD>
<TD><%=rsw("myreceive_date")%></TD>
<TD><%If rsw("myreceive_read")=1 Then
Response.Write "已读"
Else
Response.Write "<font color=blue>未读</font>"
End If
Response.Write " <a href=""Read_Letter.asp?letter_id="&rsw("myreceive_id")&""" target=""_blank"">查看</a>"
%>
</TD>
<TD><input type='checkbox' name='checks' value="<%=rsw("myreceive_id")%>"></TD>
</TR>
<%
i=i+1
if i>=MaxPerPage then exit do
rsw.movenext
loop
%>
<TR>
<TD height=24 colSpan=10 align=right bgcolor="#efefef">
<INPUT name=chkall onClick="CheckAll(this.form)" type=checkbox value=on>
选中所有简历</TD>
</TR>
<TR bgcolor="#FFFFFF">
<TD colSpan=12 align=right>
<!--面试邀请--> <input name="Submit" type="button" class="inputa2" value="发送面试邀请" onClick=javascrpt:showconfirm(1,<%=page%>)>
<!--放入人才库--> <input name="Submit4" type="button" class="inputa2" value="放入人才库" onclick=javascript:showconfirm(4,<%=page%>)>
<!--放入回收站--> <input name="Submit5" type="button" class="inputa2" value="放入回收站" onClick=javascript:showconfirm(5,<%=page%>)>
<!--删除简历--> <input name="Submit6" type="button" class="inputa3" value="删 除" onClick=javascript:showconfirm(6,<%=page%>)> </TD>
</TR>
<TR>
<TD colSpan=12 align=right bgcolor="#f9f9f9"><%If totalput>0 Then
Call Showpage(strFileName,totalput,MaxPerPage,false,true,"位应聘者")
End If%></TD>
</TR></form>
</TABLE>
<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>说 明：</TD>
</TR>
</TABLE>
<TABLE cellSpacing=0 cellPadding=6 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=#000000>“<STRONG>放入人才库</STRONG>”</FONT>即整理收集有价值的求职者，以备日后使用。</TD>
</TR>
<TR>
<TD height=18><FONT
color=#000000>“<STRONG>放入回收站</STRONG>”</FONT>即删除简历到回收站，必要时可恢复。</TD>
</TR>
<TR>
<TD height=18><FONT
color=#000000>“<STRONG>删除</STRONG>”</FONT><FONT
color=#333333>即彻底删除简历。</FONT></TD>
</TR>
</TBODY>
</TABLE>
<%End Sub%>
</div>
<%call bottom()
conn.close:set conn=nothing%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -