File Manager
Back to List
| Current Directory: ~/
Editing: del_thesis.asp
Full path: C:\ict\ICT\del_thesis.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")="thesis" %> <!--#include file="chk_permission.asp"--> <% '***************************************************************** if session("tb_edit") = 2 then '���Է��� �����㹰ҹ ��� ����Ңͧ�������ͧ %> <head> <body> <% dim ors id_thesis=request("id_thesis") id_stu=request("id_stu") set ors=server.createobject("adodb.recordset") sqlmark="Delete from thesis where id_thesis= '"&id_thesis&"' " ors.Open sqlmark, conn, 1, 3 set ors1=server.createobject("adodb.recordset") sqlmark1="Delete from thesis_test where id_thesis= '"&id_thesis&"' " ors1.Open sqlmark1, conn, 1, 3 set ors2=server.createobject("adodb.recordset") sqlmark2="Delete from committee_thesis where id_thesis= '"&id_thesis&"' " ors2.Open sqlmark2, conn, 1, 3 response.write"ź�������������º�������Ǩ��" 'resposne.write "<meta http-equiv='refresh' content ='0;url=choose_course_form.asp?id_category="&id_category&" '>" response.write "<meta http-equiv='refresh' content ='0;url=edit_thesis_stu_form.asp?id_stu="&id_stu&"'>" 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 '���Է� %>