File Manager
Back to List
| Current Directory: ~/
Editing: add_committee_thesis_stuadd.asp.bak
Full path: C:\ict\ICT\add_committee_thesis_stuadd.asp.bak
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"--> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> <html><!-- InstanceBegin template="/Templates/ict.dwt" codeOutsideHTMLIsLocked="false" --> <head> <!-- InstanceBeginEditable name="doctitle" --> <title>�к����ʹ�����͡�ú�����</title> <!-- InstanceEndEditable --> <meta http-equiv="Content-Type" content="text/html; charset=windows-874"> </title> <% session("tb_name")="thesis" %> <!--#include file="chk_permission.asp"--> <% id=request.form("id") response.write id&"aaa" id_lecturer=request.form("id_lecturerc") id_thesis=request.form("id_thesisc") id_stu=request.form("id_stuc") id_num=request.form("id_num") oral_out=request.form("oral_out") id_position_thesis=request.form("id_position_thesisc") if id_stu = session("id_stu1") then '���Է��� �����㹰ҹ ��� ����Ңͧ�������ͧ id_position_ch=1 '������յ��˹觻�иҹ�����ѧ sqlchh="select * from committee_thesis where id_position_thesis='"&id_position_ch&"'and id_thesis='"&id_thesis&"' and id='"&id&"'" set orschh=server.createobject("adodb.recordset") orschh.open sqlchh,conn,1,3 if not orschh.eof then id_po=orschh("id_position_thesis") if id_po=id_position_thesis then '����� 'response.write id_position_ch&"aa" ' sqlch="select * from advisor_thesis where id_position_thesis='"&id_position_thesis&"'and id_thesis='"&id_thesis&"'" 'set orsch=server.createobject("adodb.recordset") 'orsch.open sqlch,conn,1,3 'if not orsch.eof then %> <SCRIPT LANGUAGE="JavaScript"> <% 'response.write "���ʫ��"&id_lecturer response.write "alert('�յ��˹觻�иҹ����2"&id_position_ch&"-"&id_thesis&"');" response.write "window.location.href='add_committee_thesis_form.asp?id_stu="&id_stu&"&id_thesis="&id_thesis&"&id="&id&"';" %> </SCRIPT> <% else'��ǹ����Ͷ���ջ�иҹ������Т�����������������иҹ��ѹ�֡�� �ͺ͡������굷�������´չѡ�������괫�ӡѹ�֧�ͧ��� sqldata="insert into committee_thesis(id_lecturer,id_thesis,id_position_thesis,id_num,oral_out,id) values('"&id_lecturer&"','"&id_thesis&"','"&id_position_thesis&"','"&id_num&"','"&oral_out&"',"&id&")" 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_committee_thesis_form.asp?id_stu="&id_stu&"&id_thesis="&id_thesis&"&id="&id&"'>" end if '�� else '����ѧ����յ��˹觻�иҹ㹰ҹ������ sqldata="insert into committee_thesis(id_lecturer,id_thesis,id_position_thesis,id_num,oral_out,id) values('"&id_lecturer&"','"&id_thesis&"','"&id_position_thesis&"','"&id_num&"','"&oral_out&"','"&id&"')" 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_committee_thesis_form.asp?id_stu="&id_stu&"&id_thesis="&id_thesis&"&id="&id&"'>" response.write sqldata response.write sqlch end if set conn = nothing 'ors_data.close %> <% else '���Է� response.write "<tr><td colspan=3><center>�س������Է����� �س���ѵԹ��" response.write "<meta http-equiv=refresh content =4;url=javascript:history.back();>" '���Է� end if '���Է� %>