zxtj.asp

在线教育

                            <td height="20" colspan="2">等级为及格的作业：</td>
                          </tr>
                          <% do while not rs3.eof %>
                          <tr>
                            <td height="20" width="5%"><img 
                  height=20 src="../images/untitled/newsall.gif" width=14></td>
                            <td height="20" width="95%"><a href="ypg_zy.asp?id=<%=rs3("id")%>">第<%=rs3("zy_cs")%>次</a> <%=rs3("zy_km")%> 提交时间:[<%=formatdatetime(rs3("zy_tjtime"),1)%>] (已批改)</td>
                          </tr>

                          <% rs3.movenext 
			   if rs3.eof then exit do
			   loop
			   %>
                          <% else %>
                          <tr>
                            <td height="20" colspan="2">暂无等级为及格的作业</td>
                          </tr>
                          <% end if %>
                          <%
			sql_tj4="select * from tjzy where zy_studentid='"&session("student_id")&"' and ifread=true and zy_grade='不及格' order by zy_km,zy_tjtime asc"
			set rs4=conn.execute(sql_tj4)
			if not rs4.eof then
			%>
                          <tr>
                            <td height="20" colspan="2">等级为不及格的作业：</td>
                          </tr>
                          <% do while not rs4.eof %>
                          <tr>
                            <td height="20" width="5%"><img 
                  height=20 src="../images/untitled/newsall.gif" width=14></td>
                            <td height="20" width="95%"><a href="ypg_zy.asp?id=<%=rs4("id")%>">第<%=rs4("zy_cs")%>次</a> <%=rs4("zy_km")%> 提交时间:[<%=formatdatetime(rs4("zy_tjtime"),1)%>] (已批改)</td>
                          </tr>
                          <% rs4.movenext 
			   if rs4.eof then exit do
			   loop
			   %>
                          <% else %>
                          <tr>
                            <td height="20" colspan="2">暂无等级为不及格的作业</td>
                          </tr>
                          <% end if %>
                          <% else %>
                          <tr>
                            <td height="20" colspan="2">暂无已批改的作业</td>
                          </tr>
                          <% end if %>
                          <tr>
                            <td height="20" colspan="2"><font color="#FF0000">尚未批改的作业</font></td>
                          </tr>
                          <%
			sql_tj5="select * from tjzy where zy_studentid='"&session("student_id")&"' and ifread=false order by zy_km,zy_tjtime asc"
			set rs5=conn.execute(sql_tj5)
			if not rs5.eof then
			%>
                          <% do while not rs5.eof %>
                          <tr>
                            <td height="20" width="5%"><img 
                  height=20 src="../images/untitled/newsall.gif" width=14></td>
                            <td height="20" width="95%"><a href="wpg_zy.asp?id=<%=rs5("id")%>">第<%=rs5("zy_cs")%>次</a> <%=rs5("zy_km")%> 提交时间:[<%=formatdatetime(rs5("zy_tjtime"),1)%>](待批改)</td>
                          </tr>
                          <% rs5.movenext 
			   if rs5.eof then exit do
			   loop
			   %>
                          <% else %>
                          <tr>
                            <td height="20" colspan="2">暂无待批改的作业</td>
                          </tr>
                          <% end if %>
                          <% else %>
                          <tr>
                            <td height="20" colspan="2">暂无提交过的作业</td>
                          </tr>
                          <% end if %>
                        </table>
                        <BR>
                          </FIELDSET></td>
                              </tr>
                            </tbody>
                        </table>
<br>
<br>


                          <table width="100%">
                            <tbody>
                              <tr>
                                <td valign=top><fieldset align=center>
                                  <legend align=top>推荐优秀作业范例<br>
                                  </legend>
                                  <%
dim i,intPage,page,pre,last,filepath
  set rs_fl = server.CreateObject("adodb.recordset")
   sql_fl="select * from tjzy where ifexample=true order by zy_km,zy_tjtime asc"
      rs_fl.PageSize = 10  '这里设定每页显示的记录数
      rs_fl.CursorLocation = 3
      rs_fl.Open sql_fl,conn,0,2,1  '这里执行你查询SQL并获得结果记录集
      pre = true
      last = true
      page = trim(Request.QueryString("page"))
      
      if len(page) = 0 then
                  intpage = 1
                  pre = false
      else
          if cint(page) =< 1 then
               intpage = 1
               pre = false
          else
              if cint(page) >= rs_fl.PageCount then
                  intpage = rs_fl.PageCount
                  last = false
              else
                   intpage = cint(page)
             end if
         end if
      end if
    if not rs_fl.eof then
         rs_fl.AbsolutePage = intpage
    end if
%>
                                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
                                    <%  
					 if not rs_fl.eof then  
   for i=1 to rs_fl.PageSize
   if rs_fl.EOF or rs_fl.BOF then exit for
       %>
                                    <tr>
                                      <td height="20" width="5%"><img 
                  height=20 src="../images/untitled/newsall.gif" width=14></td>
                                      <td height="20" width="95%"><a href="fanli.asp?id=<%=rs_fl("id")%>">第<%=rs_fl("zy_cs")%>次</a> <%=rs_fl("zy_km")%> 提交人:<%=rs_fl("zy_studentname")%> 提交时间:[<%=formatdatetime(rs_fl("zy_tjtime"),1)%>]</td>
                                    </tr>
                                    <%  
     rs_fl.movenext
    next
   %>
                                    <tr>
                                      <td height="20" colspan="2"><%if rs_fl.pagecount <= 0 then %>
                      当前页0/0
                        <% else %>
                      当前页<%=intpage%>/<%=rs_fl.PageCount%>
                      <% end if %>
                      <a href="../zuoye.asp?page=1">首页</a>|
                      <%if pre then%>
                      <a href="../zuoye.asp?page=<%=intpage -1%>">上页</a>|
                      <% end if %>
                      <%if last then%>
                      <a href="../zuoye.asp?page=<%=intpage +1%>">下页</a> |
                      <% end if %>
                      <a href="../zuoye.asp?page=<%=rs_fl.PageCount%>">尾页</a>|转到第
                      <select name="sel_page" onChange="javascript:location=this.options[this.selectedIndex].value;" class="t5">
                        <%
       for i = 1 to rs_fl.PageCount
       if i = intpage then %>
                        <option value="zuoye.asp?page=<%=i%>" selected><%=i%></option>
                        <% else %>
                        <option value="zuoye.asp?page=<%=i%>"><%=i%></option>
                        <%
          end if
        next
        %>
                      </select>
                      页</td>
                                    </tr>
                                    <% else %>
                                    <tr>
                                      <td height="20" colspan="2">暂时没有被推荐的优秀作业范例</td>
                                    </tr>
                                    <% end if %>
                                  </table>
                                  <br>
                                  <br>
                                </fieldset></td>
                              </tr>
                            </tbody>
                        </table>                              
						
                      </TD>
                    </TR>
                  </TBODY>
                </TABLE>
                <br>
            </div></td>
          </tr>
        </table>
      </td>
  </tr>
</table>
  
<table width="760" border="0" cellpadding="0" cellspacing="0" height="24" bordercolor="003366" align="center">
  <tr> 
      <td background="../images/untitled/botton-bg.gif">
      <div align="center">CopyRight @ 2005 东北师范大学网络学院</div>
    </td>
  </tr>
</table>
</body>
</html>