Editing: add_grade.asp

<!--#include file="inc_cache_control.asp"--> <!--#include file="inc_access_control.asp"--> <!--#include file="chk_login.asp"--> <% '***************************************************************** session("tb_name")="course" %> <!--#include file="chk_permission.asp"--> <% '***************************************************************** if session("tb_edit") =2 then '���Է��� �����㹰ҹ ��� ����Ңͧ�������ͧ %> <% id_course=request.form("id_course") id_schedule=request.form("id_schedule") 'id_student=request.form("id_student") 'grade=request.form("grade") nowdate=now for each b in request.form("regis_grade") id2=len(b) b1=left(b,id2-11) id1=right(b,11) 'id1=right(b,id2-1) ' response.write "b="&b sql="update course_regis set grade='"&b1&"' where id_course= '"&id_course&"' and id_schedule= '" & id_schedule&"' and id_student= '" &id1&"'" response.write sql&"<br>" set ors=server.createobject("adodb.recordset") ors.open sql,conn,1,3 'set conn = nothing response.write"��䢢������������º�������Ǩ��" next %> <meta http-equiv="refresh" content ="0;url=add_grade_form.asp?id_course=<%=id_course%>&id_schedule=<%=id_schedule%>"> <% else '���Է� response.write "<tr><td colspan=3><center>�س������Է����� �س���ѵԹ��" response.write "<meta http-equiv=refresh content =3;url=javascript:history.back();>" '���Է� end if '���Է� %>