shopxp_xp.asp

IMPORTANT YOU SHOUD LOAD IT DOWN FOR USING

<style type="text/css">
<!--
.style4 {color: #FF0000}
-->
</style>
<table width="99%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="10" valign="top"></td>
  </tr>
  <tr>   

    <TD align=middle>
	<marquee scrolldelay=150 direction=left behavior=alternate width=100% align="middle" onmouseover="this.stop();" onmouseout="this.start();">

<table width="100%" height="50"  border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
              <tr>
                <%set rs=server.CreateObject("adodb.recordset")
		  rs.open "select Top "&zuixin&" * from shopxp_product where shopxp_new_pt=1 order by shopxpptid desc",conn,1,1
	  if rs.eof and rs.bof then
		  response.write "对不起，请您先到后台添加商品！"
	  else
	  do while not rs.eof
		  %>
                <td><table width="110" height="130"  border="0" align="center" cellpadding="0" cellspacing="0">
                  <tr>
                    <td width="110" height="95"><div align="center">
                        <table width="90" height="90" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#e1e1e1">
                          <tbody>
                            <tr>
                              <td width="90" height="90" bgcolor="#ffffff" align="center"><a href="productshopxp.asp?id=<%=rs("shopxpptid")%>" target="_blank"><img src="<%=trim(rs("upfilepic"))%>" alt="<%=rs("shopxpptname")%>"  width="<% = xtk %>"  height="<% = xtg %>" border="0" /></a></td>
                            </tr>
                          </tbody>
                        </table>
                    </div></td>
                  </tr>
                  <tr>
                    <td height="23" valign="middle"><div align="center"><a href="productshopxp.asp?id=<%=rs("shopxpptid")%>" target="_blank"><font color="#FF0000"><%=trim(rs("shopxpptname"))%></font></a></div></td>
                  </tr>
                  <tr>
                    <td height="13" valign="bottom"><table width="98%"  border="0" cellspacing="0" cellpadding="0">
                        <tr>
                          <td height="37"><div align="center"> <font color="#999999"><s>市场价：<%=trim(rs("shichangjia"))%> 元</s></font><br />
                                  <span class="style4">会员价：<%=trim(rs("shopxphyjia"))%> 元</span> </div></td>
                        </tr>
                    </table></td>
                  </tr>
                </table></td>
                <%
			  rs.movenext
			  loop
			   end if
			  rs.close
			  set rs=nothing%>
              </tr>
      </table>
			
	  </marquee>
	</td>
 
  </tr>
</table>