File Manager

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-874" />

<title>�������ҡ���Ե ʶҺѹ�Ԩ�¾ĵԡ�����ʵ��</title>

<style type="text/css">

</style>

</head>

<body>
<table width="100%" border="0" cellspacing="0">
  <tr>
    <td><div align="center"><img src="head.jpg" width="800" height="191" /></div></td>
  </tr>
  <tr>
    <td>
      <div align="center">
        
        </div></td></tr>
  <tr>
    <td align="center" valign="top">
     
	  <%
	  			username_stu=session("id_stu1")
	semeter=session("semeter")
	txtyear=session("txtyear")
	course_no=request("course_no")
	id_work=request("id_work")
	  
	  %>
	  
	  <p>��Ǩ��ú�ҹ <br />
	  <%
	  sql5="select * from course where course_no="&course_no&""
	  set ors5=server.createobject("adodb.recordset")
	  ors5.open sql5,conn,1,3
	  if not ors5.eof then

%>
      �Ԫ� 
	  <%
	  response.write ors5("id_course")&"-"&ors5("coursename")
	  response.write "<br>"&semeter&"/"&txtyear
	  end if
	  %>
	  <br>
      <B>��</B> �.
	  <%
	  sql6="select * from lecturer where id_lec='"&ors5("id_lecturer")&"'"
	  set ors6=server.createobject("adodb.recordset")
	  ors6.open sql6,conn,1,3
	  if not ors6.eof then
			response.write ors6("name")&"  "&ors6("surname")
	  end if
	  
	  %>
     <br> -----------------------------------------</p>
      <p>��ª��͹��Ե������<br />
      </p>
      <form id="form1" name="form1" method="post" action="uptoweb.asp">
   
      <table width="560" border="0">
        <tr>
          <td bgcolor="#FFFFCC"><div align="center"><strong>�ӴѺ���</strong></div></td>
          <td bgcolor="#FFFFCC"><div align="center"><strong>����-ʡ��</strong></div></td>
          <td bgcolor="#FFFFCC"><div align="center"><strong>File</strong></div></td>
          <td bgcolor="#FFFFCC"><div align="center"><strong>��������</strong></div></td>
        </tr>
		<%

sql1= "select * from register where course_no='"&course_no&"'"
	 Set ors1= Server.CreateObject("ADODB.Recordset")
    ors1.Open sql1, Conn, 1, 3
	'response.write sql1
		if not ors1.eof then
		   ors1.movefirst
		   a=1
		   do while not ors1.eof
		   						username_stu=ors1("id_stu")
		   					sql2="select * from student where username_stu='"&username_stu&"'"
							set ors2=server.createobject("adodb.recordset")
							'response.write sql2
							ors2.open sql2,conn,1,3
										if not ors2.eof then
										'response.write sql2
												response.write "<tr><td>"&a&"<td><div align=left>"&ors2("name_stu")&" " &ors2("surname_stu")&"</div>"
												sql3="select * from send_homework where id_work='"&id_work&"' and username_stu='"&username_stu&"'"
												set ors3=server.createobject("adodb.recordset")
												ors3.open sql3,conn,1,3
												 if not ors3.eof then
														response.write "<td><a href=upload/"&ors3("file_upload")&">"&ors3("file_upload")&"</a>"
														if ors3("status_online")=1 then
														response.write "<td>[<a href=uptoweb.asp?id_work="&id_work&"&username_stu="&username_stu&"&status_online="&ors3("status_online")&"&course_no="&course_no&">¡��ԡ</a>]"
														else 
														response.write "<td>[<a href=uptoweb.asp?id_work="&id_work&"&username_stu="&username_stu&"&status_online="&ors3("status_online")&"&course_no="&course_no&">͹��ѵ�</a>]"
														end if
												 else
													response.write "<td>-"
												 end if

else
											response.write "No Stu"
										end if
		   
		   
		   a=a+1
		   ors1.movenext
		   loop
		  ' response.write "<tr><td><td><td><td><input type=submit name=Submit value=͹��ѵ� onmousedown=doSubmit();/>"
		   else
		   		response.write "No register"
		end if
		
		%>
      </table>
	     </form>
      <p>&nbsp;</p>
      <p>&nbsp; </p>
    </td>
  </tr>
</table>
</body>
</html>

File Manager

Editing: homework/check_homework.asp