File Manager
Back to List
| Current Directory: ~/
Editing: confirm_advisor_thesis.asp
Full path: C:\ict\ICT\confirm_advisor_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 '���Է��� �����㹰ҹ ��� ����Ңͧ�������ͧ pern=session("username") id_stu=request("id_stu") 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 if not orsnc.eof or id_stu=session("id_stu1") then %> <head> <body> <% dim ors id_lecturer=request("id_lecturer") id_thesis=request("id_thesis") id_stu=request("id_stu") id_num=request("id_num") set ors=server.createobject("adodb.recordset") sqlmark="update advisor_thesis set id_thesis='"&id_thesis&"' where id_lecturer= '"&id_lecturer&"' and id_stu='"&id_stu&"' and id_num='"&id_num&"' " ors.Open sqlmark, conn, 1, 3 response.write"��ѹ�������������º�������Ǩ��" response.write sqlmark '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=add_advisor_thesis_form.asp?id_stu="&id_stu&"&id_thesis="&id_thesis&"'>" 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 '���Է� %>