jobsave.asp

目前人力资源管理系统的发展已经相对成熟

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--#include file=DataBase/conn.asp-->
<% 
'导入企业人才库
if  request("dao")<>"" then
		set rs=server.CreateObject("adodb.recordset")
		sql="select * from tb_Seeker where id="&request("dao")
		rs.open sql,conn,1,1
		set rsd=server.CreateObject("adodb.recordset")
		sqld="select * from tb_Jobbase"
		rsd.open sqld,conn,1,3
		rsd.addnew
		rsd("name")=rs("name")
		rsd("ename")=rs("ename")
		rsd("mianmao")=rs("mianmao")
		rsd("hun")=rs("hun")
		rsd("email")=rs("email")
		rsd("xueli")=rs("xueli")
		rsd("school")=rs("school")
		rsd("age")=rs("age")
		rsd("zhuanye")=rs("zhuanye")
		rsd("sex")=rs("sex")
		rsd("jiguan")=rs("jiguan")
		rsd("xianzhi")=rs("xianzhi")
		rsd("tel")=rs("tel")
		rsd("hander")=rs("hander")
		rsd("chusheng")=rs("chusheng")
		rsd("zhiwei")=rs("zhiwei")
		rsd("work")=rs("work")
		rsd("yi")=0
		rsd("jtime")=now()
		rsd.update
		rsd.close
		sqld="delete from tb_Seeker where id="&request("dao")
		conn.execute(sqld)
		response.Write("<script language=javascript>alert('导入成功');location='jobdaoadd.asp?p="&request("p")&"'</script>")
end if 
%>