func_usermodi.asp

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

<SCRIPT LANGUAGE="JavaScript">
<!--
function CheckInput()
{
	if(!dochange(document.theform.telephone))
		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;
}

function DoDelete(value1,value2,value3)
{
	if(!confirm("删除后将无法恢复，一定要删除吗？"))
		return;
	document.deleform.id.value=value1;
	document.deleform.tid.value=value2;
	document.deleform.deleteflag.value=value3;
	document.deleform.submit();
}
	
function DoChange(value1,value2,value3)
{
	document.selectform.id.value=value1;
	document.selectform.tid.value=value2;
	document.selectform.selectflag.value=value3;
	document.selectform.submit();
}
		
//-->
</SCRIPT>

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

dim sumcount,saveserial

set rs = Server.CreateObject("ADODB.Recordset")
set rsata = Server.CreateObject("ADODB.Recordset")
dim msg

saveserial=1
msg=""


if request("deleteflag")<>"" then
	if request("deleteflag")="3" then
		sql="delete from cci_oa_embg where id=" & request("tid")
	elseif request("deleteflag")="4" then
		sql="delete from cci_oa_exper where id=" & request("tid")
	else
		sql="delete from cci_oa_Member where id=" & request("tid")
	end if
	ConnObj.execute(sql)
	msg="信息删除成功，编号为:" & request("tid")
	response.Write("<div align=center><font color=#FF0000>" &msg & "</font></div>")
end if


if request("saveflag")="1" then
	
	if trim(request("name"))="" then
		msg=msg & saveserial & "、请输入员工姓名!<br>"
		saveserial=saveserial+1
	end if
	
	if trim(request("Sex"))="" then
		msg=msg & saveserial & "、请选择员工性别!<br>"
		saveserial=saveserial+1
	end if
	
	if trim(request("politics"))="" then
		msg=msg & saveserial & "、请选择员工政治面貌!<br>"
		saveserial=saveserial+1
	end if
	if trim(request("Marry"))="" then
		msg=msg & saveserial & "、请选择员工婚姻状况!<br>"
		saveserial=saveserial+1
	end if	
	if trim(request("Tech_post"))="" 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("stature"))="" then
		msg=msg & saveserial & "、请输入员工身高!<br>"
		saveserial=saveserial+1
	end if		

	if trim(request("IDCard"))="" 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("degree"))="" 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("Register"))="" then
		msg=msg & saveserial & "、请输入员工户口地址!<br>"
		saveserial=saveserial+1
	end if
	if trim(request("Reg_postcode"))="" then
		msg=msg & saveserial & "、请输入员工户口地址邮编!<br>"
		saveserial=saveserial+1
	end if



	if saveserial<=1 then
		sql="select * from cci_oa_emreg where id=" & request("id")
		rs.open sql,connobj,3,3

		rs("Name")=request("name")
		rs("Sex")=request("Sex")
		rs("Birthday")=request("year") & "-" & request("month") & "-" & request("day") & " 00:00:00"
		rs("politics")=request("politics")
		rs("Marry")=request("Marry")
		rs("nation")=request("nation")
		rs("Tech_post")=request("Tech_post")
		rs("Stationid")=request("Stationid")	
		rs("InTime")=request("year2") & "-" & request("month2") & "-" & request("day2") & " 00:00:00"	
		rs("stature")=request("stature")	
		rs("IDCard")=request("IDCard")
		rs("Edu_level")=request("Edu_level")
		rs("degree")=request("degree")
		rs("speciality")=request("speciality")
		rs("WorkTime")=request("year3") & "-" & request("month3") & "-" & request("day3") & " 00:00:00"
		if trim(request("PCability"))<>"" then
			rs("PCability")=request("PCability")
		end if
		if trim(request("Application"))<>"" then
			rs("Application")=request("Application")
		end if
		if trim(request("StrongSuit"))<>"" then	
			rs("StrongSuit")=request("StrongSuit")
		end if
		if trim(request("avocation"))<>"" then	
			rs("avocation")=request("avocation")
		end if
		if trim(request("chinese"))<>"" then	
			rs("chinese")=request("chinese")
		end if
		if trim(request("englishL"))<>"" then	
			rs("englishL")=1
		end if
		if trim(request("EnglishT"))<>"" then
			rs("EnglishT")=1
		end if
		if trim(request("EnglishR"))<>"" then
			rs("EnglishR")=1
		end if
		if trim(request("englishW"))<>"" then
			rs("englishW")=1
		end if
		if trim(request("GuangDongL"))<>"" then
			rs("GuangDongL")=1	
		end if
		if trim(request("GuangDongT"))<>"" then
			rs("GuangDongT")=1	
		end if

		rs("Register")=request("Register")
		rs("Reg_postcode")=request("Reg_postcode")
		
		if trim(request("RegTel"))<>"" then
			rs("RegTel")=request("RegTel")
		end if
		if trim(request("Dwelling"))<>"" then	
			rs("Dwelling")=request("Dwelling")
		end if
		if trim(request("Dw_postcode"))<>"" then	
			rs("Dw_postcode")=request("Dw_postcode")
		end if
		if trim(request("DW_Tel"))<>"" then	
			rs("DW_Tel")=request("DW_Tel")
		end if
		if trim(request("Urgency_Tel"))<>"" then	
			rs("Urgency_Tel")=request("Urgency_Tel")
		end if
		if trim(request("Urgency_other"))<>"" then	
			rs("Urgency_other")=request("Urgency_other")
		end if

		rs("status")=1
	
		rs.update
		rs.close
		msg="员工基本信息保存成功！"
	end if
	response.Write("<div align=center><font color=#FF0000>" &msg & "</font></div>")
elseif request("saveflag")="2" or request("saveflag")="3" then
	if trim(request("starttime"))="" then
		msg=msg & saveserial & "、请输入开始时间!<br>"
		saveserial=saveserial+1
	end if
	if trim(request("EndTime"))="" then
		msg=msg & saveserial & "、请输入结束时间!<br>"
		saveserial=saveserial+1
	end if
	if saveserial<=1 then
		if request("saveflag")="2" then
			sql="select * from cci_oa_embg"
		else
			sql="select * from cci_oa_embg where id=" & request("tid")
		end if

		rs.open sql,connobj,3,3
		if request("saveflag")="2" then
			rs.addnew
		end if
		rs("srcid")=request("id")
		rs("StartTime")=request("starttime")
		rs("EndTime")=request("EndTime")
		rs("school")=request("school")
		rs("speciality")=request("speciality")
		rs("mode")=request("mode")
		rs("encourage")=request("encourage")
	
		rs.update
		rs.close
		msg="员工基本信息保存成功！"
	end if
	response.Write("<div align=center><font color=#FF0000>" &msg & "</font></div>")
	
elseif request("saveflag")="4" or request("saveflag")="5" then
	if trim(request("starttime"))="" then
		msg=msg & saveserial & "、请输入开始时间!<br>"
		saveserial=saveserial+1
	end if