info_newly.asp

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

<!--首页的特价商品-->
<table width="590" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr> 
    <td width="55" height="34"><img src="image/xinpin.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 "&xinpin&"  * from wq_books where newsbook=1 order by bookid desc",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" align="center" valign="top"> <table width="196" height="115" border="0" cellpadding="0" cellspacing="0" class="main">
        <tr> 
          <td width="50%"><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=85 height=75 border=0 align=absmiddle></a> 
                    <%end if%>
                </TD>
              </TR>
            </TBODY>
          </TABLE> </td>
          <td valign=middle width="50%"><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;市场价：<%=trim(rs("shichangjia"))%>元<br> &nbsp;会员价：<%=trim(rs("huiyuanjia"))%>元
          <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></td>
    <%if i mod 3 = 0 then%>
  </tr>
  <%end if
	    rs.movenext
         i=i+1
    	 loop
		rs.close
		end if
		end if 
	%>
</table>