newxsfk.asp

ASP学生网上评教系统

<!--#include file="a25175bbs_conn.asp"-->
<!--#include file="Function.asp"-->
<style type="text/css">
<!--
.STYLE1 {
	font-size: 12px;
	text-decoration: none;
	color: #333333;
}
-->
</style>


<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
   <td rowspan="6"><span class="STYLE1">
      <% strsql="select top 6 * from topics where jd_view=1 order by jd_rdate desc"
		  set rs1=db.execute(strsql)
		  %>
     </span>
   <table width="100%" border="0" cellpadding="3" cellspacing="0" >
     <% do while NOt rs1.eof %>
     <tr>
       <td width="30" align="right" class="STYLE1"><% response.write "<img src="&"images/cqball.gif"&">" %>       </td>
       <td class="STYLE1">
       
       <a href="bbsindex.asp?action=View_topics&id=<%=rs("id")%>" target="_blank">
          <%
		   judge=rs1("jd_title")
		   judge=judgeok(judge,14)
		   response.Write judge
		  %>
       </a>
	   <% response.write "<img src="&"images/new.gif"&"  height='12'>" %>
       </td>
     </tr>
     <% rs1.movenext
		 Loop
		 %>
   </table>  
    </td>
  </tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="30" class="STYLE1">&nbsp;&nbsp;&nbsp;&nbsp;<a href="xsfk.asp" target="_blank">更多&gt;&gt;</a></td>
  </tr>
</table>