<%
'商易仿淘宝4.0(多用户)
'ACCESS版演示网站：http://www.ftaobao.com(商易仿淘宝商城)
'SQL版演示网站：http://sql.ftaobao.com
'电话：0571-56907100
'QQ：1147100
%>
<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></nobr>
		  &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%> 					

<a href="renzhengshow.asp?huiyuan=<%=huiyuan%>&shopid=<%=shopnet("shopid")%>" target="_blank">
<%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> <span class="STYLE3"><a href="myshopfaq.asp?shopid=<%=shopnet("shopid")%>">相关问题</a>&nbsp; <a href="shopguestbook.asp?shopid=<%=shopnet("shopid")%>">店铺留言</a></span>&nbsp;&nbsp;<a href="shopshfw.asp?shopid=<%=shopnet("shopid")%>"><strong>售后服务</strong></a></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="shop/1/shopnews.asp?shopid=<%=shopnet("shopid")%>&id=<%=rs("id")%>" target="_blank"><%=rs("bt")%></a></li><br>
 <%=rs("sj")%>
<%
'商易仿淘宝4.0.1演示地址
'http://www.ftaobao.com
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>