File Manager
Back to List
| Current Directory: ~/
Editing: distribute_res.asp
Full path: C:\ict\ICT\distribute_res.asp
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<!--#INCLUDE FILE="ConnectDB.asp"--> <!--#include file="chk_login.asp"--> <% pern=session("username") per="2" tb="research" 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 then %> <!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"> <!-- InstanceBeginEditable name="head" --><!-- InstanceEndEditable --> <link href="bsri2006.css" rel="stylesheet" type="text/css"> <link href="image/favicon.ico" rel="shortcut icon" type="image/x-icon"> </head> <body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0"> <table width="100%" border="0"> <tr> <td colspan="2"><div align="right"><img src="Image/head1.gif" width="800" height="61"></div></td> </tr> <tr> <td colspan="2" background="Image/bghead1.gif"><div align="right"><font size="2" face="MS Sans Serif, Tahoma, sans-serif"><strong>| <a href="http://www.swu.ac.th" target=_blank>SWU</a> | <a href="http://bsri.swu.ac.th" target=_blank>BSRI</a> |<a href="chaPW.asp"><strong>Change Password</strong></a>|<a href="log_out.asp">Log Out </a></strong></font>|</div></td> </tr> <tr> <td width="20%" align="left" valign="top" bgcolor="#FFCCCC"><!-- InstanceBeginEditable name="EditRegion5" --><!--#include file="chk_menu.asp"--><!-- InstanceEndEditable --></td> <td width="77%" align="left" valign="top"><!-- InstanceBeginEditable name="EditRegion3" --> <div align="center"> <p>��������ŧҹ�Ԩ��<br> <% id=request("id") sqlall="select * from research where id_contact='"&id&"'" set orsall=server.CreateObject("adodb.recordset") orsall.open sqlall,conn,1,3 if not orsall.eof then %> </p> <table width="90%" border="0" bgcolor="#99FF99"> <% if not orsnc.eof then%><tr> <td bgcolor="#99FF66"><form name="form1" method="post" action="add_dis_res.asp"> <table width="100%" border="1" cellspacing="0" bordercolor="#CCCCCC"> <tr> <td colspan="2"><div align="center">���������š�������ŧҹ�Ԩ��</div></td> </tr> <tr> <td> <table width="100%" border="1" cellspacing="0" bordercolor="#CCCCCC"> <tr> <td width="28%"><div align="right">�Ţ����ѭ��</div></td> <td width="72%"><input name="id" type="text" id="oname" readonly="true" value=<%=orsall("id_contact")%>></td> </tr> <tr> <td height="29"> </td> <td><%=orsall("research_t")%></td> </tr> <tr> <td height="29"><div align="right">��������ù��ʹ�</div></td> <td><select name="id_type_dis_res"> <% set orstcr=server.createobject("adodb.recordset") sqltcr="select * from type_dis_res" orstcr.open sqltcr,Conn,1,3 if not orstcr.eof then orstcr.movefirst do while not orstcr.eof response.write "<option value="&orstcr("id_type_dis_res")&">"&orstcr("type_dis_res")&" </option>" orstcr.movenext loop end if %> </select> </td> </tr> <tr> <td><div align="right">�ѹ �� �� �����ʹ� </div></td> <td> <select name="d_dis_res" id="d_dis_res"> <option value="00">�ѹ���</option> <option value="01">01</option> <option value="02">02</option> <option value="03">03</option> <option value="04">04</option> <option value="05">05</option> <option value="06">06</option> <option value="07">07</option> <option value="08">08</option> <option value="09">09</option> <option value="10">10</option> <option value="11">11</option> <option value="12">12</option> <option value="13">13</option> <option value="14">14</option> <option value="15">15</option> <option value="16">16</option> <option value="17">17</option> <option value="18">18</option> <option value="19">19</option> <option value="20">20</option> <option value="21">21</option> <option value="22">22</option> <option value="23">23</option> <option value="24">24</option> <option value="25">25</option> <option value="26">26</option> <option value="27">27</option> <option value="28">28</option> <option value="29">29</option> <option value="30">30</option> <option value="31">31</option> </select> <select name="m_dis_res" id="m_begin"> <option value="00">��</option> <option value="1">���Ҥ�</option> <option value="2">����Ҿѹ��</option> <option value="3">�չҤ�</option> <option value="4">����¹</option> <option value="5">����Ҥ�</option> <option value="6">�Զع�¹</option> <option value="7">�á�Ҥ�</option> <option value="8">�ԧ�Ҥ�</option> <option value="9">�ѹ��¹</option> <option value="10">���Ҥ�</option> <option value="11">��Ȩԡ�¹</option> <option value="12">�ѹ�Ҥ�</option> </select><input name="y_dis_res" type="text" id="yp" onkeypress='if (event.keyCode < 46 || event.keyCode >57 ) event.returnValue=false;' size="10" maxlength="4"> </td> </tr> <tr> <td><div align="right">���ͧҹ / �͡��� </div></td> <td><textarea name="name_dis_res" cols="60" rows="3" id="name_dis_res"></textarea></td> </tr> <tr> <td><div align="right">ʶҹ��� / ��Ңͧ </div></td> <td><textarea name="place_dis_res" cols="60" rows="3" id="place_dis_res"></textarea></td> </tr> <tr> <td><div align="right">�ѹ���շ��Ѵ�ҹ</div></td> <td><select name="d_begin" id="select"> <option value="00">�ѹ���</option> <option value="01">01</option> <option value="02">02</option> <option value="03">03</option> <option value="04">04</option> <option value="05">05</option> <option value="06">06</option> <option value="07">07</option> <option value="08">08</option> <option value="09">09</option> <option value="10">10</option> <option value="11">11</option> <option value="12">12</option> <option value="13">13</option> <option value="14">14</option> <option value="15">15</option> <option value="16">16</option> <option value="17">17</option> <option value="18">18</option> <option value="19">19</option> <option value="20">20</option> <option value="21">21</option> <option value="22">22</option> <option value="23">23</option> <option value="24">24</option> <option value="25">25</option> <option value="26">26</option> <option value="27">27</option> <option value="28">28</option> <option value="29">29</option> <option value="30">30</option> <option value="31">31</option> </select> <select name="m_begin" id="select2"> <option value="00">��</option> <option value="1">���Ҥ�</option> <option value="2">����Ҿѹ��</option> <option value="3">�չҤ�</option> <option value="4">����¹</option> <option value="5">����Ҥ�</option> <option value="6">�Զع�¹</option> <option value="7">�á�Ҥ�</option> <option value="8">�ԧ�Ҥ�</option> <option value="9">�ѹ��¹</option> <option value="10">���Ҥ�</option> <option value="11">��Ȩԡ�¹</option> <option value="12">�ѹ�Ҥ�</option> </select> <input name="y_begin" type="text" id="y_begin" onkeypress='if (event.keyCode < 46 || event.keyCode >57 ) event.returnValue=false;' size="10" maxlength="4"> �֧ <select name="d_end" id="select3"> <option value="00">�ѹ���</option> <option value="01">01</option> <option value="02">02</option> <option value="03">03</option> <option value="04">04</option> <option value="05">05</option> <option value="06">06</option> <option value="07">07</option> <option value="08">08</option> <option value="09">09</option> <option value="10">10</option> <option value="11">11</option> <option value="12">12</option> <option value="13">13</option> <option value="14">14</option> <option value="15">15</option> <option value="16">16</option> <option value="17">17</option> <option value="18">18</option> <option value="19">19</option> <option value="20">20</option> <option value="21">21</option> <option value="22">22</option> <option value="23">23</option> <option value="24">24</option> <option value="25">25</option> <option value="26">26</option> <option value="27">27</option> <option value="28">28</option> <option value="29">29</option> <option value="30">30</option> <option value="31">31</option> </select> <select name="m_end" id="select4"> <option value="00">��</option> <option value="1">���Ҥ�</option> <option value="2">����Ҿѹ��</option> <option value="3">�չҤ�</option> <option value="4">����¹</option> <option value="5">����Ҥ�</option> <option value="6">�Զع�¹</option> <option value="7">�á�Ҥ�</option> <option value="8">�ԧ�Ҥ�</option> <option value="9">�ѹ��¹</option> <option value="10">���Ҥ�</option> <option value="11">��Ȩԡ�¹</option> <option value="12">�ѹ�Ҥ�</option> </select> <input name="y_end" type="text" id="y_dis_res2" onkeypress='if (event.keyCode < 46 || event.keyCode >57 ) event.returnValue=false;' size="10" maxlength="4"></td> </tr> <tr> <td><div align="right">��������´�������</div></td> <td><textarea name="detail_dis_res" cols="60" rows="3" id="detail_dis_res"></textarea></td> </tr> </table> </td> </tr> <tr> <td colspan="2"><div align="center"> <input type="submit" name="Submit" value="Submit"> </div></td> </tr> </table><%end if%></form> <br></td> </tr><%end if%> <tr> <td align="center" valign="top" bgcolor="#FFCCFF">�����š�������ŧҹ�Ԩ��<br> <% id=request("id") response.write "[<a href=detail_research.asp?id="&orsall("id_contact")&">"&orsall("id_contact")&"</a>]<br>����ͧ " response.write orsall("research_t") %> <br> <table width="100%" border="1" cellspacing="0" bordercolor="#CCCCCC"> <tr> <td><div align="center"><strong>�ѹ �� �� </strong></div></td> <td><div align="center"><strong>��������������</strong></div></td> <td><div align="center"><strong>���ͧҹ/������</strong></div></td> <td><div align="center"><strong>ʶҹ���/˹��§ҹ</strong></div></td> <td><div align="center"><strong>�������ҷ��Ѵ</strong></div></td> <td><div align="center"><strong>��������´���</strong></div></td> <% if not orsnc.eof then %> <td><div align="center"><strong>Action</strong></div></td> <% end if %> </tr> <% sqlch2="select * from distribute_res where id_contact='"&id&"'" set orsch2=server.CreateObject("adodb.recordset") orsch2.open sqlch2,conn,1,3 if not orsch2.eof then orsch2.movefirst do while not orsch2.eof response.write "<tr>" response.write "<td>" response.write orsch2("d_dis_res")&" - "&orsch2("m_dis_res")&" - "&orsch2("y_dis_res") response.write "<td>" sqlt="select * from type_dis_res where id_type_dis_res='"&orsch2("id_type_dis_res")&"'" set orst=server.CreateObject("adodb.recordset") orst.open sqlt,conn,1,3 if not orst.eof then response.write orst("type_dis_res") response.Write orsch2("id_type_dis_res") end if response.write "<td>" response.write orsch2("name_dis_res") response.write "<td>" response.write orsch2("place_dis_res") response.write "<td>" response.write orsch2("d_begin")&"-"&orsch2("m_begin")&"-"&orsch2("y_begin")&" �֧ "&orsch2("d_end")&"-"&orsch2("m_end")&"-"&orsch2("y_end") response.write "<td>" response.write orsch2("detail_dis_res") if not orsnc.eof then response.Write "<td>" %> [<a href=edit_distribute_res.asp?id=<%=orsch2("id_dis_res")%>>Edit</a>] [<a href=del_distribute_res.asp?id=<%=orsch2("id_dis_res")%>&id_n=<%=orsall("id_contact")%> onClick="return confirm('�����Ҩ�ź?');">Del</a>] <% end if orsch2.movenext loop end if %> </table> <% %> </td> </tr> </table> <p> </p> <p> </p> </div> <!-- InstanceEndEditable --></td> </tr> <tr> <td colspan="2" background="Image/bghead1.gif">Contact Admin:: wassanaw@swu.ac.th tel.02-649-5000 ext 17600</td> </tr> </table> </body> <!-- InstanceEnd --></html> <% 'else %> <SCRIPT LANGUAGE="JavaScript"> <% 'response.write "window.location.href='index.html';" %> --> </SCRIPT> <% 'end if %>