innews.asp

网络购物

<%
'=========================================
'
'         凡人网络购物系统V4.0免费版
'    FreeDown.Net [e-mail] 
'            www.freedown.net
'     版权所有·免费版仅供研究测试只用
'            商业使用请购买正版
'
'=========================================
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#111111">
   <tr><td align="center" height="5"></td></tr>
   <tr><td valign="top" align="center"><img border="0" src="img/promo_list_top.gif" width="100%" height="4"></td></tr>
   <tr><td valign="top" align="center" bgcolor="#DBC2B0" height="20"><b>最新新闻</b></td></tr>
   <tr><td valign="top" bgcolor="#F5EFE7">
                <%set rs3=server.createobject("adodb.recordset")               
                sql3="select top 10 * from news order by news_id DESC" 
                rs3.open sql3,conn,3,3         
                if rs3.eof then         
                    response.write "暂且没有新闻"         
                else         
                do while not rs3.eof%><img src="img/dot.gif" width="15" height="15"> <a href="news.asp?news_id=<%=rs3("news_id")%>" target="_blank"><%=rs3("news_title")%></a> 
                  <br>
                  <%rs3.movenext           
                loop         
                end if         
                rs3.close         
                set rs3=nothing         
                %>
         </td>
    </tr>
    <tr><td align="right" bgcolor="#F5EFE7" height="15"><a href="allnews.asp" target="_blank"><img src="img/pics/more.gif" width="45" height="10" border="0"></a>&nbsp;&nbsp;&nbsp; </td></tr>
</table>