index.asp

asp网站 挺不错的 试一下吧 网上购物系统 呵呵呵

	<td valign="bottom" width="261" align="center" background="Img/index_h10.gif"><img border="0" src="Img/index_h11.gif" width="261" height="12"></td></tr></table>
<!-- 热销排行 END-->
<!-- 推荐商品 -->
<table border="0" cellpadding="0" cellspacing="0" width="790" height="100">
	<tr><td height="2" colspan="3"></td></tr>
	<tr><td height="20" class="nb" width="20"></td><td height="20" bgcolor="#FFFFFF" width="2"></td>
		<td class="tb" height="20" width="768">&nbsp;推荐商品&nbsp; <a target="_blank" href="hot.asp?stype=tjindex">MORE&gt;&gt;</a></td></tr>
	<tr><td colspan="3" class="lrb"><table border="0" cellpadding="0" cellspacing="0" width="100%"><tr>
<%if tjindex="" then tjindex=10
set rs=server.createobject("adodb.recordset")
rs.open "select top "&tjindex&" * from venshop_hw where tjindex=1 and hw_kucun>0 order by hw_id DESC",conn,1,1
i=0
do while not rs.eof
i=i+1
if i>=6 then i=1%><td height="135" align="center" width="20%">
<table border="0" width="100%" id="table1" cellspacing="0" cellpadding="3">
  <tr><td align="center" height="120"><a <%if photoh=1 then%>class=photo<%end if%> target="_blank" href="views.asp?hw_id=<%=rs("hw_id")%>">
	<img border="0" src="<%pic=split(rs("hw_pic"),"*")%><%=pic(1)%>" onerror="this.src='img/noimage.jpg'" height="<%=heightt%>"></a></td></tr>
  <tr><td align="center" height="20"><a target="_blank" href="views.asp?hw_id=<%=rs("hw_id")%>"><%=rs("hw_name")%></a></td></tr>
  <tr><td height="20" align="center"><font color="#FF0000">￥<%=rs("hw_price1")%>元</font></td></tr></table>
</td><%if i=5 then%></tr><tr><%end if%>
<%rs.movenext
loop
rs.close
set rs=nothing%></tr></table></td></tr>
</table>
<!-- 推荐商品 END-->
<!-- 最新商品与新闻 -->
<table border="0" cellpadding="0" cellspacing="0" width="790" height="130">
<tr><td colspan="2" height="5"></td></tr>
<tr><td width="375" valign="top"><%set rs=server.createobject("adodb.recordset")
sql="select top 1 * from venshop_logo where sort=0 and nsort=0"
rs.open sql,conn,1,1
if right(rs("banner"),3)="swf" then%>
<object classid="clsid:D27CDB6E-AE6D-11CF-96B8-444553540000" id="obj1" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,40,0" border="0" width="375" height="190">
	<param name="movie" value="<%=rs("banner")%>">
	<param name="quality" value="High">
<embed src="<%=rs("banner")%>" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" name="obj1" width="375" quality="High" height="190"></object>
<%else%>
<a href="<%=rs("url")%>"target="_blank">
	<img src="<%=rs("banner")%>" width="375" height="190" border="0"></a><%end if
rs.close
set rs=nothing%></td><td valign="top" align="right">
<table border="0" cellpadding="0" cellspacing="0" id="table2" style="border: 1px solid #F2F2F2">
<tr><td width="195" valign="top"><p style="line-height: 150%; margin: 5px; ">
	<img border="0" src="Skin/<%=venshop_skin%>/index_l4.gif" align="middle"><b><font color="#F96D06"> 最新商品&gt;&gt;</font></b><p class="pnew"><script language="JavaScript" src="new.asp?pagec=6"></script></td>
<td background="img/book.gif" width="18"></td>
<td width="195" valign="top"><p style="line-height: 150%; margin: 5px; ">
<img border="0" src="Skin/<%=venshop_skin%>/index_l4.gif" align="middle"><b><font color="#F96D06"> 新闻资讯&gt;&gt;</font></b><p class="pnew">
<%set rs=server.createobject("adodb.recordset")
rs.open "select top 8 * from venshop_article order by id DESC",conn,1,1
i=0
do while not rs.eof
i=i+1%>
<%=i%>.<a href="article.asp?a_id=<%=rs("id")%>" target=_blank><%=left(rs("a_name"),16)%></a><br>
<%rs.movenext
loop
rs.close
set rs=nothing%>
</td></tr></table>
</td></tr></table>
<!-- 最新商品与新闻 END-->
<script language="javascript" src="inven.asp?ven_id=3"></script>
<!-- 热销排行 -->
<table border="0" cellpadding="0" cellspacing="0" width="790">
	<tr><td colspan="2" height="3"></td></tr>
	<tr><td align="right" class="ileft" width="35">
		<img border="0" src="Skin/<%=venshop_skin%>/index_h4.gif"></td>
	<td  class="iright" align="center">
<DIV id=demo style="OVERFLOW: hidden; WIDTH: 745px; COLOR: #FFFFFF; height:113px" align=center> 
<TABLE cellPadding=0 border=0 cellspace="0" width="630" cellspacing="0"><TR><TD id=demo1 vAlign=top align="center"> 
<table border="0" cellspacing="0" cellpadding="0" width="100%">
<%if gun="" then gun=10
set rs=server.createobject("adodb.recordset")
rs.open "select top "&gun&" * from venshop_hw where hw_kucun>0 order by hw_buys DESC,hw_id DESC",conn,1,1%>
<%do while not rs.eof%>
<td align="center">
<table border="0" width="150" id="table1" cellspacing="0" cellpadding="0">
  <tr><td align="center" height="120"><a <%if photoh=1 then%>class=photo<%end if%> target="_blank" href="views.asp?hw_id=<%=rs("hw_id")%>"><img border="0" src="<%pic=split(rs("hw_pic"),"*")%><%=pic(1)%>" onerror="this.src='img/noimage.jpg'" height="<%=heightt%>"></a></td></tr>
  <tr><td align="center" height="20"><a target="_blank" href="views.asp?hw_id=<%=rs("hw_id")%>"><%=rs("hw_name")%></a></td></tr>
  </table>
</td>
<td width="13" background="img/bian1.gif">
<img border="0" src="img/bian1.gif" width="13" height="9"></td>
<%rs.movenext
loop
rs.close
set rs=nothing%>
</tr></table></TD>
<TD id=demo2 vAlign=top align=center></TD><TD id=demo3 vAlign=top align=center></TD><TD id=demo4 vAlign=top align=center></TD><TD id=demo5 vAlign=top align=center></TD><TD id=demo6 vAlign=top align=center></TD><TD id=demo7 vAlign=top align=center></TD></TR></TABLE></DIV>
<script language="javascript" src="inc/gun.js"></script></td>
</tr>
</table>
<!-- 热销排行 END-->
<script language="javascript" src="inven.asp?ven_id=4"></script>
<!-- 特价商品 -->
<table border="0" cellpadding="0" cellspacing="0" width="790" height="100" id="table14">
<tr><td height="2" colspan="3"></td></tr>
<tr><td height="20" class="nb" width="20"></td><td height="20" bgcolor="#FFFFFF" width="2"></td>
<td class="tb" height="20" width="768">&nbsp;特价商品&nbsp; <a target="_blank" href="hot.asp?stype=tejia">MORE&gt;&gt;</a></td></tr>
<tr><td colspan="3" class="lrb">
<table border="0" cellpadding="0" cellspacing="0" width="100%" id="table15"><tr>
<%if tejia="" then tejia=10
set rs=server.createobject("adodb.recordset")
rs.open "select top "&tejia&" * from venshop_hw where tejia=1 and hw_kucun>0 order by hw_id DESC",conn,1,1
i=0
do while not rs.eof
i=i+1
if i>=6 then i=1%><td height="135" align="center" width="20%">
<table border="0" width="100%" id="table16" cellspacing="0" cellpadding="3">
  <tr><td align="center" height="120"><a <%if photoh=1 then%>class=photo<%end if%> target="_blank" href="views.asp?hw_id=<%=rs("hw_id")%>"><img border="0" src="<%pic=split(rs("hw_pic"),"*")%><%=pic(1)%>" onerror="this.src='img/noimage.jpg'" height="<%=heightt%>"></a></td></tr>
  <tr><td align="center" height="20"><a target="_blank" href="views.asp?hw_id=<%=rs("hw_id")%>"><%=rs("hw_name")%></a></td></tr>
  <tr><td height="20" align="center"><font color="#FF0000">狂降<strike>￥<%=rs("hw_price1")-rs("hw_price2")%>元</strike></font></td></tr></table>
</td><%if i=5 then%></tr><tr><%end if%>
<%rs.movenext
loop
rs.close
set rs=nothing%></tr></table></td></tr></table>
<!-- 特价商品 END-->
<!-- 在新支付 -->
<div align="left">
<table border="0" cellpadding="0" cellspacing="0"><tr>
<%set rs=server.createobject("adodb.recordset")
sql="select top 1 * from venshop_payonline"
rs.open sql,conn,1,1%>
<%if rs("alipay")=1 then%><td align="center" width="150"><img border="0" src="img/pay/zhifubao.gif"></td><%end if%>
<%if rs("paypal")=1 then%><td align="center" width="150"><img border="0" src="img/pay/paypal.gif"></td><%end if%>
<%if rs("payonline")=1 then%><td align="center" width="150"><img border="0" src="img/pay/cncard.gif"></td><%end if%>
<%if rs("payonline")=2 then%><td align="center" width="150"><img border="0" src="img/pay/Nps.gif"></td><%end if%>
<%if rs("payonline")=3 then%><td align="center" width="150"><img border="0" src="img/pay/qpay.gif"></td><%end if%>
<%rs.close
set rs=nothing%></tr></table></div>
<!-- 在新支付 END-->
</td></tr></table></div>
<!--#include file="copy.asp"-->