⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 add_tcinfo.asp

📁 功能不是很全面,需要自己修改和添加.尊重作者版权,希望大家相互学习,提出意见和建议.
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!-- #include file="conn.asp" -->
<%
if session("admin")="" then
response.Write "<script language='javascript'>alert('网络超时或您还没有登陆!');window.location.href='login.html';</script>"
response.End
else
if request.QueryString("action")="add_TcInfo" then
set rs=server.CreateObject("adodb.recordset")
rs.open "select TcName from Tc_Info where TcName='"&trim(request.Form("TcName"))&"'",conn,1,1
i=0
do while not rs.EOF
i=i+1
rs.movenext
loop
if i>0 then
response.write "<script language=javascript>alert('此教师资料已存在');</script>"
response.write "<script language=javascript>this.location.href='javascript:history.back()';</script>"
Response.end
else 
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from Tc_Info",conn,3,2
rs1.AddNew
rs1("TcName")=trim(request.Form("TcName"))
rs1("TcSex")=trim(request.Form("TcSex"))
rs1("TcAge")=trim(request.Form("TcAge"))
rs1("TcPost")=trim(request.Form("TcPost"))
rs1("DepartName")=trim(request.Form("DepartName"))
rs1("TcEdu")=trim(request.Form("TcEdu"))
rs1("TcPolitical")=trim(request.Form("TcPolitical"))
rs1("TcAddTime")=trim(request.Form("Add_Time"))
rs1.Update
rs1.close
set rs1=nothing
response.write "<script language=javascript>alert('信息添加成功');location.href='admin_TcInfo.asp';</script>"
'response.Redirect("admin_TcInfo.asp")
response.End
end if
end if
end if
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<link rel="stylesheet" type="text/css" href="main.css">
<title>添加老师个人信息</title>
<style type="text/css">
<!--
.style3 {color: #000000}
body {
	background-image: url(images/5.jpg);
}
-->
</style>
</head>

<body>
<div>
  <form id="form1" name="form1" method="post" action="add_TcInfo.asp?action=add_TcInfo" onsubmit="return checknull()">
    <span class="style3">教师姓名</span>    
    <input type="text" name="TcName" id="TcName" />
    <br />
    <span class="style3">教师性别 
    </span>
    <select name="TcSex" id="TcSex">
    <option value="男" selected="selected">男</option>
    <option value="女">女</option>
  </select>
  <br />
   <span class="style3">教师年龄</span>   
   <input type="text" name="TcAge" id="TcAge" />
   <br />
   <span class="style3">教师职称</span>   
   <input name="TcPost" type="text" id="TcPost" size="20" />
   <%
	set rspost=server.CreateObject("adodb.recordset")
	rspost.open "select * from Post Order By postid Desc",conn,1,1
	
	%>
   <select name="select1" onChange="(document.form1.TcPost.value=this.options[this.selectedIndex].value)">
   <option selected>请选择职称</option>
    <% do while not rspost.EOF %>
    <option value="<%=rspost("PostName")%>"><%=rspost("PostName")%></option>
    <%
	rspost.movenext
	loop
	rspost.close
	set rspost=nothing
	%>
   </select>
   <br />
   <span class="style3">所属部门</span>   
   <input name="DepartName" type="text" id="DepartName" size="20" />
   <%
   set rsdep=server.CreateObject("adodb.recordset")
   rsdep.open "select * from Depart Order By did Desc",conn,1,1
   
   %>
   <select name="select2" onChange="(document.form1.DepartName.value=this.options[this.selectedIndex].value)">
   <option selected>请选择部门</option>
   <% do while not rsdep.EOF%>
     <option value="<%=rsdep("DepartName")%>"><%=rsdep("DepartName")%></option>
    <%
	rsdep.movenext
	loop
	rsdep.close
	set rsdep=nothing
	%>
   </select>
   <br />
   <span class="style3">教师学历</span>   
   <input name="TcEdu" type="text" id="TcEdu" size="20" />
   <%
   set rsedu=server.CreateObject("adodb.recordset")
   rsedu.open "select * from Edu Order By Eduid Desc",conn,1,1
   %> 
   <select name="select3" onChange="(document.form1.TcEdu.value=this.options[this.selectedIndex].value)">
   <option selected>请选择学历</option>
   <% do while not rsedu.EOF %>
     <option value="<%=rsedu("EduName")%>"><%=rsedu("EduName")%></option>
    <%
	rsedu.movenext
	loop
	rsedu.close
	set rsedu=nothing
	%>
   </select>
   <br />
   <span class="style3">政治面貌</span>   
   <input name="TcPolitical" type="text" id="TcPolitical" size="20" />
   <%
   set rspol=server.CreateObject("adodb.recordset")
   rspol.open "select * from Political Order By PolId Desc",conn,1,1 
   %><select name="select4" onChange="(document.form1.TcPolitical.value=this.options[this.selectedIndex].value)">
   <option selected>请选择政治面貌</option>
   <% do while not rspol.EOF %>
     <option value="<%=rspol("PolName")%>"><%=rspol("PolName")%></option>
    <%
	rspol.movenext
	loop
	rspol.close
	set rspol=nothing
	%>
   </select>
   <br />
   <span class="style3">入职时间</span>   
   <input type="text" name="Add_Time" id="Add_Time" />
   <span id="time"> &nbsp;&nbsp;如:2001-5-18</span>
   <br />
   <input type="submit" name="add_TcInfo" id="add_TcInfo" value="提交" />
   <br />
  </form>
</div>
</body>
<script type="text/javascript">
function checknull()
{
if(document.form1.TcName.value=="")
  {
    alert("教师名称不能为空!")
	document.form1.TcName.focus()
    return false
  }
}
</script>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -