views.asp

凡人网络购物系统 v8.0 中文版

	<img src="<%tao_pic=split(rs("tao_pic"&i),"*")%><%=tao_pic(1)%>" onerror="this.src='img/noimage.jpg'" height="80" border="0" style="border: 1px solid #F2F2F2"></a></td>
	<td height="55"><a href="views_tao.asp?hw_id=<%=rs("hw_id")%>&tao_id=<%=i%>"><font style="font-size:10pt; font-weight:700"><%=rs("hw_name")&rs("tao_name"&i)%></a></td>
	<td height="55" align="center" width="75"><font style="font-size:10pt; font-weight:700; color: red">&yen; <%=rs("tao_price"&i)%>元</font></td>
	<td height="55" align="center" width="50"><a href=basket.asp?hw_id=<%=rs("hw_id")%>&tao_id=<%=i%>><img border="0" src="img/buy.gif"></a></td>
	<td height="55" align="center" width="50"><a href="views_tao.asp?hw_id=<%=rs("hw_id")%>&tao_id=<%=i%>"><img border="0" src="img/xiang.gif" width="34" height="15"></a></td></tr>
<%end if
next%></table></td></tr><tr><td height=10></td></tr><%end if%>
<tr><td class="viewl">
	<img border="0" src="Skin/<%=venshop_skin%>/index_l4.gif" width="3" height="13" align="absmiddle"> 商品描述：</td></tr>
<tr><td height=20 align="center">
<table border="0" cellpadding="0" cellspacing="0" width="98%" height="50"><tr><td valign="top"><%=rs("hw_content2")%></td></tr></table>
<table border="0" cellpadding="5" cellspacing="0" width="98%"><%ii=-1
for i=1 to 10
if rs("ziduan"&i)<>"" then
ii=-ii
if ii=1 then%>	
<tr><td align="right" width="100" bgcolor="#EAF1FB"><%=rss("ziduan"&i)%>：</td><td width="20" bgcolor="#EAF1FB"></td><td bgcolor="#EAF1FB"><%=rs("ziduan"&i)%></td></tr>
<%else%>
<tr><td align="right" width="100"><%=rss("ziduan"&i)%>：</td><td width="20"></td><td><%=rs("ziduan"&i)%></td></tr>
<%end if
end if
next
rss.close
set rss=nothing
%></table></td></tr></table>
<!-- 商品信息END -->
<!-- 商品评论 -->
<table cellSpacing="0" cellPadding="3" width="100%" border="0">
<tr><td align="middle" height="10" colspan="2"></td></tr>
<tr><td class="viewl" width="70%">
	<img border="0" src="Skin/<%=venshop_skin%>/index_l4.gif" width="3" height="13" align="absmiddle"> 产品评论及提问：</td>
<td align="middle" class="viewl" height="23"><a href="#" onclick="javascript:window.open('addly.asp?id=<%=rs("hw_id")%>','newwindow','toolbar=no,scrollbars=yes,resizable=no,top=0,left=0,width=420,height=180');">
发表您的评论或提问</a></td></tr>
<tr><td width="700" height="30" colspan="2">
<script language="JavaScript1.1" src="comment.asp?id=<%=hw_id%>"></script></p>
<p style="line-height: 150%; margin: 5px">
<a target="_blank" href="showcomment.asp?hw_id=<%=hw_id%>"><font color="#FF0000">全部显示 >> </font>
</a> </p>
</td></tr></table>
<!-- 商品评论 -->
<!-- 相关资讯 -->
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr><td bgcolor="#F5F5F5"><p style="margin:5px; line-height: 150%; "><img border="0" src="Skin/<%=venshop_skin%>/index_l4.gif" width="3" height="13" align="absmiddle"> <b>相关资讯：</b><%set rs2=server.createobject("adodb.recordset")
sql="select top 20 * from venshop_article where a_name like '%"&rs("hw_name")&"%' order by id desc"
rs2.open sql,conn,1,1
do while not rs2.eof%>
<p style="margin:5px; line-height: 150%; "><img border="0" src="img/newsq.gif" width="6" height="6"> <a href="article.asp?a_id=<%=rs2("id")%>" target=_blank><%=rs2("a_name")%></a> <font color="#808080">[<%=rs2("a_date")%>]</font></p>
<%rs2.movenext
loop
rs2.close
set rs2=nothing%>
<p style="margin:5px; line-height: 150%; ">
<a target="_blank" href="article.asp"><font color="#FF0000">显示更多 >></font></a></p>
</td></tr></table>
<!-- 相关资讯 END -->
</td>
<td width="240" align="center" valign="top">
<script language="javascript" src="inven.asp?ven_id=5"></script>
<!-- 最近浏览 -->
<table border="0" cellpadding="3" cellspacing="1" width="230">
<tr><td height="23" class="viewr">
	<img border="0" src="Img/index_l4.gif" width="3" height="13" align="absmiddle"> 最近浏览产品&gt;&gt;</td></tr>
<tr><td align="center" class="viewr2">
<table border="0" cellpadding="5" cellspacing="0" width="100%"><%recent=split(session("recent"),"/")
if ubound(recent)<=9 then
for i=0 to ubound(recent)
hwid=trim(recent(i))
Set rs2=Server.CreateObject("ADODB.Recordset")
rs2.open "select * from venshop_hw where hw_id="&hwid&"",conn,1,1%>
<tr><td height="20" width="180"><a target="_blank"  href=views.asp?hw_id=<%=rs2("hw_id")%>><%=rs2("hw_name")%></a></td>
<td height="20" width="35" align="center"><a href="basket.asp?hw_id=<%=rs2("hw_id")%>"><img border="0" src="img/buy.gif"></a></td></tr>
<%rs2.close
set rs2=nothing
next
else
for i=0 to 9
hwid=trim(recent(i))
Set rs2=Server.CreateObject("ADODB.Recordset")
rs2.open "select * from venshop_hw where hw_id="&hwid&"",conn,1,1%>
<tr><td height="20" width="180"><a target="_blank"  href=views.asp?hw_id=<%=rs2("hw_id")%>><%=rs2("hw_name")%></a></td>
<td height="20" width="35" align="center"><a href="basket.asp?hw_id=<%=rs2("hw_id")%>"><img border="0" src="img/buy.gif"></a></td></tr>
<%rs2.close
set rs2=nothing
next
end if%></table></td></tr></table>
<!-- 最近浏览 END -->
<!-- 价位 -->
<table border="0" cellpadding="3" cellspacing="1" width="230"><tr><td height="3"></td></tr>
<tr><td height="23" class="viewr"><img border="0" src="Img/index_l4.gif" width="3" height="13" align="absmiddle"> 相同价位同类产品&gt;&gt;</td></tr>
<tr><td align="center" class="viewr2">
<table border="0" cellpadding="5" cellspacing="0" width="100%">
<%pricea=int(trim(rs("hw_price2"))*80/100)
priceb=int(trim(rs("hw_price2"))*120/100)
Set rs2=Server.CreateObject("ADODB.Recordset")
rs2.open "select top 10 * from venshop_hw where hw_kucun>0 and hw_price2>="&pricea&" and hw_price2<="&priceb&" and hw_id<>"&hw_id&" and sort_id="&sort_id&" order by tjindex desc,tjsort desc,hw_id desc",conn,1,1
if rs2.eof and rs2.bof then
response.write "<tr><td height=23><p style='margin-left: 15px'>暂无同价位产品</td></tr>"
else
do while not rs2.eof%>
<tr><td height="20" width="180"><a target="_blank"  href=views.asp?hw_id=<%=rs2("hw_id")%>><%=rs2("hw_name")%></a></td>
<td height="20" width="35" align="center"><a href="com.asp?action=add&hw_id=<%=rs2("hw_id")%>"><img border="0" src="img/duibi.gif"></a></td></tr>
<%rs2.movenext
loop
end if
rs2.close
set rs2=nothing%></table></td></tr></table>
<!-- 价位 END -->
<!-- 品牌 -->
<%pinpai_id=rs("pinpai_id")
if pinpai_id<>"" and pinpai_id<>0 then%>
<table border="0" cellpadding="3" cellspacing="1" width="230"><tr><td height="3"></td></tr>
<tr><td height="23" class="viewr"><img border="0" src="Img/index_l4.gif" width="3" height="13" align="absmiddle"> 相同品牌产品&gt;&gt;</td></tr>
<tr><td align="center" class="viewr2">
<table border="0" cellpadding="5" cellspacing="0" width="100%">
<%Set rs2=Server.CreateObject("ADODB.Recordset")
rs2.open "select top 10 * from venshop_hw where hw_kucun>0 and pinpai_id="&pinpai_id&" and hw_id<>"&hw_id&" order by tjindex desc,tjsort desc,hw_id desc",conn,1,1
if rs2.eof and rs2.bof then
response.write "<tr><td height=23><p style='margin-left: 15px'>暂无同品牌产品</td></tr>"
else
do while not rs2.eof%>
<tr><td height="20" width="180"><a target="_blank"  href=views.asp?hw_id=<%=rs2("hw_id")%>><%=rs2("hw_name")%></a></td>
<td height="20" width="35" align="center"><a href="com.asp?action=add&hw_id=<%=rs2("hw_id")%>"><img border="0" src="img/duibi.gif"></a></td></tr>
<%rs2.movenext
loop
end if
rs2.close
set rs2=nothing
%><tr><td height="20" width="215" colspan="2" align="right"><p style="margin-right: 5px"><a href="pinpai.asp?pinpai_id=<%=pinpai_id%>">更多...</a></td></tr>
</table></td></tr>
</table><%end if%>
<!-- 品牌 END -->
<script language="javascript" src="inven.asp?ven_id=6"></script>
</td></tr></table><%end if
rs.close%></div><!--#include file="copy.asp"-->