File Manager
Back to List
| Current Directory: ~/
Editing: del_course_schedule.asp.bak
Full path: C:\ict\ICT\del_course_schedule.asp.bak
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<!--#INCLUDE FILE="Connectdb.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") <> 1 then '���Է��� �����㹰ҹ ��� ����Ңͧ�������ͧ %> <head> <body> <% dim ors id_course=request("id_course") id_lecturer=request("id_lecturer") id_schedule=request("id_schedule") set ors=server.createobject("adodb.recordset") sqlmark="Delete from course_schedule2 where id_schedule= '"&id_schedule&"' and id_course='"&id_course&"' and id_lecturer='"&id_lecturer&"' " ors.Open sqlmark, conn, 1, 3 response.write"ź�������������º�������Ǩ��" sql_c="select * from course_schedule2 where id_schedule='"&id_schedule&"' and id_course='"&id_course&"' " set ors_c=server.createobject("adodb.recordset") ors_c.open sql_c,conn,1,3 if ors_c.eof then sql_del="delete from course_schedule3 where id_schedule='"&id_schedule&"' and id_course='"&id_course&"'" set ors_del=server.createobject("adodb.recordset") ors_del.open sql_del,conn,1,3 'ź�����ŷ������� couse_regis ����դ�ŧ����¹�Ԫҹ��仴��� sql_del_regis="delete from course_regis where id_schedule='"&id_schedule&"' and id_course='"&id_course&"'" set ors_del_regis=server.createobject("adodb.recordset") ors_del_regis.open sql_del_regis,conn,1,3 sql_del_cs2="delete from course_schedule1 where id_schedule='"&id_schedule&"' and id_course='"&id_course&"'" set ors_del_cs2=server.createobject("adodb.recordset") ors_del_cs2.open sql_del_cs2,conn,1,3 end if response.write sql_del_regis&"=sql_c1<br>" response.write sql_del&"=sql_c2<br>" response.write sql_c&"=sql_c<br>" response.write "<meta http-equiv='refresh' content ='0;url=add_schedule1.asp?id_schedule="&id_schedule&"'>" Conn.Close 'end if %> </FORM> </body> </head> <% else '���Է� response.write "<tr><td colspan=3><center>�س������Է����� �س���ѵԹ��" response.write "<meta http-equiv=refresh content =4;url=javascript:history.back();>" '���Է� end if '���Է� %>