File Manager
Back to List
| Current Directory: ~/
Editing: close_course.asp
Full path: C:\ict\ICT\close_course.asp
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<!--#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("idc") id_schedule=request("ids") sts=request("sts") 'sql="select * from course_schedule2 where id='"&id&"'" 'set ors=server.createobject("adodb.recordset") 'ors.open sql,conn,1,3 'if not ors.eof then 'id_schedule=ors("id_schedule") 'id_course=ors("id_course") 'id_status=ors("id_status") 'end if 'sql_edit_course = "update course_schedule set id_status='"&sts&"' where id_schedule= '"&id_schedule&"' and id_course='"&id_course&"'" set ors_edit_course=server.createobject("adodb.recordset") 'ors_edit_course.open sql_edit_course,Conn,1,3 sql_edit_cs2 = "update course_schedule1 set id_status='"&sts&"' where id_schedule= '"&id_schedule&"' and id_course='"&id_course&"'" set ors_edit_cs2=server.createobject("adodb.recordset") ors_edit_cs2.open sql_edit_cs2,Conn,1,3 set conn = nothing response.write sql_edit_cs2 response.write"��䢢������������º�������Ǩ��" %> <meta http-equiv="refresh" content ="0;url=register_sche.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 '���Է� %>