File Manager
Back to List
|
Up to Parent Directory
| Current Directory: ~/homework
Editing: homework/index_stu.asp.bak
Full path: C:\ict\ICT\homework\index_stu.asp.bak
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<!--#INCLUDE FILE="connectdb.asp"--> <!--#include file="inc_cache_control.asp"--> <!--#include file="inc_access_control.asp"--> <!--#include file="chk_login.asp"--> <!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"><!-- InstanceBegin template="/Templates/homework.dwt" codeOutsideHTMLIsLocked="false" --> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-874" /> <!-- InstanceBeginEditable name="doctitle" --> <title>�������ҡ���Ե ʶҺѹ�Ԩ�¾ĵԡ�����ʵ��</title> <!-- InstanceEndEditable --> <style type="text/css"> <!-- body,td,th { font-family: Microsoft Sans Serif, MS Sans Serif, sans-serif; } body { background-color: #FFCCFF; } --> </style> <!-- InstanceBeginEditable name="head" --><!-- InstanceEndEditable --> </head> <body> <table width="800" 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"> <!--#include file="chk_menu.asp"--> </div></td></tr> <tr> <td align="center" valign="top"><!-- InstanceBeginEditable name="EditRegion3" --> <p>���ʴ� ���Ե <% username_stu=session("id_stu1") semeter=session("semeter") txtyear=session("txtyear") sql = "select * from student where username_stu = '" & username_stu & "'" Set ors = Server.CreateObject("ADODB.Recordset") ors.Open sql, Conn, 1, 3 if not ors.eof then response.Write ors("name_stu")&" "&ors("surname_stu") 'id_lec=ors("id_lec") 'session("id_lec")=id_lec end if %> </p> <p>����Ԫҷ�����¹��Ҥ���¹���</p> <% response.write semeter&"/"&txtyear response.write "<br>" response.write "<table bgcolor=#FF99FF><tr bgcolor=#f5f7f9><td>�����Ԫ�<td>�����Ԫ�<td>����<td>��ú�ҹ" sql_c = "select * from register where id_stu = '" & username_stu & "' " Set ors_c = Server.CreateObject("ADODB.Recordset") ors_c.Open sql_c, Conn, 1, 3 'response.write sql_c if not ors_c.eof then ors_c.movefirst do while not ors_c.eof response.write "<tr><td>" sql_c1 = "select * from course where course_no = " & ors_c("course_no") & " and year_t='"&txtyear&"' and semeter='"&semeter&"'" Set ors_c1 = Server.CreateObject("ADODB.Recordset") ors_c1.Open sql_c1, Conn, 1, 3 if not ors_c1.eof then response.Write ors_c1("id_course")&"<td>"&ors_c1("coursename")&"<td>"&ors_c1("id_lecturer") %> <td>[<a href=work_course.asp?course_no=<%=ors_c1("course_no")%> >��ú�ҹ</a>] <% end if ors_c.movenext loop end if ' %> </p> <!-- InstanceEndEditable --></td> </tr> </table> </body> <!-- InstanceEnd --></html>