File Manager
Back to List
| Current Directory: ~/
Editing: thesis_progress_to_adv.asp.bak
Full path: C:\ict\ICT\thesis_progress_to_adv.asp.bak
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<!--#include file="chk_permission.asp"--> <!--#include file="inc_cache_control.asp"--> <!--#include file="inc_access_control.asp"--> <!--#include file="chk_login.asp"--> <html> <body> <% dcheck=Date() date1=datepart("d",date) month1=month(now()) y=year(now()) y=543+y y=right(y,2) if date1=1 then date1="01" elseif date1=2 then date1="02" elseif date1=3 then date1="03" elseif date1=4 then date1="04" elseif date1=5 then date1="05" elseif date1=6 then date1="06" elseif date1=7 then date1="07" elseif date1=8 then date1="08" elseif date1=9 then date1="09" end if if month1=1 then month1="01" elseif month1=2 then month1="02" elseif month1=3 then month1="03" elseif month1=4 then month1="04" elseif month1=5 then month1="05" elseif month1=6 then month1="06" elseif month1=7 then month1="07" elseif month1=8 then month1="08" elseif month1=9 then month1="09" end if dcheck=y&""&month1&""&date1 '***************************************************************** '#customers tr:nth-child(even){background-color: #f2f2f2;} '#customers tr:hover {background-color: #ddd;} session("tb_name")="student" id_type=request.form("id_type") %> <% '***************************************************************** 'if session("tb_preview") =2 or session("id_stu1") = id_stu then '���Է��� �����㹰ҹ ��� ����Ңͧ�������ͧ pern=session("username") per="2" tb="student" sqlnc="select * from tb_permission where id_staff='"&pern&"' and tb_edit='"&per&"' and tb_name='"&tb&"'" set orsnc=server.createobject("adodb.recordset") orsnc.open sqlnc,conn,1,3 id_stu=request.form("id_stu") id_progress_report=request.form("id_progress_report") id_status_check=request.form("id_sc") id_check=request.form("id_c") sqlprt="select * from rp_check where id_check='"&id_check&"'" Set orsprt=server.createobject("adodb.recordset") orsprt.open sqlprt,conn,1,3 If Not orsprt.eof Then sqle = "update rp_check set id_status_check='"&id_status_check&"', date_staff_check='"&dcheck&"', id_staff_check='"&id_staff1&"',dsc='"&date1&"',msc='"&month1&"',ysc='"&y&"' where id_check = '" & id_check&"' " set orse=server.createobject("adodb.recordset") orse.open sqle,Conn,1,3 'Response.write sqle Else 'Response.write "��辺�����§ҹ�ѧ�����" End if 'id_status_check=orsprt("id_status_check")%> <form name="frm_submit" method="post" action="javascript:history.go(-1)"> <input type="hidden" name="id_progress_report" value=<%=id_progress_report%>> <input type="hidden" name="id_check" value=<%=id_check%>> <input type="hidden" name="id_stu" value=<%=id_stu%>> </form> <script language='javascript'> document.frm_submit.submit(); </script> </body> </html>