File Manager
Back to List
| Current Directory: ~/
Editing: save_edit_advisor_thesis.asp
Full path: C:\ict\ICT\save_edit_advisor_thesis.asp
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<% On Error Resume Next %> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-874"> </head> <!--#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"--> <% date0=request.form("date0") command_no=request.form("command_no") command_date=left(date0,2) command_month=mid(date0,4,2) command_year=right(date0,4) id_lecturer=request.form("id_lecturer") id_thesis=request.form("id_thesis") id_stu=request.form("id_stu") command_sem=request.form("command_sem") if command_date=1 then command_date="01" elseif command_date=2 then command_date="02" elseif command_date=3 then command_date="03" elseif command_date=4 then command_date="04" elseif command_date=5 then command_date="05" elseif command_date=6 then command_date="06" elseif command_date=7 then command_date="07" elseif command_date=8 then command_date="08" elseif command_date=9 then command_date="09" end if if command_month=1 then command_month="01" elseif command_month=2 then command_month="02" elseif command_month=3 then command_month="03" elseif command_month=4 then command_month="04" elseif command_month=5 then command_month="05" elseif command_month=6 then command_month="06" elseif command_month=7 then command_month="07" elseif command_month=8 then command_month="08" elseif command_month=9 then command_month="09" end if if session("tb_edit") = 2 or session("id_stu1")=id_stu then '���Է��� sqldata="update advisor_thesis set command_no='"&command_no&"', command_date='"&command_date&"' , command_month='"&command_month&"', command_year='"&command_year&"', command_sem='"&command_sem&"' where id_stu ='"&id_stu&"' and id_thesis='"&id_thesis&"' and id_lecturer='"&id_lecturer&"'" set orsdata=Server.CreateObject("adodb.recordset") orsdata.open sqldata,conn,1,3 response.write sqldata response.write "<meta http-equiv='refresh' content ='0;url=add_advisor_thesis_form.asp?id_stu="&id_stu&"&id_thesis="&id_thesis&"'>" else '���Է� response.write "<tr><td colspan=3><center>�س������Է����� �س���ѵԹ��" response.write "<meta http-equiv=refresh content =4;url=javascript:history.back();>" '���Է� end if '���Է� %> </html>