File Manager
Back to List
|
Up to Parent Directory
| Current Directory: ~/homework
Editing: homework/send_homework_form.asp.bak
Full path: C:\ict\ICT\homework\send_homework_form.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"--> <script language="javascript"> function doSubmit() { if( document.form1.homework_name.value == "" ) { alert("�ô��͡���������ú") document.form1.homework_name.focus() return false; } } </script> <!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="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"> <!--#include file="chk_menu.asp"--> </div></td></tr> <tr> <td align="center" valign="top"><!-- InstanceBeginEditable name="EditRegion3" --> <p>�觡�ú�ҹ</p> <form id="form1" name="form1" method="post" action="add_homework_stu.asp"> <table width="687" border="1"> <tr> <td width="113">���ʡ�ú�ҹ</td> <td width="558"> <div align="left"> <% id_work=request("id_work") %> <input type="text" size=3 readonly value=<%=id_work%> name="id_work" /> </div> </td> </tr> <tr> <td>�����Ԫ�</td> <% sql_w="select * from home_work where id_work="&id_work&"" Set ors_w = Server.CreateObject("ADODB.Recordset") ors_w.Open sql_w, Conn, 1, 3 if not ors_w.eof then %> <td> <div align="left"> <% course_no=ors_w("course_no") 'response.write course_no sql_cn="select * from course where course_no="&course_no&"" set ors_cn=server.createobject("ADODB.recordset") ors_cn.open sql_cn,conn,1,3 if not ors_cn.eof then %> <input type="text" readonly size=3 value=<%=course_no%> name="course_no" /><%=ors_cn("id_course")%> <%=ors_cn("coursename")%> </div> </td> <%end if%> </tr> <tr> <td>���͡�ú�ҹ</td> <td> <div align="left"><textarea readonly cols="50" name="work_name" ><%=ors_w("work_name")%> </textarea> </div> </td> </tr> <tr> <td>���ͧҹ�����</td> <td> <div align="left"> <textarea cols="50" name="homework_name"></textarea><input type="submit" name="Submit" value="�ѹ�֡���ͺ�����" /> </form> </div> </td> </tr> <tr> <td><p>�ѹ�����</p> </td> <td><div align="left"> <%tnow=Now Response.write (tnow)%> </div></td> </tr> <tr> <td>�����</td> <td><div align="left"> <% response.write session("username") username_stu=session("username") %> </div></td> </tr> <% 'sql_data="select * from send_homework where username_stu='"&username_stu&"' and id_work='"&id_work&"'" ' set ors_data=server.createobject("adodb.recordset") ' ors_data.open sql_data,conn,1,3 ' if not ors_data.eof then%> <SCRIPT LANGUAGE="JavaScript"> <% 'response.write "���ʫ��"&username_stu ' response.write"alert('���觡�ú�ҹ����� ');" ' response.write "window.location.href='work_course.asp?course_no="&course_no&"';" %> --> </SCRIPT> <% 'else 'sqldata="insert into send_homework_temp(id_work,username_stu) values('"&id_work&"','"&username_stu&"')" ' set orsdata = Server.CreateObject("adodb.recordset") 'orsdata.open sqldata,conn,1,3 'session("id_work")=id_work 'session("course_no")=course_no 'end if %> <%end if%> </table> <p> </p> <!-- InstanceEndEditable --></td> </tr> </table> </body> <!-- InstanceEnd --></html>