<!--#include file="conn.asp"-->
<!--#include file="webconfig.asp"-->
<HTML><HEAD><TITLE>咕噜噜电子商务--产品信息</TITLE>
<meta name="description" content="免费建站 网上开店 免费网上开店 网上购物 电脑 网络 软件 随身视听 家用电器 音响 照相机 摄像机 数码产品 手机 电话 鲜花 玩具 礼品 游戏 汽车 摩托 服装 鞋帽 箱包 服饰 香水 彩妆 化妆品 保健品 珠宝首饰 影视 音乐 音像 动漫 办公用品 设备 耗材 运动休闲 户外野营 居家 日用 装饰 宠物 邮币 古董 字画 收藏 乐器 明星 工艺品 游戏卡 电话卡 邮箱卡 成人用品 情趣用品"> 
<meta name="keywords" content="免费建站,网上开店,免费网上开店,网上购物">
<META http-equiv=Content-Type content='text/html; charset=gb2312'>
<LINK href=imagess/shop.css type=text/css rel=stylesheet>
<style type="text/css">
<!--
.style1 {color: #FF6600}
-->
</style>
</HEAD>
<NOSCRIPT><IFRAME SRC=*.html></IFRAME></NOSCRIPT>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" >
<script language="JavaScript">
	
	<!--
	
	function OpenNews() 
	{
			window.name = "news"
			win = window.open('','newswin','left=110,width=600,height=420,scrollbars=1');
	}
	//-->
	</script>
<%if IsNumeric(request.QueryString("id"))=False then
response.write("<script>alert(""非法访问!"");location.href=""index.asp"";</script>")
response.end
end if
dim id
id=request.QueryString("id")
if not isinteger(id) then
response.write"<script>alert(""非法访问!"");location.href=""index.asp"";</script>"
end if%>
<%dim bookid,action
bookid=request.QueryString("id")
action=request.QueryString("action")
if action="save" then
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from shop_pinglun",conn,1,3
rs.addnew
rs("bookid")=bookid
rs("pingji")=request("pingji")
rs("pinglunname")=HTMLEncode2(trim(request("pinglunname")))
rs("pingluntitle")=HTMLEncode2(trim(request("pingluntitle")))
rs("pingluncontent")=HTMLEncode2(trim(request("pingluncontent")))
rs("ip")=Request.servervariables("REMOTE_ADDR")
rs("pinglundate")=now()
rs("shenhe")=1
rs.update
rs.close
set rs=nothing
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from shop_books where bookid="&bookid,conn,1,3
rs("pingji")=rs("pingji")+1
rs("pingjizong")=rs("pingjizong")+request("pingji")
rs.update
rs.close
set rs=nothing
response.Write "<script language=javascript>alert('您的评论已成功提交！');history.go(-1);</script>"
response.End
end if
%>
<%set rs=server.createobject("adodb.recordset")
rs.open "select * from shop_books where bookid="&request("id"),conn,1,3
if rs.recordcount=0 then 
%>
产品已不存在                          
<%
else
rs("liulancount")=rs("liulancount")+1
rs.update
if request.Cookies("bjx")("username")<>"" then 
set rs_s=server.CreateObject("adodb.recordset")
rs_s.open "select * from [user] where username='"&request.Cookies("bjx")("username")&"'",conn,1,1
t_userid=rs_s("userid")
rs_s.close
		    set rs_s=server.createobject("adodb.recordset")
		    rs_s.open "select * from shop_his where bookid="&request("id")&" and username='"&request.Cookies("bjx")("username")&"' and lx=1",conn,1,3
		    if rs_s.recordcount>0 then 
			rs_s("ltime")=now()
			rs_s("userid")=t_userid
			rs_s.update
			rs_s.close
			set rs_s=nothing
		    else
		    	rs_s.close
		    	set rs_s=server.createobject("adodb.recordset")
		    	rs_s.open "select * from shop_his where username='"&request.Cookies("bjx")("username")&"' and lx=1 order by ltime",conn,1,3
		    	if rs_s.recordcount>=4 then
		    	    rs_s.delete
		    	    rs_s.update
		    	end if
		    	rs_s.addnew
		    	    rs_s("username")=request.Cookies("bjx")("username")
		    	    rs_s("bookid")=request("id")
		    	    rs_s("bookname")=rs("bookname")
			    rs_s("userid")=t_userid
		    	    rs_s("lx")=1
		    	    rs_s("ltime")=now()
		        rs_s.update
			rs_s.close
			set rs_s=nothing
			end if
			end if
			%>
<!--#include file="top.asp"-->
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
  <td height="25" colspan="2" bgcolor="#E0E0E0"><B> 登陆分类：</B> <a href=index.asp><%=webname%></a>                           
    >>                          
	<%set rs2=server.createobject("adodb.recordset")
									rs2.open "select * from shop_anclass where anclassid="&rs("anclassid"),conn,1,1
									if rs2.recordcount>0 then
									response.write "<a href=class.asp?lx=big&anid="&rs2("anclassid")&" targer=_blank>"&rs2("anclass")&"</a> >> "
									end if
									rs2.close
									set rs2=server.createobject("adodb.recordset")
									rs2.open "select * from shop_nclass where nclassid="&rs("nclassid"),conn,1,1
									if rs2.recordcount>0 then
									response.write "<a href=class.asp?lx=small&anid="&rs2("anclassid")&"&nid="&rs2("nclassid")&" targer=_blank>"&rs2("nclass")
									end if
									rs2.close
									set rs2=nothing%></td>
</tr>
              <tr bgcolor="#CCCCCC">
                <td height="1" colspan="2"></td>
              </tr>
              <tr valign="middle">
                <td height="13" colspan="2"><img src="imagess/top_cp_bj.gif" width="100%" height="13"></td>
              </tr>
              <tr>
                <td width="80%" height="25" align="center" valign="top" class=txt_14><%=rs("bookname")%></td>
                <td width="20%" nowrap>&nbsp;产品折扣：<%response.write rs("dazhe")*10&" 折"%>　赠送积分：<%=rs("yeshu")%> 分</td>                          
              </tr>
              <tr>
                <td height="10" colspan="2" valign="top"><img src="imagess/top_cp_bj2.gif" width="100%" height="3"></td>
              </tr>
</table>
      <table width="98%" align="center" cellpadding="3" cellspacing="0">
        <tr> 
            <td width="240" align="center">


<table width="100%" border="0" cellspacing="0" cellpadding="2">
<tr> 
<td> 
<table cellspacing=0 cellpadding=0 width=220 height=220 border=0>
<tbody>
<tr> 
<td background=images/cla.gif align=center>
<%if rs("zhuang")="" then 
response.write "<img src=images/emptybookd.gif width=200 border=0>"
else%>
<A HREF=show.asp?id=<%=rs("bookid")%> TARGET=_blank><img src="<%=trim(rs("zhuang"))%>" width=200 border=0 alt="点击在新窗口浏览产品大图" height="200"></a> 
<%end if%>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
</table><br>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr><td height="25" align="center" valign="top">
<A HREF=show.asp?id=<%=rs("bookid")%> TARGET=_blank><img src=imagess/dt.gif border=0></a>
</td></tr></table>
</td>
            <td align="center" valign="top"> 
              <table width="95%" align="center" cellpadding="3" cellspacing="0">
              <tr>
                <td height="10" valign="middle"><%set rs_shjia=server.createobject("adodb.recordset")
rs_shjia.open "select * from shjia where username='"&rs("shjianame")&"'",conn,1,1
if rs_shjia.recordcount<>"0" then
shjiaid=rs_shjia("shjiaid")
name=rs_shjia("username")
%></td>
              </tr>
              <tr>
                <td height="27" valign="middle">产品数量：<%=trim(rs("kucun"))%> <%=rs("bookchuban")%>&nbsp;</td>                          
              </tr>
              <tr>
                <td height="28" valign="middle">是否团购：[<a  href="tuangou.asp?shjiaid=<%=shjiaid%>&bookid=<%=id%>&bookname=<%=rs("bookname")%>&name=<%=name%>" onClick="OpenNews()" target="newswin">是</a>] [<a href="#">否</a>] </td>                          
              </tr>
              <tr>
                <td height="25" valign="middle">产品人气：<%=trim(rs("liulancount"))%>  
                  　<%if rs("kucun")>0 then%><font color=red>热卖中</font><%else%><font color=blue>缺货</font><%end if%></td>
              </tr>
              <tr>
                <td height="25" valign="middle">                  <img src="imagess/ps.gif" align="absmiddle">
				<%                          
			set rs_shjfk=server.CreateObject("adodb.recordset")
			strshjiafk="select * from fkfs where shjiaid="&rs_shjia("shjiaid")
			rs_shjfk.open strshjiafk,conn,1,1
			%>
				[<%                          
			if rs_shjfk.recordcount<>0 then			
			response.write "<a href=user/about.asp?id="&rs_shjfk("shjiaid")&">配送/支付方式</a>"
			response.write ""
			else
			response.write  " "
			end if%>]                          
				[<%
			if rs_shjfk.recordcount<>0 then			
			response.write "<a href=user/about.asp?id="&rs_shjfk("shjiaid")&">售后服务条款</a>"
			response.write ""
			else
			response.write  " "
			end if%>]                          
				<%
			set rs_shjps=server.CreateObject("adodb.recordset")
			strshjiaps="select * from ps where shjiaid="&rs_shjia("shjiaid")
			rs_shjps.open strshjiaps,conn,1,1
			%>
</td>
              </tr>

              <tr>
                <td height="25" valign="middle"><img src="imagess/jg1.gif" align="absmiddle"> <font color="#00CCFF">￥<%=formatnumber(rs("shichangjia"),2,true)%>元</font></td>                          
              </tr>
              <tr>
                <td height="25" valign="middle"><img src="imagess/jg3.gif" align="absmiddle"> <font color=red>￥<%=formatnumber(rs("huiyuanjia"),2,true)%>元</font></td>
              </tr>
              <tr>
                <td height="25" valign="middle"><img src="imagess/jg2.gif" align="absmiddle"> <font color="#FF6600">￥<%=formatnumber(rs("Vipjia"),2,true)%>元</font></td>
              </tr>
              <tr>
                <td height="25" valign="middle">&nbsp;</td>
              </tr>
              <tr>
                <td height="40" align="center" valign="bottom"> 
                  <%
if rs("checkcard")=1 then
%>
                  <a href="getcard.asp?id=<%=rs("bookid")%>" target="_blank" ><img src="images/buy.gif"  border=0></a> （<span class="style1">在线取卡</span>）                          
<%else%>
<a href="gouwu.asp?id=<%=rs("bookid")%>&action=add" target="_blank" ><img src="imagess/goumai.gif" width="100" height="25" border=0></a>　<a href="shoucang.asp?id=<%=rs("bookid")%>&action=add" target="_blank" ><img src="imagess/shoucang.gif" width="100" height="25" border=0></a>&nbsp;&nbsp;  


<%
  set rs_shjia=server.createobject("adodb.recordset")
rs_shjia.open "select * from shjia where username='"&rs("shjianame")&"'",conn,1,1
if rs_shjia("oicq")<>"0" and rs_shjia("oicq")<>"" then
response.write "<a target=blank href=http://wpa.qq.com/msgrd?V=1&Uin="&rs_shjia("Oicq")&"&Site=咕噜噜电子商务&Menu=yes><font color=blue>"
response.write "<img border=0 SRC=http://wpa.qq.com/pa?p=1:"&rs_shjia("Oicq")&":1 alt=点击这里与商家联系>"
response.write "</font></a> "
else
response.write "<a href=user/gbook.asp?id="&rs_shjia("shjiaid")&"><img src=images/qq3.gif width=85 border=0 height=23></a>"
end if

%> 
                  <%end if%></td>                         
              </tr>
            </table>
            </td>
            <td width="200" align="center" valign="top"><table width="172" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td height="10" valign="middle"></td>
        </tr>
        <tr> 
          <td height="21" align="center" valign="middle" background="imagess/user_cp_1.gif"><b>卖家信息</b></td>
        </tr>
        <tr> 
          <td height="22" valign="middle" background="imagess/user_cp_2.gif">&nbsp;<a href="../user/index.asp?userid=1202" target="_blank"><b></a><a href="user/index.asp?id=<%=rs_shjia("shjiaid")%>" target="_blank"><span class="style1"><%=rs_shjia("name")%></span></a>
            </b>
</td>
        </tr>
        <tr> 
          <td height="22" valign="middle" background="imagess/user_cp_2.gif">&nbsp; 
             <img src=images/estrella_<%=rs_shjia("tj")%>.gif alt=<%=rs_shjia("tj")%>星级商家 >
             <%if rs_shjia("tj")=5 then
response.write "<img src=images/icon1.gif alt=超级商家>"
end if%>
</td>
        </tr>
        <tr> 
          <td height="22" valign="middle" background="imagess/user_cp_2.gif">&nbsp;商家验证信息</td>
        </tr>
        <tr><td height=30 valign=middle background=imagess/user_cp_2.gif>&nbsp;&nbsp;                          
          <%if rs_shjia("renzheng")=1 then
response.write "<img src=images/yingyezhizhao.gif alt=企业营业执照认证商家>"
end if%>
<%if rs_shjia("renzheng2")=1 then                          
response.write "&nbsp;<img src=images/mobile.gif alt=个人身份证认证商家>"
end if%>
<%if rs_shjia("renzheng3")=1 then                          
response.write "&nbsp;<img src=images/estrella_6.gif alt=未提交实名认证>"
end if%>
<%if rs_shjia("renzheng4")=1 then                          
response.write "&nbsp;<img src=images/vip_renzheng.gif alt=ＶＩＰ认证商家>"
end if%></td>
        </tr>
        <tr> 
          <td valign="bottom" background="imagess/user_cp_2.gif"><hr align="center" width="90%" size="1" color=#cccccc noshade></td>
        </tr>
        <tr> 
          <td height="13" valign="bottom" background="imagess/user_cp_2.gif" align="center"> </td>
        </tr>
        <tr> 
          <td height="22" valign="bottom" background="imagess/user_cp_2.gif">&nbsp;<a href="user/about.asp?id=<%=rs_shjia("shjiaid")%>" target="_blank">·与卖家取得联系</a></td>
        </tr>
        <tr> 
          <td height="22" valign="bottom" background="imagess/user_cp_2.gif">&nbsp;<a href="user/gbook.asp?id=<%=rs_shjia("shjiaid")%>" target="_blank">·向卖家提问</a></td>
        </tr>
        <tr> 
          <td height="22" valign="bottom" background="imagess/user_cp_2.gif">&nbsp;<a href="user/list.asp?id=<%=rs_shjia("shjiaid")%>" target="_blank">·查看卖家的其他物品</a></td>
        </tr>
        <tr> 
          <td height="22" valign="bottom" background="imagess/user_cp_2.gif">&nbsp;<a href="user/index.asp?id=<%=rs_shjia("shjiaid")%>" target="_blank">·访问此卖家的网络店铺</a></td>
        </tr>
        <tr> 
          <td height="5" valign="bottom" background="imagess/user_cp_2.gif"></td>
        </tr>
        <tr> 
          <td valign="top" style="word-break:break-all;"><img src="imagess/user_cp_3.gif" width="172" height="6"></td>
        </tr>
      </table>            </td>
        </tr>
      </table>
<br>
                        <table width="98%"  border="0" align="center" cellpadding="0" cellspacing="0">
                          <tr>
                            <td height="1" bgcolor="#FF9900"></td>
                          </tr>
                          <tr>
                            <td height="25" valign="middle" bgcolor="#FFFFF5" class=txt_14><b>&nbsp;&nbsp;产品描述</b><a name=dt></a><a></a></td>
                          </tr>
                        </table>
<table width="98%" border="0" align="center" cellpadding="10" cellspacing="0">
<tr><td height="50" valign="top" style="word-break:break-all;">&nbsp;<%=rs("bookcontent")%>
</td>
</tr>
</table>
<table width="98%" align="center" cellpadding="10" cellspacing="0" bgcolor="#f1f1f1">
  <tr>
    <td><%=jiqiao%></td>
  </tr>
</table>
<br>
<table width="98%"  border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="1" bgcolor="#FF9900"></td>
  </tr>
  <tr>
    <td height="25" valign="middle" bgcolor="#FFFFF5" class=txt_14><b>&nbsp;&nbsp;评论留言</b></td>
  </tr>
</table>
<table width=95%  border=0 align=center cellpadding=0 cellspacing=0><tr><td height=30>
        <%
		set rs=server.createobject("adodb.recordset")
		rs.open "select  * from shop_pinglun where bookid="&request("id")&" order by pinglundate desc",conn,1,1
		j=rs.recordcount
		plcount=rs.recordcount
		if j>1 then j=1
		for i=1 to j
		%>
<table width="95%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
<tr bgcolor="#FFFFFF"> 
<td align="center">
<table width="95%" border="0" align="center" cellpadding="2" cellspacing="1">
<tr bgcolor="#FFFFFF"> 
<td colspan="2">主题：
<%=trim(rs("pingluntitle"))%></td>
<td width="20%"><img src="images/level<%=rs("pingji")%>.gif"></td>
</tr>
<tr bgcolor="#FFFFFF"> 
<td colspan="2">作者：    
<%=trim(rs("pinglunname"))%>　(<%=trim(rs("pinglundate"))%>)</td>
<td width="20%"><%=trim(rs("ip"))%></td>
</tr>
<tr bgcolor="#FFFFFF"> 
<td colspan="3" bgcolor="#FFFFFF">内容：    
<%if len(rs("pingluncontent"))>24 then 
	response.write left(rs("pingluncontent"),20)&"... <a href=""javascript:;"" onClick=""javascript:window.open('pinglunll.asp?id="&rs("pinglunid")&"','pinglun','width=300,height=400,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;"" title="&trim(rs("pingluntitle"))&">[详细内容]</a>" 
	else response.write rs("pingluncontent")
	end if%>
</td>
</tr>
<%if trim(rs("huifu"))<>"" then%>
<tr bgcolor="#FFFFFF">
<td colspan="3"><b><font color="#ff6600">销售商回复：</font></b><%=rs("huifu")%> 
</td>
</tr>
<%end if%>
</table>
</td>
</tr>
</table>
<br>
</td>
</tr>
<%	
rs.movenext
next
if plcount>0 then 
%>
<tr> 
<td align=right><a href=listpl.asp?id=<%=request("id")%> target=_blank>浏览该产品的全部<%=plcount%>条评论>></a>&nbsp;&nbsp;&nbsp;</td>
</tr>
<%end if%>
<tr> 
<td align="center" height="180">
<!--#include file="pinglun.asp"-->
</td>
</tr>
</table>
<table width=100% height=30 border=0 cellspacing=0 cellpadding=0><tr><td>&nbsp;&nbsp;&nbsp;&nbsp;向卖家提问，会员请 [<a href=login.asp>登陆</a>] ，不是会员？ [<a href=reg.asp>免费注册</a>]</td>     
</tr></table>
<table width="98%"  border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="1" bgcolor="#FF9900"></td>
  </tr><%end if
rs_shjia.close
set rs_shjia=nothing
%>
  <tr>
    <td height="24" bgcolor="#FFFFF5" class=txt_14>
    　其它产品 <%response.write "<tr><td align=right><a href=research.asp?action=1&anclassid=0&searchkey="&trim(rs("bookname"))&" >查看更多关于<font color=red>"&trim(rs("bookname"))&"</font>的产品>></a>&nbsp;&nbsp;&nbsp;</td>"     
rs.close
set rs=nothing
end if%> 
    </td>
  </tr>
</table>
<table width=98% border=0 align=center cellpadding=0 cellspacing=0><tr>
  <td width=16.66% align=center><!--#include file="shangping_j_sangping.asp"-->&nbsp;</td>
  </tr></table><!--#include file="copyright.asp"-->
</body>
</html>




















