复件 addteacherok.asp

学生管理功能: 1.添加单个成绩 2.批量添加成绩 3.通过搜索并修改与删除

<!--#include file="a25175_conn.asp"-->
<%
	dim TEACHER,showID,depart
	depart=trim(request.Form("depart"))
	 if depart="请您选择教师院别" then
	response.write"<script>alert('请选择教师的院别！');location='addteacher.asp'</script>"
	response.End()
	end if

	strsql="select * from department where department='"&depart&"'"
  	set rs=db.execute(strsql)
	departID=rs("id")
	
	TEACHER=trim(request.Form("TEACHER"))
	showID=trim(request.Form("ShowID"))
	TEACHERNUMBER=trim(request.Form("TEACHERNUMBER"))
	TEL=trim(request.Form("TEL"))
	IP=REQUEST.ServerVariables("REMOTE_ADDR")
   
	if TEACHER="" then
	response.write"<script>alert('输入教师名称呀！');location='addteacher.asp'</script>"	
	'防止非法的登陆
   		else
  	            strsql="select * from teacher where SHOWID="&showid&" and showID="&departID
  	            set rs=db.execute(strsql)
   			 	if not rs.eof then
   			 	response.write"<script>alert('"&DEPART&"已经有此显示顺序的教师了，请更换显示顺序！');location='addteacher.asp'</script>"
   			 	response.End()
    			end if
				'编号不能相同
				
				
				
	strsql="insert into teacher(teachername,depart,SHOWID,tel,num,SUBMIT_DATE,ip,departID) values('"&teacher&"','"&depart&"',"&showID&",'"&tel&"','"&teachernumber&"',"&date()&",'"&IP&"',"&departID&")"
	db.execute(strsql)
	strsql="insert into USERINFO(REALNAME,depart,tel,num,SUBMITDATE,IP,USERNAME,PASSWORD,typed) values('"&teacher&"','"&depart&"','"&tel&"','"&teachernumber&"',"&date()&",'"&IP&"','"&teachernumber&"','"&teachernumber&"',4)"
	
	db.execute(strsql)
	response.write"<script>alert('添加"&DEPART&"教师成功！');location='addteacher.asp'</script>"	
	end if
%>