func_hire.asp

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

<SCRIPT LANGUAGE="JavaScript">
<!--
function CheckInput()
{
	if(!dochange(document.theform.count))
		return false;
	if(!dochange(document.theform.age))
		return false;
	if(!dochange(document.theform.testsalary))
		return false;
	if(!dochange(document.theform.salary))
		return false;
						
				
	return true;
}	
function dochange(object)
{
		var i,strText,s;
		s=object.value;
		strText="请输入正确值，必须用阿拉伯数字填写";
		 for (i = 0; i < s.length; i++)
		{   
			// Check that current character is number.
			var c = s.charAt(i);
			if (!(((c >= "0") && (c <= "9")) || c == "."))
			{
				object.focus();
				window.alert(strText);
				
				return false;
			}
		}
		return true;
}		
//-->
</SCRIPT>

<!-- #include file="func_verify.asp" -->
<%

dim sumcount,saveserial

set rs = Server.CreateObject("ADODB.Recordset")

if request("saveflag")<>"" then
	dim msg
	saveserial=1
	msg=""

	if trim(request("thename"))="" then
		msg=msg & saveserial & "、请招聘人姓名!<br>"
		saveserial=saveserial+1
	end if
	if trim(request("deptID"))="" then
		msg=msg & saveserial & "、请选择部门!<br>"
		saveserial=saveserial+1
	end if
	if trim(request("StationID"))="" then
		msg=msg & saveserial & "、请选择职位!<br>"
		saveserial=saveserial+1
	end if
	if trim(request("age"))="" then
		msg=msg & saveserial & "、请输入年龄!<br>"
		saveserial=saveserial+1
	end if	
	if trim(request("Register"))="" then
		msg=msg & saveserial & "、请输入户口所在地!<br>"
		saveserial=saveserial+1
	end if
	
	if trim(request("speciality"))="" then
		msg=msg & saveserial & "、请输入专业!<br>"
		saveserial=saveserial+1
	end if
	if trim(request("Edu_level"))="" then
		msg=msg & saveserial & "、请选择学历!<br>"
		saveserial=saveserial+1
	end if
	
	if trim(request("school"))="" then
		msg=msg & saveserial & "、请输入毕业院校!<br>"
		saveserial=saveserial+1
	end if
	if trim(request("count"))="" then
		msg=msg & saveserial & "、请输入笔试成绩!<br>"
		saveserial=saveserial+1
	end if
	if trim(request("testsalary"))="" then
		msg=msg & saveserial & "、请输入试用期薪酬!<br>"
		saveserial=saveserial+1
	end if			
	if trim(request("salary"))="" then
		msg=msg & saveserial & "、请输入转正后薪酬!<br>"
		saveserial=saveserial+1
	end if
	if request("wfid")="" then
		msg=msg & saveserial & "、请选择发起工作流!<br>"
		saveserial=saveserial+1
	end if
		
	if saveserial<=1 then
		maxid=getmaxid(request("wfid"))
		
		sql="select * from cci_oa_hire"
		rs.open sql,connobj,3,3
		rs.addnew
		
		rs("wfid")=maxid
		rs("userid")=session("userid")
		rs("deptid")=session("deptid")
		rs("StationID")=request("StationID")
		
		rs("theName")=request("theName")
		rs("Sex")=request("Sex")
		rs("age")=request("age")
		rs("Register")=trim(request("Register"))
		rs("Edu_level")=request("Edu_level")
		rs("school")=request("school")
		rs("testsalary")=request("testsalary")
		rs("salary")=request("salary")
		rs("count")=cdbl(request("count"))
		rs("speciality")=trim(request("speciality"))
		
		if trim(request("appearance"))<>"" then
			rs("appearance")=trim(request("appearance"))
		end if
		if trim(request("expression"))<>"" then
			rs("expression")=trim(request("expression"))
		end if
		if trim(request("experience"))<>"" then
			rs("experience")=trim(request("experience"))
		end if
		if trim(request("capability"))<>"" then
			rs("capability")=trim(request("capability"))
		end if
		if trim(request("jobBrief"))<>"" then
			rs("jobBrief")=trim(request("jobBrief"))
		end if
		if trim(request("memo"))<>"" then
			rs("memo")=trim(request("memo"))
		end if				
								
		rs("InDate")=now
		rs.update
		rs.close
		
		sql="select * from cci_oa_flowlist where id="& maxid
		rs.open sql,connobj,3,3
		if not rs.eof then
			rs("title")="关于"& session("name") & "的『员工录用审批』"
			rs.update
		end if
		rs.close
		
		response.redirect "message.asp?rediurl=defaultA.asp&msgurl=首页&msginfo=员工录用审批操作成功！请耐心等待领导审批!"

		
	end if
	response.Write("<div align=center><font color=#FF0000>" &msg & "</font></div>")
end if

%>

  
<table width="100%" align="center" cellpadding="1" cellspacing="1" class=tableborder1>
  <form name="theform" method="post" action="" onSubmit="return CheckInput()">
    <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><%
	  
	  sql="select deptname from cci_dept where id=" & session("deptid")
	  rs.open sql,connobj,1,1
	  if not rs.eof then
	  	response.Write rs("deptname")
	  end if
	  rs.close
	  
	  %></td>
      <td width="80" align="center" class=TopLighNav><b>姓名</b></td>
      <td width="80" align="center" class=TopLighNav><%=session("name")%></td>
      <td width="80" align="center" class=TopLighNav><b>职务</b></td>
      <td align="center" class=TopLighNav><%
	  
	  sql="select stationname from cci_station where id=" & session("stationid")
	  rs.open sql,connobj,1,1
	  if not rs.eof then
	  	response.Write rs("stationname")
	  end if
	  rs.close
	  
	  %></td>
    </tr>
    
    <tr>
      <td align="center" class=tablebody1><b>姓名</b></td>
      <td class=tablebody1><input name="thename" type="text" size="10" maxlength="4">
	  </td>
      <td class=tablebody1><b>部门</b></td>
      <td class=tablebody1><select name="DeptID"><%
	  
	  sql="select * from cci_dept"
	  rs.open sql,connobj,1,1
	  flag=0
	  do while not rs.eof
	  	if session("deptid")=rs("id") then
			response.Write "<option value=" & cstr(rs("id")) & " selected>" & rs("deptname") & "</option>"
			flag=1
		else
	  		response.Write "<option value=" & cstr(rs("id")) & ">" & rs("deptname") & "</option>"
		end if
		rs.movenext
	  loop
	  rs.close
	  	if flag<>1 then
			response.Write "<option selected></option>"
		else
			response.Write "<option></option>"		
		end if
	  %></select></td>
      <td class=tablebody1><b>职位</b></td>
      <td class=tablebody1><select name=stationid>
          <%
	  		sql="select * from cci_station"
			Rs.Open Sql,connObj,1,1
			flag=0
			do while not rs.eof
				if LevelCode=rs("id") then
					flag=1
				 	response.Write "<option value=" & rs("id") & " selected>" & rs("stationName") & "</option>"
				else
					response.Write "<option value=" & rs("id") & ">" & rs("stationName") & "</option>"
				end if
				rs.movenext
			loop
		rs.close
		if flag<>1 then
			response.Write "<option selected></option>"
		else
			response.Write "<option></option>"		
		end if
	  	
	  %>
        </select></td>
    </tr>
    <tr>
      <td align="center" class=tablebody1><b>性别</b></td>
      <td class=tablebody1><select name="sex" id="sex">
          <option value="1" selected>男</option>
          <option value="0">女</option>
		  <option value="2">不确定</option>
        </select></td>
      <td class=tablebody1><b>年龄</b></td>
      <td class=tablebody1><input name="age" type="text" id="age" size="4" maxlength="4">
        (岁)</td>
      <td class=tablebody1><b>户口所在地</b></td>
      <td class=tablebody1><input name="Register" type="text" id="Register" size="10" maxlength="20"></td>
    </tr>
    <tr> 
      <td align="center" class=tablebody1><b> 学历</b></td>
      <td colspan="2" class=tablebody1><select name="Edu_level" id="Edu_level">
          <option value="1">初中</option>
          <option value="2">中专</option>
		  <option value="3">高中</option>
          <option value="4">大专</option>
          <option value="5">本科</option>
          <option value="6">硕士</option>
          <option value="7">博士</option>
        </select></td>
      <td class=tablebody1><b>专业</b></td>
      <td colspan="2" class=tablebody1><input name="speciality" type="text" id="speciality" size="25" maxlength="40"></td>
    </tr>
	<tr > 
      <td class=tablebody1 align="center"><b>毕业院校</b></td>
      <td colspan="3" class=tablebody1 align="left"><input name="school" type="text" id="school" size="40" maxlength="40"></td>
	   <td class=tablebody1 align="center"><b>笔试成绩</b></td>
      <td class=tablebody1 align="left"><input name="count" type="text" size="10" maxlength="4">(分)</td>

    </tr>
	<tr > 
      <td class=tablebody1 align="center"><b>面试成绩</b></td>
      <td colspan="5" class=tablebody1 align="left">仪容仪表:<select name="appearance">
          <option value="1">优秀</option>
          <option value="2">良好</option>
          <option value="3">一般</option>
        </select>
		语言表达:<select name="expression">
          <option value="1">优秀</option>
          <option value="2">良好</option>
          <option value="3">一般</option>
        </select>
		工作经验:<select name="experience">
          <option value="1">丰富</option>
          <option value="2">较丰富</option>
          <option value="3">一般</option>
        </select>
		综合能力:<select name="capability">
          <option value="1">优秀</option>
          <option value="2">良好</option>
          <option value="3">一般</option>
        </select>
		</td>
    </tr>
		<tr > 
      <td class=tablebody1 align="center"><b>薪水</b></td>
      <td colspan="5" class=tablebody1 align="left">试用期薪酬:<input name="testsalary" type="text" size="10" maxlength="10">(元)
	  转正后薪酬:<input name="salary" type="text" size="10" maxlength="10">(元)
		</td>
    </tr>
	<tr > 
      <td class=tablebody1 align="center"><b>岗位简介</b></td>
      <td colspan="5" class=tablebody1 align="left"><textarea name="jobBrief" cols="75" rows="5"><%=request("jobBrief")%></textarea></td>
    </tr>
	<tr > 
      <td class=tablebody1 align="center"><b>备注</b></td>
      <td colspan="5" class=tablebody1 align="left"><textarea name="memo" cols="75" rows="5" id="memo"><%=request("memo")%></textarea></td>
    </tr>
   <tr >
      <td class=tablebody1 align="center"><b>工作流发起</b></td>
      <td colspan="5" class=tablebody1 align="left"><select name="wfid">
	  <%
	  	sql="select * from cci_oa_wfdefine where taskid=3"
		Rs.Open Sql,connObj,1,1
		do while not rs.eof
			response.Write "<option value=" & rs("id") & ">" & rs("wfname")& "</option>"
			rs.movenext
	  	loop
		rs.close
	  %></select>
	  </td>
    </tr>


	
    <tr> 
      <td colspan="6" align="center" class=tablebody1><input type="submit" name="Submit" value=" 申 请 "></td>
    </tr>
    <input type=hidden name=saveflag value="1">
  </form>
</table>