File Manager

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>

</head>

<td width="77%" align="left" valign="top">
<table width="100%" border="0" cellspacing="0">
  <tr> 	
	<%
id=request("id")

sqlall="select * from lecturer where id_lecturer="&id&""
		set orsall=server.createobject("adodb.recordset")
		orsall.open sqlall,conn,1,3
		if not orsall.eof then

%>
 <td width="892" align="left" valign="top" ><div align="center"><font size=2>

<br> <br><br><strong>�������Ҩ����</strong><br><br>
	<table border=0>
	<%
	response.write "<tr><td>"&orsall("name_lec")&" "&orsall("sur_lec")
	
	%></table>
	<%end if%></div></td>
	
				<table border=0 cellspacing=0 width="100%">
				<%
				response.write "<tr><td bgcolor=#CCCCFF><div align=center><strong>�ҹ�Ԩ�·����ѧ���Թ���"
				'������ʴ��ҹ�Ԩ�·����ѧ���Թ���
response.write  "<table width=100% border=1 cellspacing=0 bordercolor=#CCCCCC >"
          %><tr>
            <td><div align="center" >�ӴѺ���</div></td>
            <td><div align="center" >���ͧҹ�Ԩ��</div></td>

</tr>

<%
		  sqlin="select * from cowork_res where id_lecturer='"&id&"' order by id_contact desc"
		  set orsin=server.createobject("adodb.recordset")
		  orsin.open sqlin,conn,1,3
		  if not orsin.eof then' '������鹡�����͡�ѡ�Ԩ�·���ռŧҹ�Ԩ��
					orsin.movefirst
					noo=0
					do while not orsin.eof
								  id_stat_res="5"
								  sqlall="select * from research where id_status_res<>'"&id_stat_res&"' and id_contact='"&orsin("id_contact")&"' "
								  set orsall=server.CreateObject("adodb.recordset")
								  orsall.open sqlall,conn,1,3
								  if not orsall.eof then'
								  
								  orsall.movefirst
										do while not orsall.eof
										noo=noo+1
											 response.write "<tr><td >"&noo
											 
											 response.write "<td >"&orsall("research_t")
											 response.write "<td>"
											 id=orsall("id_contact")

orsall.movenext
										loop
										end if
				orsin.movenext
				loop

else
		  response.write "<tr><td colspan =6 align=center>����բ�����"
		  end if'

'end if
		  
		  %>
        </table>
<%

''''''''''''''''''
				response.write "</table>"

'end if
	%>

</td>
  </tr>
  <tr> 
    <td colspan="2" background="Image/bghead1.gif">&nbsp;</td>
  </tr>
</table>
</html>

File Manager

Editing: inpro_res_lec_pub.asp.bak