info_wyou.asp

漂亮公司企业网站自助建站系统 .asp.rar

<!--首页的特价商品-->
<table width="584"  border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="178"><img src="image/reping.gif" width="590"></td>
  </tr>
</table>
<table width="590" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr> 
    <%set rs=server.CreateObject("adodb.recordset")
		  rs.open "select Top "&reping&"  * from wq_books where pingjizong>0 order by pingji desc,adddate",conn,1,1
		  if rs.eof and rs.bof then
		  response.write "<td  align=center><font color=red size=2>对不起，暂无新品！</font></td>"
		  'response.End
		  else
		  %>
    <%
		if not rs.eof then
		i=1
		do while not rs.eof%>
    <td width="195" height="111" align="center" valign="top"><table width="196" height="115" border="0" align="center" cellpadding="0" cellspacing="0" class="main">
        <tr> 
          <td width="45%"> <TABLE width=98 height=100 border=0 align="center" cellPadding=2 cellSpacing=1 bgColor=#e1e1e1 onmouseover="this.style.backgroundColor='#FF6600'" onmouseout="this.style.backgroundColor=''">
            <TBODY>
              <TR>
                <TD width=92 height=100 bgColor=#ffffff align=center>
                  <%if rs("bookpic")="" then 
	response.write "<div align=center><a href=list.asp?id="&rs("bookid")&" > <img src=images/emptybook.gif width=90 height=90 border=0></a></div>"
	else%>
                  <a href=list.asp?id=<%=rs("bookid")%> target="_blank"> <img src="<%=trim(rs("bookpic"))%>" width=75 height=75 border=0 align=absmiddle></a>
                  <%end if%>
                </TD>
              </TR>
            </TBODY>
          </TABLE></td>
          <td valign=middle width="55%"><a href=list.asp?id=<%=rs("bookid")%> target="_blank">
             <font color="#FF0000">&nbsp;
             <%if len(trim(rs("bookname")))>6 then
					response.write left(trim(rs("bookname")),6)&"."
					else
					response.write trim(rs("bookname"))
					end if
				%>
          </a> </font>
		   <br> 
              &nbsp;&nbsp;评论人数：<%=rs("pingji")%><br> 
              &nbsp;&nbsp;会员价：<%=trim(rs("huiyuanjia"))%>元<br> 
                    
            <table width="100%" cellpadding=0 cellspacing=0>
              <tbody>
                <tr> 
                  <td width="116"><div align="center"><a href="gouwu.asp?id=<%=rs("bookid")%>&action=add" target="_blank" ><img src="images/dg.gif" width="45" height="20" border=0></a><a href="shoucang.asp?id=<%=rs("bookid")%>&action=add" target="_blank">&nbsp<img src="images/sc.gif" width="45" height="20" border=0></a></div></td>
                </tr>
              </tbody>
          </table></td>
        </tr>
    </table>
    <div align="center"></div></td>
    <%if i mod 3 = 0 then%>
  </tr>
  <%end if
	    rs.movenext
         i=i+1
    	 loop
		rs.close
		end if
		end if 
	%>
</table>