<%
'商易仿淘宝4.0(多用户)
'ACCESS版演示网站：http://www.ftaobao.com(商易仿淘宝商城)
'SQL版演示网站：http://sql.ftaobao.com
'电话：0571-56907100
'QQ：1147100
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">

<%
 If shopnet("shopid")<>"" And Not isnumeric(shopnet("shopid"))  Then
	 response.redirect"../../note.asp?errid=0"
End If
If request("shopid")="" Then 
	 response.redirect"../../note.asp?errid=0"
End If
%>

<!--#include file="../../FHeadTitle.asp"-->
<!--#include file="../../FFunction.asp"-->
<!--#include file="../../include/page.asp"-->
<!--#include file="../../include/ubbhtml.asp"-->
<!--#include file="../../include/shopinfo.asp"-->
<head>
    <title><%=my_name%> -- <%=shopname%></title>
 <meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
        <meta name="description" content="网上购物,店铺,特色店铺,<%=shopname%>. "/>
        <meta name="keywords" content="网上购物,店铺,特色店铺,<%=shopname%>." />

    <link href="../../images/favicon.ico" rel="icon" type="image/x-icon" />
    <link href="../../images/favicon.ico" rel="shortcut icon" type="image/x-icon" />
  <style type="text/css" media="screen">
	@import url("../../home/css/global/20060613.css");
</style>

        <script src="../../home/common.js" language="javascript" type="text/javascript"></script>
    <script src="../../home/js/common.js" type="text/javascript"></script>
        <script language="javascript" type="text/javascript">
    //<![CDATA[
    var ver=navigator.appVersion;
    if(ver.indexOf("MSIE 5")!=-1)
    	document.write('<link href="../../home/css/shop/default_ie5.css" rel="stylesheet" rel="stylesheet" type="text/css" media="screen" />');
    else
    	document.write('<link href="../../home/css/shop/default.css" rel="stylesheet" rel="stylesheet" type="text/css" media="screen" />');
    //]]>
    </script>
            </head>
<body class="FullWidth">
 <div id="Head">
 
</div>

<!--#include file="../../fheadall.asp" -->

    
    </div>
    <div class="HackBox"></div>

<div id="Content">


<div id="ShopFP">
	<div id="PathBar" ><a href="../../index.asp">首页</a> >> <a href="../../shopindex.asp?PageType=B">所有店铺</a> >>
			<a href="myshop4.asp?shopid=<%=shopnet("shopid")%>"><%=shopname%></a>
		</div>
	<div id="NavBar">
		<div id="NBShopName"><%=shopname%></div>
		<div id="NBPersonalInfo"><a href="myshop4js.asp?shopid=<%=shopnet("shopid")%>">【店铺介绍】</a></div>
		<div id="NBCredit"><a href="../../renzhengshow.asp?huiyuan=<%=huiyuan%>&shopid=<%=shopnet("shopid")%>">【信用评价】</a></div>
		
  </div>
	<div id="ShopInfo">
		<div id="PicAndFav">
			<div id="ShopPic">
				<table width="100%" border="0" cellpadding="0" cellspacing="0">
					<tr>
					<td align="center">
					     					        <div style="clear:both"><img src="../../user/images/logo/<%If shoplogo<>"" then%><%=shoplogo%><%else%>user_logo.gif<%End if%>" height="50" width=120 alt="店标"></div>
																</td>
					</tr>
				</table>
			</div>
			<div id="AddToFav">
						<a href="../../user/shoucang.asp?type=2&id=<%=shopnet("shopid")%>">收藏本店铺</a>
						</div><br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href="../../zhanneixin/fa.asp?huiyuan=<%=huiyuan%>" target=_blank><B>给掌柜发信</B></a>
		</div>
		<div id="ShopInfoList">
			<ul>
				<li><span class="ListHint">　　掌柜:</span><%=username%></li>
				<%rz = conn.execute("select rz from huiyuan where huiyuan='"&huiyuan&"'")(0)%>
<%renzheng()%></a>								</li>
				<li><span class="ListHint">卖家信用:</span><%=buyxinyong%></li>
				<li><span class="ListHint">买家信用:</span><%=sellxinyong%></li>
				<li><span class="ListHint">商品数量:</span><%=numbers%></li>
				<li><span class="ListHint">创店时间:</span><%=sj%></li>
				<li><span class="ListHint">　　地址:</span><%=shopdz%></li>
		  </ul>
		<p></nobr>&nbsp; <span class="STYLE1"><a href="myshop4faq.asp?shopid=<%=shopnet("shopid")%>"><b>相关问题</b></a>&nbsp; <a href="shop4guestbook.asp?shopid=<%=shopnet("shopid")%>"><b>店铺留言</b></a>&nbsp; <a href="shop4shfw.asp?shopid=<%=shopnet("shopid")%>"><strong>售后服务</strong></a></span></p>
		</div>
		<div id="ShopAnnounceContainer">
			<div id="ShopAnnounce">
				<div id="ShopAnnounceTitle">店铺公告</div>
				<div id="ShopAnnounceContent">
				<marquee style="position:relative;" onMouseOver="this.stop()" onMouseOut="this.start()" scrollamount="1" scrolldelay="85" direction="up" behavior="scroll"  height="60">
<%Set rs = Server.CreateObject("ADODB.Recordset")
sql="Select top 6 * From user_news where userid="&shopnet("shopid")&" Order By id DESC"
rs.open sql,conn,3,1
if rs.eof and rs.bof then
Response.Write("暂无公告")
end if
do while not rs.eof%>
    <tr valign="middle" bgcolor="#f1f1f1"> 
 <td height="25"><li><a href="shop4news.asp?shopid=<%=shopnet("shopid")%>&amp;id=<%=rs("id")%>" target="_blank"><%=rs("bt")%></a>
 <%=rs("sj")%></li><br>
<%i=i+1
rs.MoveNext                                              
loop%></td>
      </tr>
    <tr align="center" valign="middle" bgcolor="#f1f1f1"> 
      <td height="25" colspan="5">
<%
rs.close:set rs=nothing%></td>
    </tr>
				  </marquee>
				</div>
			</div>
		</div>
		
		<div class="HackBox"></div>
	</div>
	

	
	<div id="ShopMain">
		<div id="MenuCol">

				<div class="HackBox"></div>
			</div>
			
      			<div id="ItemPicView">
				<div id="ViewInfoTop">
					<div id="SortByPrice">
					  <div class="ReItem">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
 <tr >
    <td><table width="73%" border="0" align="center" cellpadding="0" cellspacing="5">
      <tr>
        <td height="22"style="word-break:break-all"><span class="STYLE1"> &nbsp;<%=shopname%>-----------店铺介绍</span></td>
      </tr>
      <%
If fw<>"" then
shopfw=fw
Else
shopfw="店主还没有设置！"
End If 
%> 
	  <tr>
        <td height="40" valign="top" style="word-break:break-all">
		<%=shopfw%>		</td>
      </tr>
    </table>
      <table width="73%" border="0" align="center" cellpadding="0" cellspacing="5">
        <tr>
          <td height="22"style="word-break:break-all"><span class="STYLE1"> &nbsp;售后服务</span></td>
        </tr>
<%
				  If txt<>"" then
txt = Replace(txt, chr(32), "&nbsp;")
txt = Replace(txt, vbCrLf, "<br>")
txt=ubbcode(txt)
Else
txt="店主还没有设置！"
End if
%>
		<tr>
          <td height="40" valign="top"style="word-break:break-all"><%=txt%> </td>
        </tr>
      </table>
      <table width="73%" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="22"><span class="STYLE1"> &nbsp;配送及支付</span></td>
        </tr>
        <tr>
          <td height="22"><table width="100%" border="0" cellspacing="5" cellpadding="0">
            <tr>
              <td>&nbsp;</td>
              <td>商品所在地：</td>
			 <% Set rs = Server.CreateObject("ADODB.Recordset")
        sql="select * from fukuan where userid =" & shopnet("shopid")
        rs.open sql,conn,3,2
		if rs.eof and rs.bof then
		wmsg="掌柜还没有设置配送及支付方式"
		end if
		%>
		<td style="word-break:break-all"><%=rs("suozaidi")%></td>
            </tr>
            <tr>
              <td width="9%">&nbsp;</td>
              <td width="19%">配送费用:</td>
              <td width="72%" style="word-break:break-all"><%if rs("maijia")=1 then%>
                卖家承担运费
                <%else%>
                EMS:<%=rs("amount")%>元&nbsp;&nbsp;平邮<%=rs("amount1")%>元&nbsp;&nbsp;快递：<%=rs("amount2")%>元
                <%end if%>              </td>
            </tr>
            <tr>
              <td>&nbsp;</td>
              <td>配送范围:</td>
              <td style="word-break:break-all"><%=rs("fw")%></td>
            </tr>
            <tr>
              <td>&nbsp;</td>
              <td>发货方式:</td>
              <td style="word-break:break-all"><%=rs("fahuofangshi")%></td>
            </tr>
            <tr>
              <td>&nbsp;</td>
              <td>预计收货时间:</td>
              <td style="word-break:break-all"><%=rs("shouhuosj")%></td>
            </tr>
            <tr>
              <td>&nbsp;</td>
              <td>付款方式:</td>
              <td>&nbsp;</td>
            </tr>
            
            <tr>
              <td colspan="3"><div align="center"></div>
                <%If rs("zhifubao")<>"" Then response.write "<img src=../../image/zhifubao.gif>" End if%>
&nbsp;
                <%If rs("wangyinzaixian")<>"" Then response.write "<img src=../../image/wangyinlogo.gif>" End if%>
&nbsp;
                <%If rs("xibuzhifu")<>"" Then response.write ""&rs("xibuzhifu")&"" End if%>
&nbsp;
                <%If rs("egold")<>"" Then response.write "<img src=../../image/egold.gif>" End if%>
             &nbsp;
                <%If rs("youjuhuikuan")<>"" Then response.write ""&rs("youjuhuikuan")&"" End if%>&nbsp;
                <%If rs("jiaotongyinhang")<>"" Then response.write "<img src=../../image/bank_jt.gif>" End if%>
&nbsp;
                <%If rs("zhaoshangyinhang")<>"" Then response.write "<img src=../../image/bank_cmb.gif>" End if%>
&nbsp;
                <%If rs("zhongguoyinhang")<>"" Then response.write "<img src=../../image/bank_headbg.gif>" End if%>
               &nbsp;
&nbsp;          <%If rs("jiansheyinhang")<>"" Then response.write "<img src=../../image/bank_ccb.gif>" End if%>
&nbsp;
                <%If rs("nongyeyinhang")<>"" Then response.write "<img src=../../image/bank_abc.gif>" End if%>
&nbsp;
                <%If rs("gongshangyinhang")<>"" Then response.write "<img src=../../image/bank_cbc.gif>" End if%>
&nbsp;
                <%If rs("visa")<>"" Then response.write "<img src=../../image/bank_visa.gif>" End if%>
      
                <%rs.close
				set rs=nothing%>              </td>
              </tr>
            <tr>
              <td height="50" colspan="3">&nbsp;</td>
            </tr>
          </table></td>
        </tr>
      </table>
      </td>
 </tr>
      </table>
</td>
  </tr>
</table>
</div>
	
				<div class="HackBox"></div>
			</div>
<table width="100%" cellpadding="0" cellspacing="0">
        <tr>
          <td height="30" align="center" valign="middle">
          </td>
        </tr>
      </table>
	  </div>  </div>  </div>  </div>
<!--#include file="../../user/mybottom.asp" -->
</body>
</html>

