📄 zytj.asp
字号:
</table>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="003366" bgcolor="#EAF2ED">
<tr>
<td valign="top">
<table width="100%" height="438" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="438" align="center" valign="top" ><div align="left" class="bg"> <br>
<TABLE width="85%" border=0 align="center">
<TBODY>
<TR>
<TD height=5 vAlign=top><TABLE width="100%">
<TBODY>
<TR>
<TD vAlign=top><FIELDSET align=center>
<LEGEND align=top>最新作业<br>
</LEGEND>
<table width="100%" border="0" cellspacing="0" cellpadding="0"><tr><td height="20" width="22%"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="20" width="4%"><img
height=20 src="images/file.gif" width=19></td>
<td height="20" width="96%"><a href="tijiao.asp?id=<%=(Recordset1.Fields.Item("id").Value)%>">第<%=(Recordset1.Fields.Item("zy_cs").Value)%>次</a> <%=(Recordset1.Fields.Item("zy_title").Value)%>发布时间:[<%=(Recordset1.Fields.Item("zy_fbtime").Value)%>]<img border="0" src="images/untitled/new.gif" width="27" height="10">(期限:<%=(Recordset1.Fields.Item("zy_xztime").Value)%>)</td>
</tr>
<tr>
<td height="20" colspan="2"><% If Recordset1.EOF And Recordset1.BOF Then %>
暂时没有需要提交的作业
<% End If ' end Recordset1.EOF And Recordset1.BOF %></td>
</tr>
</table></td>
</tr>
</table>
</FIELDSET></TD>
</TR>
</TBODY>
</TABLE>
<br><table width="100%">
<tbody>
<tr>
<td valign=top> <FIELDSET align=center>
<LEGEND align=left>
已提交过的作业<br>
</LEGEND>
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="20">
<tr>
<td height="20"><font color="#FF0000">已批改的作业</font></td>
</tr>
<% If Not Recordset2.EOF Or Not Recordset2.BOF Then %>
<% If Not Recordset2.EOF Or Not Recordset2.BOF Then %>
<tr>
<td width="95%">等级为优秀的作业:<br> <img
height=20 src="images/file.gif" width=19><a href="ypg_zy.asp?id=<%=(Recordset2.Fields.Item("id").Value)%>">第<%=(Recordset2.Fields.Item("zy_cs").Value)%>次</a> 提交时间:[<%=(Recordset2.Fields.Item("zy_tjtime").Value)%>] (已批改)</td>
</tr>
<% End If ' end Not Recordset2.EOF Or NOT Recordset2.BOF %>
<% End If ' end Not Recordset2.EOF Or NOT Recordset2.BOF %>
<% If Not Recordset3.EOF Or Not Recordset3.BOF Then %>
<tr>
<td width="95%">等级为良好的作业:<br>
<img
height=20 src="images/file.gif" width=19><a href="ypg_zy.asp?id=<%=(Recordset3.Fields.Item("id").Value)%>">第<%=(Recordset3.Fields.Item("zy_cs").Value)%>次</a> 提交时间:[<%=(Recordset3.Fields.Item("zy_tjtime").Value)%>] (已批改)</td>
</tr>
<% End If ' end Not Recordset3.EOF Or NOT Recordset3.BOF %>
<% If Not Recordset4.EOF Or Not Recordset4.BOF Then %>
<tr>
<td>等级为及格的作业:<br>
<img
height=20 src="images/file.gif" width=19><a href="ypg_zy.asp?id=<%=(Recordset4.Fields.Item("id").Value)%>">第<%=(Recordset4.Fields.Item("zy_cs").Value)%>次</a> 提交时间:[<%=(Recordset4.Fields.Item("zy_tjtime").Value)%>] (已批改)</td>
</tr>
<% End If ' end Not Recordset4.EOF Or NOT Recordset4.BOF %>
<% If Not Recordset5.EOF Or Not Recordset5.BOF Then %>
<tr>
<td width="95%">等级为不及格的作业:<br>
<img
height=20 src="images/file.gif" width=19><a href="ypg_zy.asp?id=<%=(Recordset5.Fields.Item("id").Value)%>">第<%=(Recordset5.Fields.Item("zy_cs").Value)%>次</a> 提交时间:[<%=(Recordset5.Fields.Item("zy_tjtime").Value)%>] (已批改)</td>
</tr>
<% End If ' end Not Recordset5.EOF Or NOT Recordset5.BOF %>
<tr>
<td height="20"><% If Recordset6.EOF And Recordset6.BOF Then %>
暂无已批改的作业
<% End If ' end Recordset6.EOF And Recordset6.BOF %>
</td>
</tr>
<% If Not Recordset7.EOF Or Not Recordset7.BOF Then %>
<tr>
<td width="95%"><font color="#FF0000">尚未批改的作业<br>
</font><img
height=20 src="images/file.gif" width=19><a href="wpg_zy.asp?id=<%=(Recordset7.Fields.Item("id").Value)%>">第<%=(Recordset7.Fields.Item("zy_cs").Value)%>次</a> 提交时间:[<%=(Recordset7.Fields.Item("zy_tjtime").Value)%>](待批改)</td>
</tr>
<% End If ' end Not Recordset7.EOF Or NOT Recordset7.BOF %>
<tr>
<td height="20"><% If Recordset7.EOF And Recordset7.BOF Then %>
暂无待批改的作业
<% End If ' end Recordset7.EOF And Recordset7.BOF %>
</td>
</tr>
<tr>
<td height="20"> </td>
</tr>
</table>
</FIELDSET></td>
</tr>
</tbody>
</table>
<br>
<table width="100%">
<tbody>
<tr>
<td valign=top><fieldset align=center>
<legend align=top>推荐优秀作业范例<br>
</legend>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<%
While ((Repeat1__numRows <> 0) AND (NOT Recordset8.EOF))
%>
<tr>
<td height="20" width="5%"><img
height=20 src="images/file.gif" width=19></td>
<td height="20" width="95%"><a href="fanli.asp?id=<%=(Recordset8.Fields.Item("id").Value)%>">第<%=(Recordset8.Fields.Item("zy_cs").Value)%>次</a> 提交人:<%=(Recordset8.Fields.Item("zy_studentname").Value)%> 提交时间:[<%=(Recordset8.Fields.Item("zy_tjtime").Value)%>]</td>
</tr>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
Recordset8.MoveNext()
Wend
%>
<tr>
<td height="20" colspan="2"> </td>
</tr>
<tr>
<td height="20" colspan="2"><% If Recordset8.EOF And Recordset8.BOF Then %>
暂时没有被推荐的优秀作业范例
<% End If ' end Recordset8.EOF And Recordset8.BOF %></td>
</tr>
</table>
</fieldset></td>
</tr>
</tbody>
</table> </TD>
</TR>
</TBODY>
</TABLE>
<br>
</div></td>
</tr>
</table> </td>
</tr>
<tr>
<td valign="top"><table width="760" border="0" cellpadding="0" cellspacing="0" height="24" bordercolor="003366" align="center">
<tr>
<td><div align="center">CopyRight @ 2008</div></td>
</tr>
</table></td>
</tr>
</table>
</body>
</html>
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>
<%
Recordset2.Close()
Set Recordset2 = Nothing
%>
<%
Recordset3.Close()
Set Recordset3 = Nothing
%>
<%
Recordset4.Close()
Set Recordset4 = Nothing
%>
<%
Recordset5.Close()
Set Recordset5 = Nothing
%>
<%
Recordset6.Close()
Set Recordset6 = Nothing
%>
<%
Recordset7.Close()
Set Recordset7 = Nothing
%>
<%
Recordset8.Close()
Set Recordset8 = Nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -