📄 hire_searchlist.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%Session.CodePage=936%>
<!--#include file="../../conn/conn.asp" -->
<!--#include file="../../Inc/Commoncode.asp" -->
<!--#include file="../checkvalid.asp" -->
<%
If Not FRAdminLevel(303) Then
Call ErrorMsg()
End If
Response.Expires = 0
Response.CacheControl = "no-cache"
Response.ExpiresAbsolute = Now() - 1
search=CheckStr(trim(request("search")))
segment=CheckStr(trim(request("segment")))
operate=trim(request("operate"))
Dim Action
Dim FoundErr,ErrMsg
Dim page,i
Dim totalPut
const MaxPerpage=20
strFileName="hire_searchlist.asp?segment="&segment&"&search="&search&"&operate="&operate&""
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("step"))<>"" then
step=trim(request("step"))
member=request("member")
select case step
case "reload"
conn.execute("update job_c_hire set hire_command=0,hire_commandstartdate=null,hire_commandenddate=null where hire_commandenddate<date()")
case "audit"
if member<>"" then
pp=ubound(split(member,","))+1
for v=1 to pp
member=request("member")(v)
conn.execute("update job_c_hire set hire_status=1 where hire_id="&member&"")
next
end if
case "unaudit"
if member<>"" then
pp=ubound(split(member,","))+1
for v=1 to pp
member=request("member")(v)
conn.execute("update job_c_hire set hire_status=0 where hire_id="&member&"")
next
end if
case "command"
response.Redirect "hire_commend.asp?member="&member
case "uncommand"
if member<>"" then
pp=ubound(split(member,","))+1
for v=1 to pp
member=request("member")(v)
conn.execute("update job_c_hire set hire_command=0,hire_commandstartdate=null,hire_commandenddate=null where hire_id="&member&"")
next
end if
case "edit"
response.Redirect "hire_modi.asp?member="&member&""
case "del"
if member<>"" then
pp=ubound(split(member,","))+1
for v=1 to pp
member=request("member")(v)
conn.execute("delete from job_c_hire where hire_id="&member&"")
next
end if
end select
end if
%>
<html>
<head>
<title>招聘信息列表</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="../css/style.css" rel=stylesheet type=text/css>
<style type="text/css">
<!--
.STYLE2 {color: #FF0000}
-->
</style>
</head>
<body>
<table width="100%" border="0" align="center" cellpadding=2 cellspacing=1 class="tableBorder">
<tr>
<th height=25 class="tableHeaderText">企业招聘管理</th>
</tr>
<form action="hire_searchlist.asp" method="post">
<tr>
<td height="28" align="left"><font color="ff6600"><b class="style1"> 管理选项</b></font>： <a href="cmember_searchlist.asp">管理首页</a> | <a href="company_add.asp">企业添加</a> | <a href="cmember_searchlist.asp">企业管理</a> | <a href="hire_add.asp">职位添加</a> | <a href="hire_searchlist.asp">职位管理</a> | <a href="Admin_AddTemp.asp?wid=2">添加模板</a> | <a href="Admin_Template.asp?wid=2">模板管理</a> | [<a href="javascript:location.reload()">刷新页面</a>]</td>
</tr>
<tr>
<td height="28" align="left"><font color="ff6600"><b class="style11"> 二级选项</b></font>： <a href="?operate=0">待审职位</a> | <a href="?operate=1">已审职位</a> | <a href="?operate=2">已推荐职位</a> | <a href="?operate=3">已过期职位</a> | <a href="?operate=4">一周内到期</a> | <a href="?operate=5">30天内到期</a> </td>
</tr>
<tr height="25" >
<td align="left">
关键字：
<input name="search" type="text" id="search" size="10">
<select name="segment" size="1" id="segment">
<option value="hire_place">职位名称</option>
<option value="hire_comname">公司名称</option>
</select>
<input name="Submit" type="submit" class="inputs" value="搜索">
<a href="hire_searchlist.asp?step=reload">刷新职位状态</a> （刷新数据库，更新<span class="STYLE2">过期推荐职位</span><span class="STYLE2"></span>状态）</td>
</tr>
</form>
</table>
<%Call main()
if FoundErr=True then
call Show_Err()
end if
%>
<%sub main()
sql="select * from job_c_hire where"
if segment="hire_place" then
sql=sql&" hire_place like '%"& search &"%'"
else
sql=sql&" hire_comname like '%"& search &"%'"
end if
if operate<>"" then
select case operate
case 0
sql=sql&" and hire_status=0"
case 1
sql=sql&" and hire_status=1"
case 2
sql=sql&" and hire_command=1"
case 3
If FR_HR_DataBaseType=1 then
sql=sql&" and datediff(d,hire_enddate,"&FR_HR_Now&")>0"
Else
sql=sql&" and datediff('d',hire_enddate,"&FR_HR_Now&")>0"
End If
case 4
If FR_HR_DataBaseType=1 then
sql=sql&" and datediff(d,hire_enddate,"&FR_HR_Now&")>7 and datediff(d,hire_enddate,"&FR_HR_Now&")<=0"
Else
sql=sql&" and datediff('d',hire_enddate,"&FR_HR_Now&")>7 and datediff('d',hire_enddate,"&FR_HR_Now&")<=0"
End If
case 5
If FR_HR_DataBaseType=1 then
sql=sql&" and datediff(d,hire_enddate,"&FR_HR_Now&")>30 and datediff(d,hire_enddate,"&FR_HR_Now&")<=0"
Else
sql=sql&" and datediff('d',hire_enddate,"&FR_HR_Now&")>0 and datediff('d',hire_enddate,"&FR_HR_Now&")<=0"
End If
end select
end if
sql=sql&" order by hire_command desc,hire_announcedate desc,hire_id desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>暂无招聘职位，请添加后再进行管理！</li>"
exit sub
else
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
end sub
%>
<%Sub MainInfo()%>
<table width="99%" border="0" align="center" cellpadding="2" cellspacing="1" class="tableBorder">
<tr>
<th height=25 class="tableHeaderText" colspan="10">招聘信息列表</th>
</tr>
<form name="form2" action="hire_searchlist.asp" method="post">
<tr height=25 class=bodytitle>
<td width="13%" align="center" class=bodytitle><b class="style1">招聘职位</b></td>
<td width="21%" align="center" class=bodytitle><strong class="style1">公司名称</strong></td>
<td width="16%" align="center" class=bodytitle><b class="style1">发布时间</b></td>
<td width="10%" align="center" class=bodytitle><b class="style1">截止日期</b></td>
<td width="9%" align="center" class=bodytitle><b class="style1">浏览次数</b></td>
<td width="9%" align="center" class=bodytitle><b class="style1">收到简历</b></td>
<td width="7%" align="center" class=bodytitle><b class="style1">状态</b></td>
<td width="12%" align="center" class=bodytitle><b class="style1">会员/录入员</b></td>
<td width="3%" align="center" class=bodytitle><input name="checkSelect" type="checkbox" class="checkbox" onClick="javascript: checkAll(this)" value="checkbox"></td>
</tr>
<%do while not rs.eof%>
<tr class="tabbgcolorli">
<td height="25" align="center"><a href="#" onClick="window.open ('hire_info.asp?id=<%=rs("hire_id")%>','newwindow','height=500,width=550,top=0,left=0,toolbar=no,menubar=no,scrollbars=yes, resizable=no,location=no, status=no') ">
<% if rs("hire_command")=1 and rs("hire_commandenddate")>date() then
response.Write "<font color=red>"&rs("hire_place")&"</font>"
elseif rs("hire_command")=1 and rs("hire_commandenddate")<date()then
response.Write "<font color=red>"&rs("hire_place")&"</font>(<font color=blue>过期</font>)"
else response.Write rs("hire_place")
end if%></a></td>
<td height="25" align="center">
<%if not isnull(rs("company_id")) then%>
<a href="#" onClick="window.open ('cmember_info.asp?id=<%=rs("company_id")%>','newwindow','height=500,width=550,top=0,left=0,toolbar=no,menubar=no,scrollbars=yes, resizable=no,location=no, status=no') "><%=rs("hire_comname")%></a>
<%else
response.Write rs("hire_comname")&"(<font color=red>"&rs("hire_operator")&"</font>添加)"
end if%> </td>
<td width="16%" height="25" align="center"><%=rs("hire_announcedate")%></td>
<td width="10%" align="center"><%=rs("hire_enddate")%></td>
<td width="9%" align="center"><%=rs("hire_visitcount")%>次</td>
<td align="center"><%=rs("hire_receiveresume")%>份</td>
<td width="7%" height="25" align="center">
<%
if rs("hire_enddate")<date() and rs("hire_status")=1 then
response.Write "<font color=red>过期</font>"
elseif rs("hire_enddate")>date() and rs("hire_status")=1 then
response.Write "正常"
elseif rs("hire_status")=0 then
response.Write "<font color='#666666'>未审核</font>"
end if
%> </td>
<td width="12%" height="25" align="center" bordercolor="#101880"><%=rs("hire_cmember")%>/<%if rs("hire_operator")<>"" then response.Write rs("hire_operator") end if%></td>
<td height="25" align="center"><input name="member" type="checkbox" class="checkbox" id="member" value="<%=rs("hire_id")%>"></td>
</tr>
<%
i=i+1
if i>=MaxPerPage then exit do
rs.movenext
loop
%>
<tr class="tabbgcolorli">
<input type="hidden" name="search" value="<%=search%>">
<input type="hidden" name="segment" value="<%=segment%>">
<td colspan="11" align="right" aligh="right">
<input name="button" type="button" class="inputs" id="button" onClick="confirmX(1);" value="审核职位">
<input name="button" type="button" class="inputs" id="button" onClick="confirmX(2);" value="撤销审核">
<input name="button" type="button" class="inputs" id="button" onClick="confirmX(3);" value="推荐职位">
<input name="button" type="button" class="inputs" id="button" onClick="confirmX(4);" value="撤销推荐">
<input name="button" type="button" class="inputs" id="button" onClick="confirmX(5);" value="修改">
<input name="button" type="button" class="inputs" id="button" onClick="confirmX(6);" value="删除"> </td>
</tr>
<tr class="tabbgcolorli">
<td colspan="11" aligh="right"><%If totalput>0 Then
Call Showpage(strFileName,totalput,MaxPerPage,false,true,"个职位")
End If%> </td>
</tr>
</form>
</table>
<%end sub%>
<!--#include file="../inc/copy.asp" -->
</body>
</html>
<%Conn.Close:Set Conn=Nothing%>
<script language="javascript">
function confirmX(num)
{
var ids = document.getElementsByName("member");
var check=false;
var a=0;
if (ids != null)
{
for (i=0; i<ids.length; i++)
{
var obj = ids(i);
if (obj.checked==true)
{
check=true;
a+=1
}
}
if(check==false){alert("请选择操作对象！");return false;}
}
if(num==1)
{
if(confirm("你确定要审核你所选择的职位吗？"))
{
document.form2.action="hire_searchlist.asp?step=audit";
document.form2.submit();
}
}
if(num==2)
{
if(confirm("你确定要撤销审核你所选择的职位吗？"))
{
document.form2.action="hire_searchlist.asp?step=unaudit";
document.form2.submit();
}
}
if(num==3)
{
if(a==1){
if(confirm("你确定要推荐你所选择的职位吗？"))
{
document.form2.action="hire_searchlist.asp?step=command";
document.form2.submit();
}
}
else
{
alert("同一时刻只能选择一个操作对象进行修改!")
return false;
}
}
if(num==4)
{
if(confirm("你确定要撤销推荐你所选择的职位吗？"))
{
document.form2.action="hire_searchlist.asp?step=uncommand";
document.form2.submit();
}
}
if(num==5)
{
if(a==1){
if(confirm("你确定要修改你所选择的职位吗？"))
{
document.form2.action="hire_searchlist.asp?step=edit";
document.form2.submit();
}
}
else
{
alert("同一时刻只能选择一个操作对象进行修改!")
return false;
}
}
if(num==6)
{
if(confirm("警告：此操作将会删除该职位！\n是否继续本操作？"))
{
document.form2.action="hire_searchlist.asp?step=del";
document.form2.submit();
}
}
return false;
}
function checkAll(box1) {
var ids = document.getElementsByName("member");
if (ids != null) {
for (i=0; i<ids.length; i++) {
var obj = ids(i);
obj.checked = box1.checked;
}
}
}
</script>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -