b2b_indexzhnews.asp

信运网店系统是一套功能完善、简洁美观

<TABLE align="center" cellSpacing=0 cellPadding=0 width=180 border=0>
  <TBODY>
    <TR> 
      <TD vAlign=top>
	           <TABLE height=20 cellSpacing=0 cellPadding=0 width=180 border=0>
          <TBODY>
            <TR> 
			  <td width="120" align="center">&nbsp;</td>
			  <td align="right"><a href="chknews.asp">更多新闻</a>&nbsp;</td>
            </TR>
			<tr><td colspan="2" background=images/bg_04.gif border=0></td></tr>
          </TBODY>
	    </TABLE>
		
        <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
          <TBODY>
		  <% 
		   i=0
		  rs.open "select top 6 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>