横向显示循环数据(二)

<!--#include file="include/buyok_shop_30_conn.asp"-->
 
 <%
 
 Set rsArticle= Server.CreateObject("ADODB.Recordset")
 

 rsArticle.Open "select 
  * from buyok_produc where online=true order by AddDate desc",conn,3
 
 %>
 
 <%
 
 if not rsArticle.eof then
 
  
 rsArticle.movefirst
 
 %>
 
 <table width="170" 
  border="1" cellpadding="1" cellspacing="0" bordercolordark="#FFFFFF" bordercolorlight="#cccccc" align=center frame=void>
 

 <%
 
  
  
  
  
  do while not rsArticle.eof
 
 %>
 
  
  
  
  <tr >
 
 <%
 
  
  
  
  
  
  
  for i=1 to 3
 
  
  
  
  
  
  
  
  
  
  
  if not rsArticle.eof then
 
 %>
 
  
  <td>
 
  
  
  
  
  
  <table width="170" 
  border="0" cellpadding="0" cellspacing="0" align=center>
 
  
  
  
  
  
  
  
  
  
  
  
  <tr >
 
  
  
  
  
  
  
  
  
  
  
  
  
  
  <td align="center" valign="middle" height=105 colspan=2><a href="<%=rsArticle("DefaultPicUrl")%>" target=_blank><img border=0 src="<%=rsArticle("DefaultPicUrl")%>" 
  width=100 height=100></a></td>
 
  
  
  
  
  
  
  
  
  
  
  
  </tr>
 
  
  
  
  
  
  <tr>
 
  
  
  
  
  
  
  
  
  
  
  
  
  
  <td align="center" valign="middle" height=15>产品名称：</td>
 
  
  
  
  
  
  
  
  
  
  
  
  
  
  <td valign="middle" height=15><a href="ArticleShow.asp?ArticleID=<%=rsArticle("articleid")%>" target=_blank><%=rsArticle("Title")%></a></td>
 
  
  
  
  
  
  
  
  
  
  
  
  </tr>
 
  
  
  
  
  
  <tr >
 
  
  
  
  
  
  
  
  
  
  
  
  
  <td align="center" valign="middle" height=15>产品类别：</td>
 
  
  
  
  
  
  
  
  
  
  
  
  
  <td valign="middle"><a href="Product.asp?BigClassName=<%=rsArticle("BigClassName")%>" target=_blank><%=rsArticle("BigClassName")%></a></td>
 
  
  
  
  
  
  
  
  
  
  
  
  </tr>
 
  
  
  
  
  
  <tr >
 
  
  
  
  
  
  
  
  
  
  
  
  
  <td align="center" valign="middle" height=15>产品编号：</td>
 
  
  
  
  
  
  
  
  
  
  
  
  
  <td valign="middle"><%=rsArticle("Product_Id")%></td>
 
  
  
  
  
  
  
  
  
  
  
  
  </tr>
 
  
  
  
  
  
  <tr >
 
  
  
  
  
  
  
  
  
  
  
  
  
  
  <td align="center" valign="middle" height=15 colspan=2><a href="ArticleShow.asp?ArticleID=<%=rsArticle("articleid")%>" target="_blank"><img src="Img/arrow_7.gif" border=0></a> <a href="javascript:eshop(<%=rsArticle("Product_Id")%>)"><img src="img/arrow_8.gif" border=0></a></td>
 
  
  
  
  
  
  
  
  
  
  
  
  </tr>
 
  
  
  
  
  
  
  
  
  </table>
 
  
  </td>
 
 <% 
 
  
  
  
  
  
  
  
  
  
  
  else
 
 %>
 
  
  
  
  
  <td>
 
  
  
  
  
  
  
  
  <table width="170" 
  border="0" cellpadding="0" cellspacing="0">
 
  
  
  
  
  
  
  
  
  <tr>
 
  
  
  
  
  
  
  
  
  
  <TD align=center height=28 valign=middle><font color=red>无新产品</font></td>
 
  
  
  
  
  
  
  
  
  </tr>
 
  
  
  
  
  
  
  </Table>
 
  
  
  
  
  </td>
 
 <%
 
  
  
  
  
  
  
  
  
  
  
  end if
 
  
  
  
  
  
  
  
  
  rsArticle.movenext
 
  
  
  
  
  
  
  next
 
 %>
 
  
  
  
  </tr>
 
 <% 
 
  
  
  
 
  
  loop
 
 %>
 
  
  
  
  <tr>
 
  
  
  
  
  <td align=right colspan=3><a href="cpjjindex.asp" target="_blank"><font color=#00FF00>更多产品</font> <img src="/shop/Img/MORE2.gif" border="0"></a>  </td>
 
  
 <tr>
 
 </table>
 
 <%
 
 else
 
 %>
 
  
  
  <table width="100%" 
  border="0" cellpadding="0" cellspacing="0">
 
  
  
  
  <tr>
 
  
  
  
  
  <TD align=center height=28 valign=middle><font color=red>无产品1</font></td>
 
  
  
  
  </tr>
 
  
  
  </Table>
 
 <%
 
 end if
 
 rsArticle.close
 
 rs.close
 
 %>