File Manager
Back to List
|
Up to Parent Directory
| Current Directory: ~/research
Editing: research/testpage.asp
Full path: C:\ict\ICT\research\testpage.asp
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<!--#INCLUDE FILE="connectDB.asp"--> <!--#INCLUDE FILE="find.asp"--> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-874"> <meta http-equiv="Cache-Control" content="no-cache"> <meta http-equiv="Pragma" content="no-cache"> <!-- InstanceBeginEditable name="doctitle" --> <title>�Թ�յ��Ѻ������ʶҺѹ�Ԩ��==>��������ͧ����Ѵ</title> <!-- InstanceEndEditable --> <!-- InstanceBeginEditable name="head" --> <style> .bot{ text-decoration: none; color: FFFFFF; font-size: 10px; font-family: verdana,arial; font-weight: bold; } .bot:hover{color: 000000;} .bot1{ color: D56767; font-size: 15px; font-family: Times New Roman,verdana,arial; font-weight: bold; } .bot1:hover{ color: 3B5598; } .bot2{ color: D56767; font-size: 13px; font-family: Times New Roman,verdana,arial; } .bot2:hover{ color: 3B5598; } .submenu01{ color: FFFFFF; font-weight: bold; font-family: System; padding-right: 10px; text-align: right; } .heading{ FONT-FAMILY: "Courier New", Courier, mono; font-size: 20px; font-weight: bold; } .system01{ FONT-FAMILY: "Courier New", Courier, mono; font-size: 12px; font-weight: bold; } TD{ font-size: 16px; FONT-FAMILY: Arial, Helvetica, sans-serif; color: 000000; } </style> </head> <script language="javascript"> function Dosubmit(){ if(document.all.search_key.value!=''&& document.all.type_search.value!=0){ }else { alert('��͡��ͤ�������ͧ���Ҵ��¹Ш�� '); return false; } } </script> <body> ˹�� | <% for page=1 to totalpage %> <a href="testpage.asp?no=<%=page%>&start=<%=(pagesize)*(page-1)+1%>"> <%=page%></a> /  <%next%> <br> �ӹǹ������<%=total%><br> <TABLE><FORM METHOD=POST ACTION="result_search_mea.asp"onsubmit="return Dosubmit();"> <tr ><td colspan="4"><div align="center"><strong>�к����Ң���������ͧ����Ѵ ʶҺѹ�Ԩ�¾ĵԡ�����ʵ��</td></tr> <TR> <TD>��سҡ�͡��觷���ͧ��ä��� </TD><td><INPUT TYPE="text" NAME="search_key"></td> <TD> <select name="type_search"> <option value=0>==���͡==</option> <option value=1>��������ͧ����Ѵ</option> <option value=2>��������ͧ</option> <option value=3>�ҹ�Ԩ�·����</option> </select> </td> <td> <input class = "button" type="submit" name="����" value = "����"><td></tr> </TABLE> </FORM> <table width="75%" border="0" cellpadding="0" cellspacing="0"> <tr bgcolor="#660000"> <td><div align="center"><strong><font color="#CCFFCC">��������ͧ����Ѵ</font></strong></div></td> <td><div align="center"><strong><font color="#CCFFCC">��������ͧ</font></strong></div></td> <td><div align="center"><strong><font color="#CCFFCC">���ʧҹ�Ԩ�·����</font></strong></div></td> <td><div align="center"><strong><font color="#CCFFCC">���ͧҹ�Ԩ�·����</font></strong></div></td> </tr></table> <% Set ors = Server.CreateObject("ADODB.Recordset") sql = "select * from measurement_ms order by meas_id" ors.Open sql, Conn, 1, 3 colorv=1 num=0 maxnum=0 ' id=ors("id_typenews") 'type_=ors("type_news") ors.movefirst ' for i = 1 to total do while not ors.eof num=num+1 '����������͵�Ǩ��Ҩ���ú��� endrecord �����ѧ response.write ors("meas_id")&"<br>" if maxnum >=endrecord then exit do '111�������������� maxnum �դ���ҡ��� ����ش���� ����͡�ҡ do ���ǹ�ͺ������ 'response.write "end2="&endrecord ' response.write "max="&maxnum ors.movenext 'loop if num>=start then '�ç������������ ors.moveprevious maxnum=maxnum+1 '�ç���������������ѹ ����������� response.write "num2="&num response.write "start2="&start'&"maxnum2="&maxnum&"<br>" 'response.write "<br>"&ors("meas_id")&"<br>" 'end if 'if maxnum >=endrecord then exit do response.write "<br>"&ors("meas_id")&"<br>" ors.movenext end if'111 loop 'next ors.close 'ors_r.close set ors=nothing %> <% response.write"<a href=research_page.asp>��Ѻ˹�Ҥ��ҧҹ�Ԩ��</a> " response.write"<a href=measurment_page.asp>|| ��Ѻ˹�Ҥ�������ͧ����Ѵ</a> " %> <a href="javascript:history.go(-1)">|| Back</a> </body> </html>