File Manager

<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">

<title>�Թ�յ�͹�Ѻ������ʶҺѹ�Ԩ��==>��������ͧ����Ѵ</title>


<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><font size='2' face='ms sans serif' >
˹�� |
<%
for page=1 to totalpage	 %>
 <a href="measurment_page.asp?no=<%=page%>&start=<%=(pagesize)*(page-1)+1%>">
<%=page%></a>&nbsp|&nbsp
<%next%>
<br> �ӹǹ������<%=total%> �ä����<br>
<table width="75%" align = "center" border="1" align="center" cellpadding="0" cellspacing="0" bgcolor="#CC6699"><tr ><td width="90%"><div align="center"><strong>�к����Ң���������ͧ����Ѵ ʶҺѹ�Ԩ�¾ĵԡ�����ʵ��</td></tr>
</table>
<TABLE align="center"  border="1" align="center" cellpadding="0" cellspacing="0" bgcolor="#FF66FF"><FORM METHOD="POST" ACTION="result_search_mea.asp"onsubmit="return Dosubmit();" >

</select>
	</td>

<td>      <input  class = "button" type="submit" name="����" value = "����"><td></tr>
  </TABLE>
  </FORM>
  [<a href="research_page.asp">���ҧҹ�Ԩ��</a>]
  <%
  if session("login")<>"" then %> 
  [<a href = "add_mea.asp">  ��������ͧ����Ѵ  </a>]
  [<a href = "logout.asp"> Log Out </a>]
  <%else %>
  [<a href = "index.asp"> Log In</a> ]
<% end if%>
  <div align ="center">
<%if pageno=1 then 
								response.write "[  ��͹˹��  ]"
		else %>
		[<a href = "measurment_page.asp?no=1&start=1"> ˹���á </a>]
		[<a href = "measurment_page.asp?no=<%=pageno-1%>&start=<%=start-10%>">  ��͹˹��  </a>]
		<%end if
		response.write "[  ˹��  "&pageno&"/"&totalpage&"]"
      if pageno=totalpage then 
	  response.write "[  �Ѵ�  ]"
			else%>
			<a href="measurment_page.asp?no=<%=pageno+1%>&start=<%=start+10%>">[  �Ѵ�  ]</a>
			<%last=total mod pagesize
			    if last=0 then
						last=total-pagesize+1
						else 
						last=total-(total mod pagesize)+1
						end if%>
			<a href="measurment_page.asp?no=<%=totalpage%>&start=<%=last%>">[  �ش����  ]</a>
<%end if%>

'<%
'if session("login")="" then

'else

'<td colspan="2" width="100"><div align="center"><strong><font color="#CCFFCC">Action</font></strong></div></td>

'</tr>%>
       <%
'end if	   
  Set ors = Server.CreateObject("ADODB.Recordset")
  sql = "select * from measurement_ms order by meas_id"
  ors.Open sql, Conn, 1, 3
  colorv=1

' id=ors("id_typenews")
 'type_=ors("type_news")
 ors.movefirst
 do while not ors.eof
num=num+1 '����������͵�Ǩ��Ҩ���ú��� endrecord �����ѧ
 if maxnum >=endrecord then exit do '�������������� maxnum �դ���ҡ��� ����ش���� ����͡�ҡ do ���ǹ�ͺ������
 ors.movenext
    if num>=start then '�ç������������
	ors.moveprevious
			maxnum=maxnum+1 '�ç��������������͹�ѹ �����������
					valuecolor = colorv mod 2
					if valuecolor = 0 then 
					vcolor = "#FFFFCC"
					else vcolor = "#FFCCFF"
					end if
					
				response.write"<tr bgcolor ="& vcolor &"><td width='100'><div align='center'><a href = detail_mea.asp?meas_id="& ors("meas_id")&">"& ors("meas_id") &_
   "</a></div></td><td><font color='#000000'><a href = detail_mea.asp?meas_id="& ors("meas_id")&"><font size='2' face='ms sans serif'  color='#990000'>" & ors("meas_name") & _
   "</font></a></td></tr><tr bgcolor ="& vcolor &"><td><td>[�ҹ�Ԩ�·���� ::]<a href=detail_res.asp?search_id="&ors("meas_ref")&">"& ors("meas_ref") &"</td></tr><tr bgcolor ="& vcolor &"><td><td>"
  '�֧��ҧҹ�Ԩ�·����ҧ�ԧ

' end if
					res_re = ors("meas_ref")
					sql_res="select * from search_th_ms where search_id ="&res_re&""
					set ors_res=server.createobject("ADODB.RECORDSET")
					on error resume next
					ors_res.open sql_res,conn,1,3
					if not ors_res.eof then
					response.write "<a href = detail_res.asp?search_id="&res_re&"><font size='2' face='ms sans serif' >"&ors_res("search_title")
					else response.write "   Empty"
					end if
	if session("login")="" then 
'response.write "<div align = 'center' > �س�ѧ����� Login<br>" 
r'esponse.write "�س������Է�����䢢�����</div>"

else 
					response.write  "</td></tr><tr bgcolor ="& vcolor &"><td><td>[<a href=edit_mea.asp?meas_id=" & ors("meas_id") & "><img src='picture/edit1.gif'  border='0' alt='���'></a>]"
response.write  "[<a href=del_mea.asp?meas_id=" & ors("meas_id") & "><img src='picture/i.p.delete.gif' width='11' height='12' border='0' alt='ź'></a>]"

end if
					response.write "</td></tr>"
		ors.movenext
		colorv=colorv+1
	end if
 'loop
 
loop

ors.close
	  'ors_r.close
 set ors=nothing
	 %>
	  <tr><td colspan="6" bgcolor="#660000"></td></tr>
  </table><br><br>	
  <div align ="center">
      <%  response.write"[<a href=research_page.asp>��Ѻ˹�Ҥ��ҧҹ�Ԩ��</a>]  "
response.write"[<a href=measurment_page.asp> ��Ѻ˹�Ҥ�������ͧ����Ѵ</a> ] "	
%>
[<a href="javascript:history.go(-1)"> Back</a>]
</div>

</body>
</html>

File Manager

Editing: research/measurment_page.asp.bak