<!--#include file="conn.asp"-->
<!--#include file="webconfig.asp"-->
<!--#include file="webtop.asp"-->
<head>
<title>网展购物系统</title>
<%if session("tmp_usersessionid")=""then
session("tmp_usersessionid")=session.sessionid
end if%> 
<%if tcdy=1 then %>
<script language="javascript">
window.open('<%=tc%>','tcck','width=<%=tcw%>,height=<%=tch%>,top=0,left=0');
</script>
<%end if%>
</head>
<div align="center">
<TABLE id=table62 style="MARGIN: 0px auto; BORDER-BOTTOM: #ffffff 0px solid" 
height="100%" cellSpacing=0 borderColorDark=#FFFFFF cellPadding=0 width=976 
borderColorLight=#CECECE border=1>
  <TBODY>
  <TR><!--sart left-->
    <TD vAlign=top width=234>
      <TABLE id=table63 cellSpacing=0 cellPadding=0 width="100%" bgColor=#f1f1f1 
      border=0>
        <TBODY>
        <TR>
          <TD style="FONT-WEIGHT: bold; FONT-SIZE: 14px; COLOR: #666" 
          vAlign=center align=middle height=35>
			<img src="ima/i4.jpg" border="0" width="223" height="33"></TD></TR>
        <TR>
          <TD height=136>
			<p align="center"><!--#include file="top_login.asp"--></TD></TR><!---start messagebord-->
        <TR vAlign=top>
          <TD align=middle>
            <TABLE id=table65 cellSpacing=0 cellPadding=0 width=222 border=0>
              <TBODY>
              <TR>
                <TD width=222 background=ima/message_bord_top.gif 
                height=21></TD></TR>
              <TR>
                <TD 
                style="PADDING-LEFT: 15px; FONT-WEIGHT: bold; COLOR: #ffffff; PADDING-TOP: 15px" 
                vAlign=top align=left background=ima/message_bord_bg.gif>
                  <TABLE id=table66 cellSpacing=0 cellPadding=0 width=200 
border=0>
                    <TBODY>
                    <TR>
                      <TD class=promotion_link> 
                 <marquee direction="up" width="199" height="126"  scrollamount="2" id=info onMouseOver=info.stop() onMouseOut=info.start() style="color: #FFFF00" >
                              <%=gonggao%> </marquee></TD>
                    </TBODY></TABLE><BR></TD></TR>
              <TR>
                <TD width=222 background=ima/message_bord_bottom.gif 
                height=6></TD></TR></TBODY></TABLE></TD></TR><!--end messagebord-->
        <TR>
          <!---start hot sale-->
        <TR vAlign=bottom>
          <TD align=middle>
            <TABLE id=table67 cellSpacing=0 cellPadding=0 width=223 border=0>
              <TBODY>
              <TR>
                <TD><a href="zhuanti.asp">
				<IMG  src="ima/l2.jpg" border="0" 
              ></a></TD></TR>
              <TR>
                <TD>
                  <TABLE id=table68 height=217 cellSpacing=0 cellPadding=0 
                  width=223 border=0>
                    <TBODY>
                    <TR>
                      <TD bgColor=#efc0b0 height=8></TD></TR>
                    <TR>
                      <TD width=100% bgColor=#efc0b0 height=212> 
                  <table width="100%" height="220" border="0" cellspacing="0" ce??llpadding="0" id="table147">
                    <tr> 
                      <td height="220" align="left" valign="top"> 
                        <%
				set rs=server.createobject("adodb.recordset")
		rs.open "select Top 10 * From shop_zhuanti  order by newsid desc",conn,1,1
		if rs.recordcount=0 then 
		%>
                        <table width="80%" border="0" cellspacing="0" cellpadding="5" align="center" id="table148">
                          <tr> 
                            <td height="26" align=center>暂无商品专题</td>
                          </tr>
                        </table>
                        <%else%>
                        <table width="100%" border="0" cellspacing="0" cellpadding="0" id="table149">
                        </table>
                        <table width="90%" border="0" align="center" cellpadding="0" cellspacing="0" id="table150">
                          <%
			while not rs.eof
			%>
                          <tr onmouseover="this.bgColor='#CEB6E6';this.style.color='#000000';" style="CURSOR: hand; COLOR: #000000"  onmouseout="this.bgColor='EFC0B0';this.style.color='#000000';" bgColor="#EFC0B0" name="852753" > 
                            <td height="22">
							<img border="0" src="ye_news.gif" width="17" height="13"><a href=listzt.asp?id=<%=rs("newsid")%> title=<%=year(rs("UpdateTime"))%>年<%=month(rs("UpdateTime"))%>月<%=day(rs("UpdateTime"))%>日发布>
							  <%if len(trim(rs("title")))>16 then
	response.write left(trim(rs("title")),16)&""
	else
	response.write trim(rs("title"))
	end if%>
                              </a></td>
                          </tr>
                          <%
			rs.movenext
		    wend
			%>
                        </table>
                        <%
		end if
		rs.close
		set rs=nothing
		%>
                      </td>
                    </tr>
                  </table></TD>
                      </TR>
                    </TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR><!--end hot sale-->
        <TR>
          <TD height=2></TD></TR><!---start pinglun-->
        <TR bgColor=#c60a09 height="100%">
          <TD bgColor=#F1F1F1 height="50%">
            <p align="center">
            <img border="0" src="ima/i1.jpg" width="223" height="33"></font> 
<TABLE width="98%" align="center" cellPadding=0 cellSpacing=0>
  <TBODY>
    <TR> 
      <TD height=20 bgcolor="#FFFFFF"><table width="100%" border="0" cellspacing="0" cellpadding="0" height="5">
          <tr> 
            <td height="10"></td>
          </tr>
        </table>
        <table width="90%" border="0" align="center" cellSpacing="0">
          <tr> 
            <td height="23"> 
              <%
		  
		  '二次查讯大类
		  set rs=server.CreateObject("adodb.recordset")
		  rs.open "select anclass,anclassid,sztys from shop_anclass order by anclassidorder",conn,1,1
		  do while not rs.eof
		   response.write "<IMG height=9 src=images/Forum_nav.gif width=9 border=0>&nbsp;&nbsp;<A href=class.asp?lx=big&anid="&rs("anclassid")&" class=top><font color="&trim(rs("sztys"))&"><b>"&trim(rs("anclass"))&"</b></font></a>&nbsp;&nbsp;<br><br>"
			
			'//查讯小类
			
			set rs2=server.CreateObject("adodb.recordset")
			rs2.open "select nclass,nclassid,xsztys from shop_nclass where anclassid="&rs("anclassid")&" order by nclassidorder",conn,1,1
			do while not rs2.eof
			response.write "<A href=class.asp?lx=small&anid="&rs("anclassid")&"&nid="&rs2("nclassid")&"><font color="&trim(rs2("xsztys"))&">"&trim(rs2("nclass"))&"</font></A>  " 
             rs2.movenext
			 loop
			 rs2.close
			 set rs2=nothing
			 response.write "<br><br>"
			rs.movenext
			'ii=ii+1
			loop
				rs.close
				set rs=nothing%>
            </td>
          </tr>
        </table>
        <table width="100%" border="0" cellspacing="0" cellpadding="0" height="5">
          <tr> 
            <td height="10"></td>
          </tr>
        </table></TD>
    </TR>
  </TBODY>
</TABLE>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td bgcolor="#F1F1F1">
	<p align="center"><img src="images/block.gif" width="1" height="1"><img border="0" src="ima/i3.jpg" width="223" height="33"> 
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
  <%set rs=server.CreateObject("adodb.recordset")
		  rs.open "select top 8 shopid,shopname,chengjiaocount from shop_snsn order by chengjiaocount desc",conn,1,1%>
      <%i=0
			  do while not rs.eof%><tr onmouseover="this.bgColor='#C5E5F6';this.style.color='#000000';" style="CURSOR: hand; COLOR: #000000"  onmouseout="this.bgColor='ffffff';this.style.color='#000000';" bgColor="#ffffff" name="852753"> 
    <td width="100%" height="23" > 
      <%response.write "&nbsp;<img src=ye_news.gif border=0>  <a href=list.asp?id="&rs("shopid")&" title=此商品已成功销售"&rs("chengjiaocount")&"次><font color="&flxshph&">"
				if len(trim(rs("shopname")))>25 then
				response.write left(trim(rs("shopname")),25)&".."
				else
				response.write trim(rs("shopname"))
				end if
				response.write "</font></a><br>"
				%>
    </td>
  </tr><%i=i+1
			  if i>=8 then exit do
			  rs.movenext
			  loop
			  rs.close
			  set rs=nothing%>
</table></td>
  </tr>
</table>
</TD></TR>
        <TR bgColor=#c60a09 height="100%">
          <TD bgColor=#F1F1F1 height="50%">
            　</TD></TR><!--end pinglun--></TBODY></TABLE></TD><!---end left--><!--start right-->
    <TD vAlign=top align=middle width=736>
      <TABLE id=table73 cellSpacing=0 cellPadding=0 width="98%" border=0>
        <TBODY>
        <TR>
          <TD><!--start category-->
            <!--end category--></TD></TR>
        <TR>
          <TD>
            <TABLE height=308 cellSpacing=0 cellPadding=0 width=724 border=0 id="table83">
              <TBODY>
              <TR>
                <TD vAlign=top height=308>
                                    					
								<IFRAME name=I1 marginWidth=15 
            src="gg.htm" frameBorder=0 width="724" scrolling=no 
            height=298></IFRAME>
					
					</TD></TR>
              </TBODY></TABLE></TD></TR>
        <!--start content-->
        <TR>
          <TD>
            <TABLE id=table86 cellSpacing=0 cellPadding=0 width="100%" 
              border=0><TBODY>
              <TR>
                <TD width="100%" colspan="2">
                  <TABLE id=table131 cellSpacing=0 cellPadding=0 width="100%" 
                  border=0>
                    <TBODY>
                    <TR>
                      <TD align=left width="88%">
						<IMG src="ima/peishi_pictitle.gif" 
                        border=0></TD>
                      </TR>
                    <TR>
                      <TD>
                        <TABLE id=table132 
                        style="BORDER-RIGHT: #cccccc 1px solid; BORDER-TOP: #cccccc 1px solid; BORDER-LEFT: #cccccc 1px solid; BORDER-BOTTOM: #cccccc 1px solid" 
                        cellSpacing=0 cellPadding=0 width="100%" border=0>
                          <TBODY>
                          <TR>
                            <TD class=channal_pro 
                            style="PADDING-LEFT: 5px; PADDING-TOP: 10px" 
                            vAlign=top align=left>
                  <table width="100%" height="250" border="0" cellpadding="0" cellspacing="0" id="table133">
                    <tr> 
                      <td>
						<div align="center">
						<table width="100%" height="110" cellspacing='5' id="table134">
                          <tr> 
                            <td align='center' valign='top'> 
							<table border=0 cellpadding=0 cellspacing=0 width="100%" id="table135">
                                <tr> 
                                  <%
set rs=server.createobject("adodb.recordset")
i=0 
MaxShangpinList=12

rs.open "select  * from shop_snsn where newsshop=1 order by shopid desc",conn,1,1
%>
                                  <%
do while not rs.eof
	i=i+1
%>
                                  <td align=center valign=middle width="720">
									<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table136">
										<tr>
											<td width="100">
											<table width="100" height="100" border="0" cellpadding="0" cellspacing="0" id="table137">
                                      <tr> 
                                        <td align="center" valign="middle"> 
                                          <a href=list.asp?id=<%=rs("shopid")%> <%if rs("sftc")="" then%><%else%> target=<%=rs("sftc")%><%end if%>> 
                                          <%if rs("shoppic")="" then 
	response.write "<div align=center><a href=list.asp?id="&rs("shopid")&" ><img src=images/emptyshop.gif width=85 height=85 border=0></a></div>"
	else
    response.write "<img src="&rs("shoppic")&" alt="&rs("shopname")&"  width=85 height=85 border=0>"
    end if%></a></td>
                                      </tr>
                                    </table></td>
											<td>
											<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table138">
												<tr>
													<td><a href=list.asp?id=<%=rs("shopid")%>>
		<b><font color="#9971d1"><%=trim(rs("shopname"))%></font></b></a></td>
												</tr>
												<tr>
													<td><font color="#68A30D">
													<b>市场价：<s><%=trim(rs("shichangjia"))%>元</s></b></font> </td>
												</tr>
												<tr>
													<td><font color="#008000">
													<b>会员价：<%=trim(rs("huiyuanjia"))%>元</b></font> </td>
												</tr>
												<tr>
													<td>
													<a href="gouwu.asp?action=show">
													<img border="0" src="images/gm.gif"></a><a href="shoucang.asp?action=show"><img border="0" src="images/shc.gif"></a></td>
												</tr>
											</table>
											</td>
										</tr>
									</table>
									</td>
                                     <%
		if (i mod 3=0) and i>=3 then
%>
</tr>
                  <tr> 
<%end if%>
                                  <%
	if (i mod (MaxShangpinList/3)=0) and i>=(MaxShangpinList/3) then
%>
                                  <%
	end if
	if i>=MaxShangpinList then exit do
rs.movenext
loop
%>
                                </tr>
                              </table></td>
                          </tr>
                        </table>
                        </div>
                        </td>
                    </tr>
                  </table></TD>
                            </TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD>
                </TR><!--end line1-->
              <!--line2-->
              <TR>
                <TD width="50%">
                  　</TD>
                <TD width="50%">
                  　</TD></TR>
              <TR>
                <TD width="100%" colspan="2">
                  <TABLE id=table140 cellSpacing=0 cellPadding=0 width="100%" 
                  border=0>
                    <TBODY>
                    <TR>
                      <TD align=left width="85%">
						<IMG src="ima/tehui_pictitle.gif" 
                        border=0></TD>
                      </TR>
                    <TR>
                      <TD>
                        <TABLE id=table141 
                        style="BORDER-RIGHT: #cccccc 1px solid; BORDER-TOP: #cccccc 1px solid; BORDER-LEFT: #cccccc 1px solid; BORDER-BOTTOM: #cccccc 1px solid" 
                        cellSpacing=0 cellPadding=0 width="100%" border=0>
                          <TBODY>
                          <TR>
                            <TD vAlign=top align=left> 
                  <table width="100%" height="110" align='center' cellspacing='5' id="table142">
                    <tr> 
                      <td align='center' valign='top'> 
						<table border=0 cellpadding=0 cellspacing=0 width=100% id="table143">
                          <tr> 
                            <%
set rs=server.createobject("adodb.recordset")
i=0 
MaxShangpinList=12

rs.open "select * from shop_snsn where tejiashop=1 order by sx desc",conn,1,1
%>
                            <%
do while not rs.eof
	i=i+1
%>
                            <td align=center valign=middle>
							<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table144">
								<tr>
									<td width="103">
									<table width="100" border="0" cellpadding="0" cellspacing="0" id="table145">
                                <tr> 
                                  <td height="100" align="center" valign="middle"> 
                                    <a href=list.asp?id=<%=rs("shopid")%> <%if rs("sftc")="" then%><%else%> target=<%=rs("sftc")%><%end if%>> 
                                    <%if rs("shoppic")="" then 
	response.write "<img src=images/emptyshop.gif alt="&rs("shopname")&"  width=85 height=85 border=0>"
	else
    response.write "<img src="&rs("shoppic")&" alt="&rs("shopname")&"  width=85 height=85 border=0>"
    end if%></a></td>
                                </tr>
                                                            </table></td>
									<td>
									<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table146">
										<tr>
											<td><a href=list.asp?id=<%=rs("shopid")%>>
		<b><font color="#F30004"><%=trim(rs("shopname"))%></font></b></td>
										</tr>
										<tr>
											<td><font color="#FF9900"><b>市场价：<s><%=trim(rs("shichangjia"))%>元</s></b></font> </td>
										</tr>
										<tr>
											<td><font color="#FF6600"><b>会员价：<%=trim(rs("huiyuanjia"))%>元</b></font> </td>
										</tr>
										<tr>
													<td>
													<a href="gouwu.asp?action=show">
													<img border="0" src="images/gm.gif"></a><a href="shoucang.asp?action=show"><img border="0" src="images/shc.gif"></a></td>
												</tr>
									</table>
									</td>
								</tr>
							</table>
							</td>
                               <%
		if (i mod 3=0) and i>=3 then
%>
</tr>
                  <tr> 
<%end if%>

                            <%
	if (i mod (MaxShangpinList/12)=0) and i>=(MaxShangpinList/12) then
%>
                            <%
	end if
	if i>=MaxShangpinList then exit do
rs.movenext
loop
%>
                          </tr>
                        </table></td>
                    </tr>
                  </table></TD>
                            </TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD>
                </TR><!--end line2-->
              <!--star line3-->
              <!--end line3-->
              <!--start line4-->
              <!--end line4-->
              	</TBODY></TABLE></TD></TR><!--end content--></TBODY></TABLE></TD></TR></TBODY></TABLE>

</div>

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