addcourseok.asp

来自「学生管理功能: 1.添加单个成绩 2.批量添加成绩 3.通过搜索并修改与删除」· ASP 代码 · 共 32 行

<!--#include file="a25175_conn.asp"-->
<%
	TEACH=trim(request.Form("TEACH"))
	DEPART=trim(request.Form("DEPART"))
	CLASS1=trim(request.Form("CLASS1"))
	TERM=trim(request.Form("TERM"))
	course=trim(request.Form("course"))
	BEIZHU=trim(request.Form("BEIZHU"))
    if beizhu="" then
	beizhu="无"
	end if
      judge1=right(class1,1)
    if judge1="*" then
	class1=left(class1,len(class1)-1)
	end if

   
	if CLASS1="" OR DEPART="" OR COURSE="" then
	response.write"<script>alert('输入教师开课的全部信息才能提交！');location='addcourse.asp'</script>"	
	'防止非法的登陆
   		else
		 strsql="select * from term where term='"&term&"'"
  	    set rs=db.execute(strsql)
		termID=rs("ID")
		
				
	strsql="insert into teachercourse(teachername,term,course,department,beizhu,termID,class) values('"&teach&"','"&term&"','"&course&"','"&depart&"','"&beizhu&"',"&termid&",'"&class1&"')"
	
	db.execute(strsql)
	response.write"<script>alert('添加课程成功！');location='addcourse.asp'</script>"	
	end if
%>