<script language=javascript src=include/pic1.js></script>
<%
response.write "<table border=0 cellpadding=2 bgcolor='#FFFFFF' cellspacing=0 width=570>"
set rs=conn.execute("select * from bproduc where online=true and MidCode ='"&Midcod&"' order by ClickTimes desc")
if rs.bof and rs.eof then
response.write "<tr><td height=150 align=center>暂时没有推荐商品</td></tr>"
else
   k=1
   Do While Not rs.eof
	response.write "<tr>"
    for i=1 to 4
	k=k+1
%>
<td align='center' valign='top' class='yc' width='120'>

<table cellspacing=0 cellpadding=0 width="120">
		
          <tr> 
            <td width="32%" > 
              <%if rs("ImgPrev")="" then 
	response.write "<div align=center><a href=list.asp?id="&rs("ProdId")&" ><img src=pic/none.gif width=90 height=90 border=0></a></div>"
	else%>
              <br> <div align="center"> 
                <img width=120 height=120 border=0 src=images/small/pic_bg<%=pic_xiaogao%>.gif>
<p class="pic1"><a href='list.asp?ProdId=<%=rs("ProdId")%>'>
<img  border=0 onload='DrawImage(this)' 
alt='<%=rs("ProdName")%>' 
src='<%=rs("ImgPrev")%>'></a>
                <%end if%>
              </div></td>
          </tr>
          <tr> 
            <td valign=top align="right" > <TABLE cellSpacing=3 cellPadding=3 width="100%" 
                              border=0>
                <TBODY>
                  <TR> 
                    <TD class=product_font colSpan=2> <DIV align=center> 
                        <A 
                              href="list.asp?ProdId=<%=rs("ProdId")%>" 
                              target=_blank><%=lleft(rs("ProdName"),16)%></a>
                        <BR>
                <%=rs("PriceOrigintext")%>￥<%=formatnumber(rs("PriceOrigin"),2)%><BR>
                <SPAN class=hy_cont><%=rs("PriceListtext")%>￥<font color=#FF0000><%=formatnumber(rs("PriceList"),2)%></font></SPAN><br>
                <%=rs("zidingyi2")%>￥<%	if request.cookies("buyok")("userid")="" then 
	response.write "<font color=#FF0000>"&huiyuanjia&"</font><br>"
	else
	response.write "<font color=#FF0000>"&FormatNum(rs("PriceList")*checkuserkou()/10,2)&"</font><br>"
	end if
%>
              </DIV></TD>
                  </TR>
                </TBODY>
              </TABLE></td>
          </tr>
<tr><td align="center"><a  href=shop.asp?ProdId=<%=rs("ProdId")%> target="_blank"><img src="images/small/buy.gif" border=0  alt="我要购买该商品"></a>
<a  href=fav.asp?ProdId=<%=rs("ProdId")%> target="_blank"><img src=images/small/fav.gif  border=0  alt=收藏该商品></a>
</td></tr>

          <tr> 
            <td valign=top align="right" > <font color="#999999">&nbsp; </font></td>
          </tr>
        <%
	response.write "</table></td>"
	rs.movenext
	if k>4 then exit do

	if rs.eof then exit do
   	next
	loop
	end if

	set rs=nothing
	response.write "<table><tr><td height='5'></td></tr></table>"
%>
