b2b_indexzhnews.asp

来自「小型网上购物网站」· ASP 代码 · 共 35 行

<TABLE align="center" cellSpacing=0 cellPadding=0 width=95% border=0>
  <TBODY>
    <TR> 
      <TD width="100%" vAlign=top><TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
          <TBODY>
		  <% 
		   i=0
		  rs.open "select top 5 newsname,adddate,newsid from news order by adddate desc",conn,1,1
		if rs.eof and rs.bof then
		   rs.close
		  response.write "<center>目前还没有新闻！</center>"
		  else
		  do while not rs.eof
		  i=i+1
		  %>
            <TR> 
              <TD vAlign=center height=20><IMG height=9 src="image/pic1.gif" 
                  width=7 align=absMiddle border=0>
				 <a href="news.asp?id=<% = rs("newsid") %>" target="_blank">
			    <% = rs("newsname") %></a>
			  </TD>
            </TR>
			<tr><td background=images/bg_04.gif border=0></td></tr>
			<%  if i>=6 then exit do
		  rs.movenext
		  loop
		  end if
		  rs.close
		%>
          </TBODY>
      </TABLE></TD>
    </TR>
  </TBODY>
</TABLE>