File Manager

<%response.cachecontrol="private"%>


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

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

<style type="text/css">

</style>

<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"></td>
    <td width="77%" align="left" valign="top">
      <div align="center">
        <p><strong>˹ѧ������ʶҺѹ�Ԩ�¾ĵԡ�����ʵ��<br>
        [<a href="all_letterin.asp">˹ѧ��ͷ�����</a>][<a href="searchletter.asp">����˹ѧ���</a>][<a href="letterin_staff.asp">˹ѧ��������ºؤ��</a>]</strong></p>
        <p>
		
<table><tr><td colspan=4 bgcolor="#669900">�Ҩ����
 <%
' bgc="#ffffff"
 i=1

sqlall="select * from lecturer where statusdel='1' order by name_lec"
		set orsall=server.createobject("adodb.recordset")
		orsall.open sqlall,conn,1,3
		if not orsall.eof then
		orsall.movefirst
		do while not orsall.eof
							ii=i mod 2
					 if ii=0 then
					 bgc="#ccffcc"
					 else
					 bgc="#ffffff"
					 end if
		response.write "<tr bgcolor="&bgc&"><td>[<a href=letins_sum.asp?ids="&orsall("id_lecturer")&">"&orsall("id_lecturer")&"</a>]</td><td>"&orsall("name_lec")&"  "&orsall("sur_lec")&"</td>"
		response.write "</tr>"
		'end if
		orsall.movenext
		i=i+1
		loop
		else
		response.write "<tr><td colspan=4>No Lecturer</td></tr>"
		end if
	%>
	<tr><td colspan=4 bgcolor="#669900">���˹�ҷ��
	 <%
	  i=1

sqls="select * from staff where statusdel='1' order by name_st"
		set orss=server.createobject("adodb.recordset")
		orss.open sqls,conn,1,3
		if not orss.eof then
		orss.movefirst
		do while not orss.eof
					ii=i mod 2
					 if ii=0 then
					 bgc="#FFFFCC"
					 else
					 bgc="#ffffff"
					 end if
		response.write "<tr bgcolor="&bgc&"><td>[<a href=letins_sum.asp?ids="&orss("id_staff")&">"&orss("id_staff")&"</a>]</td><td>"&orss("name_st")&"  "&orss("sur_st")&"</td>"
		response.write "</tr>"
		'end if
		orss.movenext
		i=i+1
		loop
		else
		response.write "<tr><td colspan=4>No Staff</td></tr>"
		end if
	%>
</table>

</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>
</html>
		<%
		'else
		'response.write "No Permission"
		'response.write "<a href=index_academic.asp>Return</a>"
'end if

File Manager

Editing: letterin_staff.asp