File Manager

<%response.cachecontrol="private"%>


<%
		  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>
<head>

<title>�к����ʹ�����͡�ú�����</title>
 
<meta http-equiv="Content-Type" content="text/html; charset=windows-874">

<link href="bsri2006.css" rel="stylesheet" type="text/css">

</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">SWU</a> | <a href="http://bsri.swu.ac.th">BSRI</a> 
        |<a href="log_out.asp">Log Out </a></strong></font>|</div></td>
  </tr>
  <tr> 
    <td width="20%" align="left" valign="top" bgcolor="#FFCCCC"></td>
    <td width="77%" align="left" valign="top">
      <div align="center">
        <p><strong>��¡�ä���ѳ��ʶҺѹ�Ԩ�¾ĵԡ�����ʵ��</strong></p>
        <%	  id=request("id_equipment")
			sqlall="select * from equipment where id_equipment='"&id&"'"
			set orsall=server.createobject("adodb.recordset")

orsall.open sqlall,conn,1,3
			   if not orsall.eof then
			  %>
          <table width="100%" border="1" cellspacing="0">
            
            <tr>
              <td width="152">�����Ţ����ѳ��</td>	<% response.write "<td><a href=equipment_detail.asp?id_equipment="&orsall("id_equipment")&">"&orsall("id_equipment")&"</a></td></tr>"%>
<tr>
              <td>Serial Number</td>
              <%response.write "<td>"&orsall("serial_eq")&"</td></tr>"%>
<tr>
              <td>������</td>
              <%response.write "<td>"&orsall("id_brand")&"</td></tr>"%>
<tr>
              <td>���</td>
              <%response.write "<td>"&orsall("number")&"</td></tr>"%>
<tr>
              <td>Price</td>
              <%response.write "<td>"&orsall("price")&"</td></tr>"%>
             <tr> <td>�ѹ��͹�շ�����</td>
			  <%response.write "<td>"&orsall("d_purchase")&"/"&orsall("m_purchase")&"/"&orsall("y_purchase")%>
              <tr><td>���ء����ҹ</td><%%>    </tr>         
              <tr><td>�ӹǹ�շ���Ѻ��Сѹ</td><%response.write "<td>"&orsall("time_assure")&"</td>"%> </tr>
<tr>
              <td>�է�����ҳ</td>
              <td><%=orsall("year_budget")%></td>
            </tr>
			<tr>
              <td>�������Թ�ع</td>
              <td><%
			  id_type_budget=orsall("id_type_budget")
			  set orst=server.createobject("adodb.recordset")
	 sqlt="select * from equipment_budget where id_type_budget='"&id_type_budget&"'"
	 orst.open sqlt,Conn,1,3
	 if not orst.eof then
	
			response.write orst("type_budget")

end if
			  %></td>
            </tr>
			<tr>
              <td>�Ըա�èѴ����</td>
              <td><%
			  id_method=orsall("id_method")
			  set orsm=server.createobject("adodb.recordset")
	 sqlm="select * from equipment_method where id_method='"&id_method&"'"
	 orsm.open sqlm,Conn,1,3
	 if not orsm.eof then
	
			response.write orsm("method")

end if
			  %></select></td>
            </tr>
<tr>
              <td>˹��¹Ѻ</td>
              <td><%
			  id_unit=orsall("id_unit")
			  set orsu=server.createobject("adodb.recordset")
	 sqlu="select * from equipment_unit where id_unit='"&id_unit&"'"
	 orsu.open sqlu,Conn,1,3
	 if not orsu.eof then
	orsu.movefirst
	do while not orsu.eof
			response.write orsu("unit")
		orsu.movenext
		loop
		end if
			  %></td>
            </tr>                                     
              <tr><td>���</td><%response.write "<td>"&orsall("ram")&"</td>"%> </tr>
            <tr><td>HD</td><%response.write "<td>"&orsall("mem_m")&"</td>"%> </tr>
			<tr><td>Core Cpu</td><%response.write "<td>"&orsall("core_cpu")&"</td>"%> </tr>
			<tr><td>ʶҹ�����</td><%response.write "<td>"&orsall("place")&"</td>"%> </tr>
              <tr><td>����Ѻ�Դ�ͺ</td><%
			  		id_owner=orsall("id_owner")
set orsl=server.createobject("adodb.recordset")
sqll="select * from lecturer where id_lecturer='"&id_owner&"'"
orsl.open sqll,Conn,1,3
if not orsl.eof then

response.write "<td>"&orsl("name_lec")&" "&orsl("sur_lec")&"</td>"
else 
	  set orso=server.createobject("adodb.recordset")
	 sqlo="select * from staff  where id_staff='"&id_owner&"'"
	 orso.open sqlo,Conn,1,3
	 if not orso.eof then

response.write "<td>"&orso("name_st")&" "&orso("sur_st")&"</td>"

end if

end if
			  %> </tr>
            
                    <% 
		
		'<option>===���˹�ҷ��===</option>%>
		<% 
		
		%>			
                  
              <tr>
              <td>��������´�����</td>
              <td><%response.write orsall("detail_retail")%></td>
            </tr>
              <tr><td>����������ѳ��</td><%
			  	id_type=orsall("id_type")
			  set orsl=server.createobject("adodb.recordset")
	 sqll="select * from equipment_type where id_type='"&id_type&"'"
	 orsl.open sqll,Conn,1,3
	 if not orsl.eof then
	
			response.write "<td>"&orsl("type_name")&"</td>"

end if%> </tr>
             
					
				  
                    <%

%>
			<tr> <td>�ѹ��͹�շ���˹���</td>
			  <%response.write "<td>"&orsall("d_retire")&"/"&orsall("m_retire")&"/"&orsall("y_retire")%>
              <tr><td>ʶҹФ���ѳ��</td><%
			  id_status=orsall("id_status")					
	  set orss=server.createobject("adodb.recordset")
	 sqls="select * from equipment_status where id_status='"&id_status&"'"
	 orss.open sqls,Conn,1,3
	 if not orss.eof then
				response.write "<td>"&orss("status_name")&"</td>"
	end if
	            response.write "<tr> <td>��������´�������</td>"
			  response.write "<td>"&orsall("more_detail")		 
			   response.write "<tr><td>[<a href=equipment_edit_form.asp?id_equipment="&orsall("id_equipment")&">Edit</a>]"

'orsall.movenext
					 ' loop
			  end if%> </tr>

<%
		
			 
					  'orsall.movefirst
							'do while not orsall.eof

'response.write "<td>"&orsall("date_purchase")&"</td>"
							
'�ӹǳ���ء����ҹ
							response.write "<td></td></tr>"

%>
			  
          </table>

</div>
    </td>
  </tr>
  <tr> 
    <td colspan="2" background="Image/bghead1.gif">Contact Admin:: wassanaw@g.swu.ac.th 
      tel.02-649-5000 ext 17600</td>
  </tr>
</table>
</body>
</html>
		<%
		else
		response.write "No Permission"
		response.write "<a href=index_academic.asp>Return</a>"
end if

File Manager

Editing: equipment_detail.asp.bak