<% Set Rs=Server.CreateObject("ADODB.Recordset") Sql="Select * From xiaoyuer_products where newpro=1 order by sort desc,id desc" Rs.Open Sql,Conn,1,1 if rs.eof and rs.bof then response.write "" else %> <% cols=product_hang do while not rs.eof if a mod cols=0 then response.Write("") a=a+1 %> <% if a=product_hots then exit do rs.movenext loop %> <% end if rs.close set rs=nothing %>

没有数据

" target="_blank" > src="<%=get_pic(rs("pic"),3)%>" <% else %> src="<%=get_pic(rs("pic"),1)%>" width="<%=pic_width%>" height="<%=pic_height%>" <% end if %> alt="<%=rs("cpmc")%>" border="0" /> " title="<%=rs("cpmc")%>" target="_blank"><%=rs("cpmc")%>