topnews.asp

来自「不错的ASP整站源代码。在IIS环境下运行都没有问题」· ASP 代码 · 共 34 行

<%
  sqlstr="select top 5 * from ys_news where version='"&current_ver&"' and typeid=21 order by id desc"
  myrs.open sqlstr,conn
%>
<%if not myrs.eof then%>
<table width="100%" border="0" cellspacing="3" cellpadding="0">
  <tr> 
    <td width="95%"> <%do while not myrs.eof
		    if len(myrs("title"))>22 then 
			  titlestr=left(myrs("title"),18)+"..."
			 else 
			 titlestr=myrs("title")
		    end if 
		   %> <span style="font-size:9px;color:#ff0000;">◆</span> <a href="../news/news_detail.asp?id=<%=myrs("id")%>"><%=titlestr%></a>.......</td>
    <td width="5%" nowrap><%=myrs("newsdate")%></td>
  </tr>
  <tr> 
    <td> <% 
	  myrs.movenext
	  loop
	  %> </td>
    <td>&nbsp;</td>
  </tr>
</table>
 <%else%> 
<table width="270" border="0" cellspacing="3" cellpadding="0">
  <tr> 
    <td width="373"> <p> 暂时没有新闻！ </p></td>
  </tr>
</table> 
 <% 
  end if
  myrs.close
  %>