 <TABLE cellSpacing=0 cellPadding=0 WIDTH=98% align=center border=0 bgcolor=<% = bgclr2 %>>
           <TBODY>
	    <TR>  
<%  
     
	 set rs=server.CreateObject("adodb.recordset")
	rs.open "select top "&indexnew&" * from  product where recommend=1   and proup=0 order by ordernum desc",conn,1,1 
	if rs.eof And rs.bof then
       	Response.Write "<p align='center' class='contents'> 对不起，此分类暂时还没有商品！</p>"
   	else
i=1
do while not rs.eof
%>
     <TD width=20% border="0" align=center >
         <!--#include file="price1.asp"-->
  </TD>  
  <% 
    if (i mod 5)=0 then response.write "</tr>" '五列显示mod 5 
       i=i+1
     if i>=indexnew then Exit Do
     rs.movenext
	loop
  %> 
</tr> 

  <%     
     end if
     indexnew=""
    rs.close
  set rs=nothing
   %>
            
  </TABLE>      
