File Manager
Back to List
| Current Directory: ~/
Editing: equipment_add_form.asp
Full path: C:\ict\ICT\equipment_add_form.asp
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<%response.cachecontrol="private"%> <!--#INCLUDE FILE="ConnectDB.asp"--> <!--#include file="chk_login.asp"--> <% pern=session("username") per="2" tb="equipment" 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><strong>��������ѳ�����������ʶҺѹ�Ԩ�¾ĵԡ�����ʵ��</strong></p> <table width="573" border="1" cellspacing="0"> <form name="form1" method="post" action="equipment_add.asp"> <tr> <td>����������ѳ��</td> <!-- <��������͵ç���> --> <% id_type=request.form("id_type") id_sub_type=request.form("id_sub_type") %> <td><select name="id_type"> <% set orsl=server.createobject("adodb.recordset") sqll="select * from equipment_type" orsl.open sqll,Conn,1,3 if not orsl.eof then orsl.movefirst do while not orsl.eof %> <option value = <%=orsl("id_type") %>> <%=orsl("type_name") %> </option> <% orsl.movenext loop end if %></select> </tr> <tr> <td>���������� <td> </tr> <tr> <td width="152">�����Ţ����ѳ��</td> <td width="411"><input type="text" name="id_equipment"></td> </tr> <tr> <td>Serial Number</td> <td><input type="text" name="serial_eq"></td> </tr> <tr> <td>�է�����ҳ</td> <td><input type="text" name="year_budget"></td> </tr> <tr> <td>�������Թ�ع</td> <td><select name="id_type_budget"><% set orst=server.createobject("adodb.recordset") sqlt="select * from equipment_budget" orst.open sqlt,Conn,1,3 if not orst.eof then orst.movefirst do while not orst.eof response.write "<option value="&orst("id_type_budget")&">"&orst("type_budget")&" </option>" orst.movenext loop end if %></select></td> </tr> <tr> <td>�Ըա�èѴ����</td> <td><select name="id_method"><% set orsm=server.createobject("adodb.recordset") sqlm="select * from equipment_method" orsm.open sqlm,Conn,1,3 if not orsm.eof then orsm.movefirst do while not orsm.eof response.write "<option value="&orsm("id_method")&">"&orsm("method")&" </option>" orsm.movenext loop end if %></select></td> </tr> <tr> <td>�ѹ���շ�����</td> <td><select name="d_purchase" id="d_purchase"> <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_purchase" id="m_purchase"> <option value="00">��</option> <option value="01">���Ҥ�</option> <option value="02">����Ҿѹ��</option> <option value="03">�չҤ�</option> <option value="04">����¹</option> <option value="05">����Ҥ�</option> <option value="06">�Զع�¹</option> <option value="07">�á�Ҥ�</option> <option value="08">�ԧ�Ҥ�</option> <option value="09">�ѹ��¹</option> <option value="10">���Ҥ�</option> <option value="11">��Ȩԡ�¹</option> <option value="12">�ѹ�Ҥ�</option> </select><select name="y_purchase"> <option value="0">0</option> <% mydate=date myyear=year(mydate) mym=month(mydate) if mym>9 then yearbegin=myyear+528 myyear=myyear+542 else yearbegin=myyear+528 myyear=myyear+543 end if 'myyear=myyear+543 'response.write "<tr><td>"&yearbegin&"</td></tr>" i=0 do while i<16 %> <option <% if yearbegin=myyear then %> value=<%=myyear%> selected <%else%> <%end if%>> <%=yearbegin%> </option> <%i=i+1 yearbegin=yearbegin+1 loop %> </select></td> </tr> <tr> <td>˹��¹Ѻ</td> <td><select name="id_unit"><% set orsu=server.createobject("adodb.recordset") sqlu="select * from equipment_unit" orsu.open sqlu,Conn,1,3 if not orsu.eof then orsu.movefirst do while not orsu.eof response.write "<option value="&orsu("id_unit")&">"&orsu("unit")&" </option>" orsu.movenext loop end if %></select></td> </tr> <tr> <td>�ӹǹ�շ���Ѻ��Сѹ</td> <td><input name="time_assure" type="text" id="yp" onkeypress='if (event.keyCode < 46 || event.keyCode >57 ) event.returnValue=false;' size="10" maxlength="2"></td> </tr> <tr> <td>������</td><td><input name="id_brand" type="text" size="20" ></td> </tr> <tr> <td>��������´�����</td> <td><TEXTAREA NAME="detail_retail" ROWS="3" COLS="30"></TEXTAREA></td> </tr> <tr> <td>���</td> <td><input name="number" type="text" size="30"></td> </tr> <tr> <td>�Ҥ�</td> <td><input name="price" type="text" id="price" onkeypress='if (event.keyCode < 46 || event.keyCode >57 ) event.returnValue=false;'> �ҷ</td> </tr> <!-- <tr> <td>���</td> <td><input name="ram" type="text" size="8"></td> </tr> <tr> <td>HD</td> <td><input name="hd1" type="text" size="20" ></td> </tr> <tr> <td>Core CPU</td> <td><input name="core_cpu" type="text" size="30" ></td> </tr> --> <tr> <td>����Ѻ�Դ�ͺ</td> <td><select name="id_owner"> <option value=000>====�Ҩ����====</option> <% set orsl=server.createobject("adodb.recordset") sqll="select * from lecturer where statusdel=1 order by name_lec" orsl.open sqll,Conn,1,3 if not orsl.eof then orsl.movefirst do while not orsl.eof response.write "<option value="&orsl("id_lecturer")&">"&orsl("name_lec")&" "&orsl("sur_lec")&" </option>" orsl.movenext loop end if %> <option value=9999>===���˹�ҷ��===</option> <% set orso=server.createobject("adodb.recordset") sqlo="select * from staff where statusdel=1 order by name_st" orso.open sqlo,Conn,1,3 if not orso.eof then orso.movefirst do while not orso.eof response.write "<option value="&orso("id_staff")&">"&orso("name_st")&" "&orso("sur_st")&" </option>" orso.movenext loop end if %> </select> </td> </tr> <tr> <td>ʶҹ�����</td> <td><TEXTAREA NAME="place" ROWS="3" COLS="30"></TEXTAREA></td> </tr> <tr> <td>ʶҹФ���ѳ��</td> <td><select name="id_status"> <% set orsl=server.createobject("adodb.recordset") sqll="select * from equipment_status" orsl.open sqll,Conn,1,3 if not orsl.eof then orsl.movefirst do while not orsl.eof response.write "<option value="&orsl("id_status")&">"&orsl("status_name")&"</option>" orsl.movenext loop end if %> </tr> <tr> <td>�ѹ���շ���˹���</td> <td><select name="d_retire" id="d_retire"> <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_retire" id="m_retire"> <option value="00">��</option> <option value="01">���Ҥ�</option> <option value="02">����Ҿѹ��</option> <option value="03">�չҤ�</option> <option value="04">����¹</option> <option value="05">����Ҥ�</option> <option value="06">�Զع�¹</option> <option value="07">�á�Ҥ�</option> <option value="08">�ԧ�Ҥ�</option> <option value="09">�ѹ��¹</option> <option value="10">���Ҥ�</option> <option value="11">��Ȩԡ�¹</option> <option value="12">�ѹ�Ҥ�</option> </select><select name="y_retire"> <option value="0000">0</option> <% mydate=date myyear=year(mydate) mym=month(mydate) if mym>9 then yearbegin=myyear+528 myyear=myyear+542 else yearbegin=myyear+528 myyear=myyear+543 end if 'myyear=myyear+543 'response.write "<tr><td>"&yearbegin&"</td></tr>" i=0 do while i<16 %> <option <% if yearbegin=myyear then %> value=<%=myyear%> selected <%else%> <%end if%>> <%=yearbegin%> </option> <%i=i+1 yearbegin=yearbegin+1 loop %> </select></td> </tr> <tr> <td>��������´�������</td> <td><TEXTAREA NAME="more_detail" ROWS="3" COLS="30"></TEXTAREA></td> </tr> </select></td> </tr> <tr> <td> </td> <td><input type="submit" name="Submit" value="Submit"></td> </tr> </table> <p> </p> <p> </p> </form> <p> </p> <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 response.write "No Permission" response.write "<a href=index_academic.asp>Return</a>" end if %>