<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="CheckLogin.asp"-->
<!--#include file="StudentConn.asp" -->
<%
	strId=Request("strId")
	strClass=Request("strClass")
	strGrade=Request("strGrade")
	strStudentNum=Request("StudentId")
	strSheetName=Request("sheetname")
	strChuQin=Request("ChuQin")
	strName=Request("strName")
	Set objConn = Server.CreateObject("ADODB.Connection")
	objConn.ConnectionString = MM_StudentConn_STRING
	objConn.Open
	strSQL = "Update " & strSheetName & " Set 夜班天數 = '" & strChuQin & "' Where StudentNum = '" & strStudentNum & "'"
	objConn.Execute(strSQL)
	Response.Redirect("YeBanSet2.asp?StudentNum="&strID&"&StudentName="&strName&"&ClassID="&strClass&"&GradeID="&strGrade&"&SheetName="&strSheetName)
%>