add4.asp

一个人事管理系统

<!--#include file="data.asp"-->
<%
if request.form("xming")="" then
   response.write"请填写您的大名!!<a href=""javascript:history.go(-1)"">返回重输</a>"
   response.end
end if
if request.form("sex")="" then
  ' Request.Form("sex")
   'response.redirect"index.asp"
   response.write"请填写您的性别!!<a href=""javascript:history.go(-1)"">返回重输</a>"
   response.end
end if
if request.form("birth")="" then
   response.write"请填写您的生日!!<a href=""javascript:history.go(-1)"">返回重输</a>"
   response.end
end if
if request.form("mm")="" then
   response.write"请填写您的政治面貌!!<a href=""javascript:history.go(-1)"">返回重输</a>"
   response.end
end if
if request.form("xx")="" then
   response.write"请填写您的毕业学校!!<a href=""javascript:history.go(-1)"">返回重输</a>"
   response.end
end if
if request.form("zy")="" then
   response.write"请填写您的所学专业!!<a href=""javascript:history.go(-1)"">返回重输</a>"
   response.end
end if
if request.form("xw")="" then
   response.write"请填写您的学位或学历!!<a href=""javascript:history.go(-1)"">返回重输</a>"
   response.end
end if
if request.form("time0")="" then
   response.write"请填写您参加两课教学的时间!!<a href=""javascript:history.go(-1)"">返回重输</a>"
   response.end
end if
if request.form("sub1")="" then
   response.write"请填写您的两课教学科目!!<a href=""javascript:history.go(-1)"">返回重输</a>"
   response.end
end if
if request.form("zw")="" then
   response.write"请填写您的职务!!<a href=""javascript:history.go(-1)"">返回重输</a>"
   response.end
end if
if request.form("ls")="" then
   response.write"请填写您的隶属!!<a href=""javascript:history.go(-1)"">返回重输</a>"
   response.end
end if
if request.form("jc")="" then
   response.write"请填写您的奖惩情况!!<a href=""javascript:history.go(-1)"">返回重输</a>"
   response.end
end if
if request.form("px")="" then
   response.write"请填写您参加过何种培训!!<a href=""javascript:history.go(-1)"">返回重输</a>"
   response.end
end if
if request.form("zc")="" then
   response.write"职称，请重输入<a href=""javascript:history.go(-1)"">返回重输</a>"
   response.end
end if
name=Request.Form("xming")
sex=Request.Form("sex")
birth=Request.Form("birth")
mm=Request.Form("mm")
xx=Request.Form("xx")
zy=Request.Form("zy")
xw=Request.Form("xw")
by=request.form("by")
time0=Request.Form("time0")
sub1=Request.Form("sub1")
zc=Request.Form("zc")
zw=Request.Form("zw")
ls=Request.Form("ls")
jc=Request.Form("jc")
px=Request.Form("px")
time2=Request.Form("time2")
sql="Select * from 情况 Where 姓名='"&name&"'"
Set rs = conn.Execute( sql )
If RS. EOF AND rs.BOF Then
	str="Insert Into 情况(姓名,性别,生日,面貌,学校,毕业,专业,学位,时间,科目,职称,职务,隶属,奖惩,培训,登记) Values('"&name&"','"&sex&"','"&birth&"','"&mm&"','"&xx&"','"&by&"','"&zy&"','"&xw&"','"&time0&"','"&sub1&"','"&zc&"','"&zw&"','"&ls&"','"&jc&"','"&px&"','"&time2&"')"
	conn.execute(str)

%>
<script language="javaScript">
alert ("<%=name%>\n\n加入成功！")
location.href="techer.asp"
</script>
<%end if %>
  <script language="javaScript">
alert ("<%=name%>\n\n错误！数据库中以有同名问题。")
	location.href = "techer.asp"
</script>