<!--#include file="../checkLogin.asp"-->
<!--#include file="../SQLconn.asp"-->


<%   
    nowxueqi=TRIM(Request("xueqi"))   'request.cookies("nowxueqi") 
    strGrade = TRIM(Request("grade"))
	strsubject = TRIM(Request("subject"))
    bianhao=request("bianhao")
	mingcheng= TRIM(request("mingcheng"))
	strid=request("id")
    
if mingcheng<>"" then 
		set Rssave=server.createobject("adodb.recordset")
		Rssavesql="select * from Subjectvar where (id is null)" 
		Rssave.open Rssavesql,conn,1,3
			Rssave.addnew
			Rssave("编号")=bianhao
			Rssave("类别")="章次"
			Rssave("科目")=strsubject
			Rssave("年级")=strGrade
			Rssave("学期")=nowxueqi
			Rssave("章次")=mingcheng
			Rssave("设置人")=request.cookies("tname")
			Rssave.update
 end if


Rssave.close
response.redirect  "varzhang.asp?subject="&strsubject&"&grade="&strGrade&"&xueqi="&nowxueqi
 
 %>
<%=nowxueqi%><p>
<%=strGrade%><p>
<%=strsubject%><p>
<%=bianhao%><p>
<%=mingcheng%><p>
<%=strid%><p>
 