<!--#include file="conn.asp"--><%seo_title="Compare-"&sitename%>
<!--#include file="IncAsp/WrzcNethtml_top.asp"-->
<!--#include file="IncAsp/all_com.asp"-->
<div align=center>
<%
hw_id=request("hw_id")
action=request("action")
select case action
case "add"
chkid(hw_id)
comadd(hw_id)
case "del"
chkid(hw_id)
comdel(hw_id)
case "delall"
comdelall
end select
comid=split(Request.Cookies("WrzcNethtml")("com"),"/")
if Request.Cookies("WrzcNethtml")("com")="" then%>
<table border="0" cellpadding="0" cellspacing="0" width="980">
<tr><td class="cartshowa" align="left">&nbsp;&nbsp; :: Products</td></tr>
<tr><td height="230" align="center" class="cartshow1">No data</td></tr></table>
<%else%>
<table border="0" cellpadding="0" cellspacing="0" width="980">
<tr><td class="sort">&nbsp;&nbsp; :: Products:(<%=ubound(comid)+1%>)</td></tr>
<tr><td class="cartshow1" align=left><div class="d5"></div>
<table border="0" cellpadding="5" cellspacing="0">				
<tr><td align="right" height="30" width="80" class="cartshow0"><b></b></td>
<%for i=0 to ubound(comid)
hw_id=trim(comid(i))
redim rs(i)
set rs(i)=server.CreateObject("adodb.recordset")
rs(i).open "select * from WrzcNethtml_hw where hw_id="&hw_id&"",conn,1,3%>  
<td align="center" height="20" style="border-left: 1px solid #C0C0C0; border-right-width: 1px; border-top-width: 1px; border-bottom-width: 1px" class="cartshow0">
<a href="com.asp?hw_id=<%=hw_id%>&action=del">Delete</a>&nbsp;&nbsp;&nbsp;&nbsp;
<a href="basket.asp?hw_id=<%=hw_id%>&action=add">Add to cart</a></td>
<%next%></tr>
<tr>
<td align="right" height="30" width="80" class="cartshow1"><b>Picture:</b></td>
<%for i=0 to ubound(comid)
hw_id=trim(comid(i))
set rs(i)=server.CreateObject("adodb.recordset")
rs(i).open "select * from WrzcNethtml_hw where hw_id="&hw_id&"",conn,1,3%>  
<td align="center" height="100" style="border-left: 1px solid #C0C0C0; border-right-width: 1px; border-top-width: 1px; border-bottom-width: 1px" class="cartshow1">
<a href=Product/Pro<%=rs(i)("hw_id")%>.html target=_blank><img src="<%pic=split(rs(i)("hw_pic"),"*")%><%=pic(1)%>" border="0" onerror="this.src='img/noimage.jpg'" <%=sort_wh%> style="border: 1px solid #C0C0C0"></a></td>
<%next%></tr>
<tr><td align="right" height="18" width="80" class="cartshow0" valign="top"><b>Name:</b></td>
<%for i=0 to ubound(comid)%>   
<td height="18" class="cartshow0" style="border-left: 1px solid #C0C0C0; border-right-width: 1px; border-top-width: 1px; border-bottom-width: 1px" valign="top">
<a href=Product/Pro<%=rs(i)("hw_id")%>.html target=_blank><b><%=rs(i)("hw_name")%></b></a></td>
<%next%></tr>
<tr><td align="right" height="18" width="80" valign="top" class="cartshow1"><b>List price:</b></td>
<%for i=0 to ubound(comid)%>   
<td height="18" style="border-left: 1px solid #C0C0C0; border-right-width: 1px; border-top-width: 1px; border-bottom-width: 1px" valign="top" class="cartshow1">
<s><%=fuhao%> <%=FormatNum(rs(i)("hw_price1")*hui)%><%=danwei%></s></td>
<%next%></tr>
<tr>
<td align="right" height="18" width="80" class="cartshow0" valign="top"><b>Price:</b></td>
<%for i=0 to ubound(comid)%>   
<td height="18" class="cartshow0" style="border-left: 1px solid #C0C0C0; border-right-width: 1px; border-top-width: 1px; border-bottom-width: 1px" valign="top">
<font color="#FF0000"><%=fuhao%> <%=FormatNum(rs(i)("hw_price2")*hui)%><%=danwei%></font></td>
<%next%></tr>
<tr><td align="right" height="18" width="80" valign="top" class="cartshow1"><b>Brand:</b></td>
<%for i=0 to ubound(comid)%>   
<td height="18" style="border-left: 1px solid #C0C0C0; border-right-width: 1px; border-top-width: 1px; border-bottom-width: 1px" valign="top" class="cartshow1">
<%if rs(i)("pinpai_id")<>"" then
hw_pinpai=rs(i)("pinpai_id")
set rsd=server.CreateObject("adodb.recordset")
rsd.open "select * from WrzcNethtml_pinpai where pinpai_id="&hw_pinpai&"",conn,1,3
if not rsd.eof then
pinpai_name=rsd("pinpai_name")
pinpai_id=rsd("pinpai_id")%><a href="pinpai.asp?pinpai_id=<%=rs(i)("pinpai_id")%>" target=_blank><%=pinpai_name%></a><%else%>－－<%end if
rsd.close
set rsd=nothing%><%else%>－－<%end if%>
</td>
<%next%></tr>
<tr><td align="right" height="18" width="80" valign="top" class="cartshow0"><b>In stock:</b></td>
<%for i=0 to ubound(comid)%>   
<td height="18" style="border-left: 1px solid #C0C0C0; border-right-width: 1px; border-top-width: 1px; border-bottom-width: 1px" valign="top" class="cartshow0"><%=rs(i)("hw_kucun")%></td>
<%next%></tr>
<%
sortsid=rs(0)("sort_id")
set rsd=server.CreateObject("adodb.recordset")
rsd.open "select ziduan from WrzcNethtml_sort where sort_id="&sortsid&"",conn,1,3
ziduan=rsd("ziduan")
zd=split(ziduan,"##")
stt=-1
for st=0 to 49
if zd(st)<>"" then
stt=-stt%>
<tr><td align="right" height="18" width="80" valign="top" <%if stt=-1 then%> class="cartshow0"<%else%> class="cartshow1"<%end if%>>
<b><%=zd(st)%>:</b></td>
<%for i=0 to ubound(comid)
ziduan=split(rs(i)("ziduan"),"##")
%>   
<td height="18" style="border-left: 1px solid #C0C0C0; border-right-width: 1px; border-top-width: 1px; border-bottom-width: 1px" valign="top" <%if stt=-1 then%> class="cartshow0"<%else%> class="cartshow1"<%end if%>>
<%if ziduan(st)<>"" then%><%=ziduan(st)%><%else%>－－<%end if%></td>
<%next%></tr>
<%end if
next
rsd.close
set rsd=nothing%>
</table><div class="d5"></div>
</td></tr></table>
<%for i=0 to ubound(comid)%><%rs(i).close
set rs(i)=nothing
next
end if%></div><!--#include file="IncAsp/WrzcNethtml_copy.asp"-->