func_re_hire.asp

企业办公简单管理系统,可以发布信息以及论坛

<!-- #include file="func_verify.asp" -->
<%
function CheckInfo(str)
	dim i
	CheckInfo=""
	if not isnull(str) then 
		for i=1 to len(str)
			if mid(str,i,1)=" " then
				CheckInfo=CheckInfo&"&nbsp;"
			elseif mid(str,i,1)=chr(13) and mid(str,i+1,1)=chr(10) then
				CheckInfo=CheckInfo&"<br>"
				i=i+1
			else
				CheckInfo=CheckInfo&mid(str,i,1) 
			end if
		next
	end if
end function

set rs = Server.CreateObject("ADODB.Recordset")
set rssta = Server.CreateObject("ADODB.Recordset")
if request("saveflag")="1" then
	sql="select * from cci_oa_approve"
	rs.open sql,connobj,3,3
	rs.addnew
	
	rs("wfid")=request("wfid")
	rs("deptid")=session("deptid")
	rs("stationid")=session("stationid")
	rs("userid")=session("userid")
	rs("dotime")=now
	rs("notion")=request("notion")
	if trim(request("reason"))<>"" then
		rs("reason")=request("reason")
	end if
	
	
	rs.update
	rs.close
	connobj.execute "proc_run_wf "& request("wfid") & "," & request("notion")
	response.Redirect "message.asp?rediurl=defaultA.asp&msgurl=首页&msginfo=审批操作成功!"
end if


sql="select a.theName,a.DeptID,a.StationID,a.Sex,a.age,a.Register,a.Edu_level,a.school,a.speciality,a.appearance,a.expression,a.experience,a.capability,a.count,a.testsalary,a.salary,a.jobBrief,a.inDate,a.memo,b.name,c.deptname,d.stationname from cci_oa_hire a,cci_user b,cci_dept c,cci_station d where a.deptid=c.id and a.userid=b.id and b.stationid=d.id and a.wfid="& request("wfid")
rs.open sql,connobj,1,1
if rs.eof then
	rs.close
	response.Redirect "message.asp?rediurl=defaultA.asp&msgurl=首页&msginfo=没有找到相关信息!"
end if	
%>

  
<table width="100%" align="center" cellpadding="1" cellspacing="1" class=tableborder1>

    <tr > 
      <th height="25" colspan="6" align="center" class=TopLighNav>员工录用审批</th>
    </tr>
    <tr>
      <td width="90" align="center" class=TopLighNav><b>申请部门</b></td>
      <td width="100" align="center" class=TopLighNav><%=rs("deptname")%></td>
	  <td width="80" align="center" class=TopLighNav><b>申请人</b></td>
      <td width="80" align="center" class=TopLighNav><%=rs("name")%></td>
	  <td width="80" align="center" class=TopLighNav><b>职务</b></td>
      <td align="center" class=TopLighNav><%=rs("stationname")%></td>
    </tr>

	  
    <tr>
      <td align="center" class=tablebody1><b>姓名</b></td>
      <td class=tablebody1><%=rs("thename")%> </td>
      <td class=tablebody1><b>部门</b></td>
      <td class=tablebody1><%
	  sql="select * from cci_dept where id=" & rs("deptid")
	  rssta.open sql,connobj,1,1
	  if not rs.eof then
	  	response.Write(rssta("deptname"))
	  end if
	  rssta.close
	  %></td>
      <td class=tablebody1><b>职位</b></td>
      <td class=tablebody1><%
	  		sql="select * from cci_station where id=" & rs("stationid")
			rssta.Open Sql,connObj,1,1
			if not rssta.eof then
				response.Write(rssta("stationname"))
			end if
	  		rssta.close	
	  %></td>
    </tr>
    <tr>
      <td align="center" class=tablebody1><b>性别</b></td>
      <td class=tablebody1><%
	  	if rs("sex")=1 then
			response.Write("男")
		elseif rs("sex")=0 then
			response.Write("女")
		elseif rs("sex")=2 then
			response.Write("不确定")
		end if
	  %></td>
      <td class=tablebody1><b>年龄</b></td>
      <td class=tablebody1><%=rs("age")%>(岁)</td>
      <td class=tablebody1><b>户口所在地</b></td>
      <td class=tablebody1><%=rs("Register")%></td>
    </tr>
    <tr> 
      <td align="center" class=tablebody1><b> 学历</b></td>
      <td colspan="2" class=tablebody1><%
	  	if rs("Edu_level")=1 then
			response.Write("初中")
		elseif rs("Edu_level")=2 then
			response.Write("中专")
		elseif rs("Edu_level")=3 then
			response.Write("高中")
	  	elseif rs("Edu_level")=4 then
			response.Write("大专")
		elseif rs("Edu_level")=5 then
			response.Write("本科")
		elseif rs("Edu_level")=6 then
			response.Write("硕士")
		elseif rs("Edu_level")=7 then
			response.Write("博士")
						
		end if
	  %></td>
      <td class=tablebody1><b>专业</b></td>
      <td colspan="2" class=tablebody1><%=rs("speciality")%></td>
    </tr>
	<tr > 
      <td class=tablebody1 align="center"><b>毕业院校</b></td>
      <td colspan="3" class=tablebody1 align="left"><%=rs("school")%></td>
	   <td class=tablebody1 align="center"><b>笔试成绩</b></td>
      <td class=tablebody1 align="left"><%=rs("count")%>(分)</td>

    </tr>
	<tr > 
      <td class=tablebody1 align="center"><b>面试成绩</b></td>
      <td colspan="5" class=tablebody1 align="left">仪容仪表:<%
	  	if rs("appearance")=1 then
			response.Write("优秀")
		elseif rs("appearance")=2 then
			response.Write("良好")
		elseif rs("appearance")=3 then
			response.Write("一般")
		end if
	  %>
		语言表达:<%
	  	if rs("expression")=1 then
			response.Write("优秀")
		elseif rs("expression")=2 then
			response.Write("良好")
		elseif rs("expression")=3 then
			response.Write("一般")
		end if
	  %>
		工作经验:<%
	  	if rs("experience")=1 then
			response.Write("丰富")
		elseif rs("experience")=2 then
			response.Write("较丰富")
		elseif rs("experience")=3 then
			response.Write("一般")
		end if
	  %>
		综合能力:<%
	  	if rs("capability")=1 then
			response.Write("优秀")
		elseif rs("capability")=2 then
			response.Write("良好")
		elseif rs("capability")=3 then
			response.Write("一般")
		end if
	  %>
		</td>
    </tr>
		<tr > 
      <td class=tablebody1 align="center"><b>薪水</b></td>
      <td colspan="5" class=tablebody1 align="left">试用期薪酬:<%=rs("testsalary")%>(元)
	  转正后薪酬:<%=rs("salary")%>(元)
		</td>
    </tr>
	<tr > 
      <td class=tablebody1 align="center"><b>岗位简介</b></td>
      <td colspan="5" class=tablebody1 align="left"><%=rs("jobBrief")%></td>
    </tr>
	<tr > 
      <td class=tablebody1 align="center"><b>备注</b></td>
      <td colspan="5" class=tablebody1 align="left"><%=rs("memo")%></td>
    </tr>
	<tr > 
      <td class=tablebody1 align="center"><b>录入日期</b></td>
      <td colspan="5" class=tablebody1 align="left"><%=rs("indate")%></td>
    </tr>
	
</table>
<%
rs.close
%>
<!-- #include file="func_comm_dispapply.asp" -->
<%
sql="select status,startuser from cci_oa_flowlist where id="& request("wfid")
rs.open sql,connobj,1,1
if not rs.eof then
	istatus=rs("status")
	if rs("startuser")=session("userid") and isstatus=0 then
		connobj.execute "update cci_oa_flowlist set status=3 where id=" & request("wfid")
	end if
end if
rs.close
if istatus<>0 and istatus<>3 then
%>
<!-- #include file="func_comm_apply.asp" -->
<%
end if
%>