<!--
商易仿淘宝4.0(多用户)
ACCESS版演示网站：http://www.ftaobao.com(商易仿淘宝商城)
SQL版演示网站：http://sql.ftaobao.com
电话：0571-56907100
QQ：1147100
-->
<!--#include file="include/conn.asp"-->
<!--#include file="include/config.asp"-->
<!--#include file="FFunction.asp"-->
<% IsShowChannel=true
   IsShowHotKey= false
%>
<style type="text/css" media="screen">
	@import url("css/v1.2.php@t=2006512.css");
	@import url("css/component.php@t=2006512.css");
</style>

<!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">
<style type="text/css">
<!--
.STYLE2 {color: #FFFFFF}
-->
</style>
<head>
<title><%=my_name%>--女人</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta name="description" content=""/>
<meta name="keywords" content="" />
<link rel="icon" href="pics/favicon.ico" type="image/x-icon" />
<link rel="shortcut icon" href="/csspic/favicon.ico" type="image/x-icon" />

</head>
<body class="CurLady" >
<div id="Head">

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

<div id="Content" class="">
<a name="main"></a>
<style type="text/css" media="screen">
@import url("/css/lady.css");
</style>
<base target="_blank" />
<a name="top" id="top"></a>
<!--#include file="FHeadAll.asp"-->
<br>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td colspan="7"><div align="center"><%Response.Write "<table width=760 align=center cellpadding=0 cellspacing=0><tr><td>"
set banner1= conn.execute("select top 1 * from ad where adtype1=9 and show=1 order by date desc")
if not banner1.eof then
if banner1("adtype")=2 then
Response.Write("<embed src=user/images/gg/"&banner1("imageurl")&" border=0>")
else
Response.Write("<div align=center><a href=../click.asp?id="&banner1("id")&" target=_blank onFocus=this.blur()><img src=../user/images/gg/"&banner1("imageurl")&" border=0></a></div>")
end if
end if
banner1.close
set banner1=nothing
Response.Write "</td></tr></table>"
%>
</div></td>
    </tr>
</table>
<table summary="layout" width="760" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="10"></td>
  </tr>
</table>
<table summary="layout" width="760" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="180" height="220" valign="top" bgcolor="f5f5f5"><table width="180" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td><img src="pics/2k6/chl/v1/lady/lady_060303_top.gif" width="180" height="5" /></td>
      </tr>
      <tr>
        <td height="160" background="pics/2k6/chl/v1/lady/lady_060303_center.gif"><table width="150" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td height="42" align="center"><a href="user/reg.asp"><img src="pics/2k6/chl/v1/lady/lady_060303_regist.gif" width="134" height="35" border="0" /></a></td>
          </tr>
          <tr>
            <td height="42" align="center"><a href="user/shop.asp" target="_blank"><img src="pics/2k6/chl/v1/lady/lady_060303_free.gif" width="134" height="35" border="0" /></a></td>
          </tr>
          <tr>
            <td align="center"><table width="150" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td height="20" align="center"><img src="pics/2k6/chl/v1/lady/lady_060303_ico.gif" width="2" height="3" align="absmiddle" />&nbsp;&nbsp;<a href="gwznindex.asp" target="_blank">安全购物锦囊</a></td>
              </tr>
              <tr>
                <td height="20" align="center"><img src="pics/2k6/chl/v1/lady/lady_060303_ico.gif" width="2" height="3" align="absmiddle" />&nbsp;&nbsp;<a href="gwznindex.asp" target="_blank">开店创业指南</a></td>
              </tr>
            </table></td>
          </tr>
          <tr>
            <td height="42" align="center"><a href="https://www.alipay.com/" target="_blank"><img src="pics/2k6/chl/v1/lady/lady_060303_alipay.gif" width="134" height="36" border="0" /></a></td>
          </tr>
        </table></td>
      </tr>
      <tr>
        <td><img src="pics/2k6/chl/v1/lady/lady_060303_bottom.gif" width="180" height="5" /></td>
      </tr>
    </table>
        <table width="180" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td height="7"></td>
          </tr>
        </table>
      <a href="productlist.asp?lx=0&amp;key=女鞋" target="_blank"><img src="pics/2k6/chl/v1/lady/lady_060510_180x42.gif" width="180" height="42" border="0" /></a></td>
    <td width="10">&nbsp;</td>
    <td style="border-right:1px solid #EFA9CD;border-bottom:1px solid #EFA9CD;border-left:1px solid #EFA9CD;border-top:1px solid #EFA9CD;"><table width="200" height="200" border="0" align="center" cellpadding="0" cellspacing="0">
      <tr>
        <td><%
set yige=server.createobject("adodb.recordset")
sql="select top 1 chanpin.id,chanpin.mc,chanpin.zt from chanpin left join lb on chanpin.lbid=lb.lbid where lb.topic='女人' and chanpin.tui=0 order by chanpin.rq desc"
yige.open sql,conn,1,1
if yige.eof then
response.write "没有数据"
else
%>
              <a href="merchandise.asp?id=<%=encode(yige("id")) %>" target="_blank"><img src="user/images/rikeeupimages/<%=yige("zt")%>" width="200" height="200" hspace="4" border="0" /></a>
              <%
end if
yige.close
set yige=nothing
%></td>
      </tr>
    </table></td>
    <td width="157" valign="top" bgcolor="#FAE5F0" style="border-right:1px solid #EFA9CD;border-bottom:1px solid #EFA9CD;border-top:1px solid #EFA9CD;"><table width="150" border="0" align="center" cellpadding="0" cellspacing="0" summary="layout">
      <tr>
        <td width="149" height="125" align="center" valign="middle"style="border-bottom:2px solid #FFFFFF;" ><span class="LM"><span class="LL"><br />
              <%
set ydrs=server.createobject("adodb.recordset")
sql="select top 1 chanpin.id,chanpin.mc,chanpin.zt from chanpin left join lb on chanpin.lbid=lb.lbid where lb.topic='女人' and chanpin.tui=0 order by chanpin.tuijian desc,chanpin.sj desc,chanpin.id desc"
ydrs.open sql,conn,1,1
if not ydrs.eof then

%>
          <a href="merchandise.asp?id=<%=encode(ydrs("id"))%>" target="_blank"><img src="user/images/rikeeupimages/<%=ydrs("zt")%>" width="100" height="100" hspace="4" border="0" /></a></td>
      </tr>
      <%
ydrs.close
set ydrs=nothing
else
response.write "没有数据"
end if
%>
      <tr>
        <td height="110" valign="top" class="LM"><table border="0" align="left" cellpadding="0" cellspacing="1">
          <%
set ydrs=server.createobject("adodb.recordset")
sql="select top 8 chanpin.id,chanpin.mc,chanpin.zt from chanpin left join lb on chanpin.lbid=lb.lbid where lb.topic='女人' and chanpin.tui=0 order by chanpin.tuijian desc,chanpin.sj desc,chanpin.id desc"
ydrs.open sql,conn,1,1
if not ydrs.eof then
%>
          <% do while not ydrs.eof%>
          <tr>
            <td><li><a href="merchandise.asp?id=<%=encode(ydrs("id"))%>" target="_blank"><%=InterceptString(ydrs("mc"),20)%></a></li></td>
          </tr>
          <%
ydrs.movenext
loop
ydrs.close
set ydrs=nothing
else
response.write "没有数据"
end if
%>
        </table>
              <span class="LL"><br />
            </span></td>
      </tr>
    </table></td>
    <td width="157" align="center" valign="top" bgcolor="#FAE5F0" style="border-right:1px solid #EFA9CD;border-bottom:1px solid #EFA9CD;border-top:1px solid #EFA9CD;"><table width="152" height="235" border="0" align="center" cellpadding="0" cellspacing="0" summary="layout">
      <tr>
        <td width="154" height="126" align="center" valign="middle"style="border-bottom:2px solid #FFFFFF;" ><span class="lM"><span class="LM"><span class="LL"><br />
              <%
set ydrs=server.createobject("adodb.recordset")
sql="select top 1 chanpin.id,chanpin.mc,chanpin.zt from chanpin left join lb on chanpin.lbid=lb.lbid where lb.topic='女人' and chanpin.tui=0 order by chanpin.rq desc,chanpin.id desc"
ydrs.open sql,conn,1,1
if not ydrs.eof then

%>
          <a href="merchandise.asp?id=<%=encode(ydrs("id")) %>" target="_blank"><img src="user/images/rikeeupimages/<%=ydrs("zt")%>" width="100" height="100" hspace="4" border="0" /></a></td>
      </tr>
      <%
ydrs.close
set ydrs=nothing
else
response.write "没有数据"
end if
%>
      <tr>
        <td height="109" valign="top"class="lM"><table border="0" align="left" cellpadding="0" cellspacing="1">
          <%
set ydrs=server.createobject("adodb.recordset")
sql="select top 8 chanpin.id,chanpin.mc,chanpin.zt from chanpin left join lb on chanpin.lbid=lb.lbid where lb.topic='女人' and chanpin.tui=0 order by chanpin.rq desc,chanpin.id desc"
ydrs.open sql,conn,1,1
if ydrs.eof then
response.write "没有数据"
else
%>
          <% do while not ydrs.eof%>
          <tr>
            <td><li><span class="LM"><a href="merchandise.asp?id=<%=encode(ydrs("id")) %>" target="_blank"><%=InterceptString(ydrs("mc"),20)%></a></span></li></td>
          </tr>
          <%
ydrs.movenext
loop
ydrs.close
set ydrs=nothing
end if
%>
        </table></td>
      </tr>
    </table></td>
  </tr>
</table>
<table width="760" height="4" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td></td>
  </tr>
</table>
<table width="760" border="1" align="center" cellpadding="5" cellspacing="1">
  <tr>
    <td height="95"><table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td><a href="productlist.asp?lx=0&amp;key=T恤"><img src="pics/2k6/chl/v1/lady/lady_060510_180x92_1.gif" width="180" height="92" border="0" /></a></td>
        <td><a href="productlist.asp?lx=0&amp;key=裤"><img src="pics/2k6/chl/v1/lady/lady_060510_180x92_2.gif" width="180" height="92" border="0" /></a></td>
        <td><a href="productlist.asp?lx=0&amp;key=眼霜"><img src="pics/2k6/chl/v1/lady/lady_060510_180x92_3.gif" width="180" height="92" border="0" /></a></td>
        <td><a href="productlist.asp?lx=0&amp;key=韩国"><img src="pics/2k6/chl/v1/lady/lady_060510_180x92_4.gif" width="180" height="92" border="0" /></a></td>
        </tr>
    </table></td>
    </tr>
</table>

          























<table width="760" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="f5f5f5">
  <tr>
    <td width="198" height="250" valign="top"><%dim sql,rs,xrs
	Sql="select top 4 lbid,lbname from lb where cang=0 and topic='女人' order by cp desc,lbid desc"
    set rs=server.createobject("adodb.recordset")
    rs.open Sql,conn,1,1
	if rs.eof then
	response.write "无类别"
	else
	do while not rs.eof
	response.write "<table><tr><td height=25 align='right' width=190 background='pics/2k6/chl/v1/lady/lady_20050721_116.gif'>&nbsp;<font color=#FFFFFF>"&rs(1)&"</font></span></td></tr>"
	   	set xrs = conn.execute("select top 4 xlbid,xlbname,cp from xlb where lbid="&rs("lbid")&" and cang=0 order by cp desc,xlbid")
		do while not xrs.eof
		response.write "<tr><td><a href=""ProductList.asp?lbid="&rs("lbid")&"&amp;xlbid="&xrs("xlbid")&"""><span class='whitefont'>"&xrs("xlbname") &"</span></a></td></tr>"
		xrs.movenext
		loop
		xrs.close
	response.write "<tr><td width=190 align='right'><a href=""ProductList.asp?lbid="&rs("lbid")&"""><span class='yellowfont'>更多……</span></a></td></tr></table>"
	rs.movenext
	loop
	rs.close
	end if
	%></td>
    <td valign="top" bgcolor="#FFFFFF"><br />
    <table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
      <tr>
          <td width="20%"><div align="center">
              <%	
			  Sql="select top 2 id,mc,xt,zt from chanpin where lbid=29 and tuijian=1 "
			  sql=sql+"order by id desc"
			  set rs=server.createobject("adodb.recordset")
		      rs.open Sql,conn,1,1
	    	if rs.eof then
			response.write "无该类产品"
			else
			do while not rs.eof
			response.write "<table><tr><td align='center'><a href=""merchandise.asp?id="&encode(rs("id"))&"""><img src='user/images/rikeeupimages/"&rs("xt")&"' width='100' height='100'><br><br>"&InterceptString(rs("mc"),15)&"</a></td></tr></table>"
			rs.movenext
			loop
			end if
			rs.close
			  %>
          </div></td>
          <td width="20%"><div align="center">
              <%	
			  Sql="select top 2 id,mc,xt,zt from chanpin where lbid=30 and tuijian=1 "
			  sql=sql+"order by id desc"
			  set rs=server.createobject("adodb.recordset")
		      rs.open Sql,conn,1,1
	    	if rs.eof then
			response.write "无该类产品"
			else
			do while not rs.eof
			response.write "<table><tr><td align='center'><a href=""merchandise.asp?id="&encode(rs("id"))&"""><img src='user/images/rikeeupimages/"&rs("xt")&"' width='100' height='100'><br><br>"&InterceptString(rs("mc"),15)&"</a></td></tr></table>"
			rs.movenext
			loop
			end if
			rs.close
			  %>
          </div></td>
          <td width="20%"><div align="center">
              <%	
			  Sql="select top 2 id,mc,xt,zt from chanpin where lbid=31 and tuijian=1 "
			  sql=sql+"order by id desc"
			  set rs=server.createobject("adodb.recordset")
		      rs.open Sql,conn,1,1
	    	if rs.eof then
			response.write "无该类产品"
			else
			do while not rs.eof
			response.write "<table><tr><td align='center'><a href=""merchandise.asp?id="&encode(rs("id"))&"""><img src='user/images/rikeeupimages/"&rs("xt")&"' width='100' height='100'><br><br>"&InterceptString(rs("mc"),15)&"</a></td></tr></table>"
			rs.movenext
			loop
			end if
			rs.close
			'商易仿淘宝4.0.1演示地址
'http://www.ftaobao.com
%>
          </div></td>
          <td width="20%"><div align="center">
              <%	
			  Sql="select top 2 id,mc,xt,zt from chanpin where lbid=32 and tuijian=1 "
			  sql=sql+"order by id desc"
			  set rs=server.createobject("adodb.recordset")
		      rs.open Sql,conn,1,1
	    	if rs.eof then
			response.write "无该类产品"
			else
			do while not rs.eof
			response.write "<table><tr><td align='center'><a href=""merchandise.asp?id="&encode(rs("id"))&"""><img src='user/images/rikeeupimages/"&rs("xt")&"' width='100' height='100'><br><br>"&InterceptString(rs("mc"),15)&"</a></td></tr></table>"
			rs.movenext
			loop
			end if
			rs.close
			  %></div></td>
          <td width="20%"><div align="center">
              <%	
			  Sql="select top 2 id,mc,xt,zt from chanpin where lbid=36 and tuijian=1 "
			  sql=sql+"order by id desc"
			  set rs=server.createobject("adodb.recordset")
		      rs.open Sql,conn,1,1
	    	if rs.eof then
			response.write "无该类产品"
			else
			do while not rs.eof
			response.write "<table><tr><td align='center'><a href=""merchandise.asp?id="&encode(rs("id"))&"""><img src='user/images/rikeeupimages/"&rs("xt")&"' width='100' height='100'><br><br>"&InterceptString(rs("mc"),15)&"</a></td></tr></table>"
			rs.movenext
			loop
			end if
			rs.close
			  %>
          </div></td>
        </tr>
      </table>
      <br />
        <table width="98%" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#E4E4E4">
        <%
set ydrs=server.createobject("adodb.recordset")
sql="select top 5 chanpin.id,chanpin.mc,chanpin.zt from chanpin left join lb on chanpin.lbid=lb.lbid where lb.topic='女人' and chanpin.tui=0 order by chanpin.rq desc,chanpin.sj desc,chanpin.id"
ydrs.open sql,conn,1,1
if ydrs.eof then
response.write "没有数据"
else
%>
          <tr>
            <% do while not ydrs.eof
%>
            <td bgcolor="f5f5f5"><div align="center"><a href="merchandise.asp?id=<%=encode(ydrs("id")) %>" target="_blank"><img src="user/images/rikeeupimages/<%=ydrs("zt")%>" width="100" height="100" hspace="4" border="0" /></a></div></td>
            <%
ydrs.movenext
loop
ydrs.close
set ydrs=nothing
end if
%>
          </tr>
        </table>    
        <table width="100%" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td><table width="100%" height="70" border="0" cellpadding="0" cellspacing="0" bgcolor="#efefef">
                  <tr>
            <td height="25" colspan="2"><img src="pics/2k6/chl/v1/lady/lady_left_category.gif" width="279" height="28" /></td>
            </tr>
          <tr> <%
set shoprs = conn.execute("select top 8 id,name,lbid from shop where lbid in (select lbid from lb where cang=0 and topic='女人') order by sj2 desc,id desc")
if shoprs.eof then
%>

            <td width="40%" align="center"><a href='sort.asp' target="_blank" title="店铺"><br />
              <img src='pics/2k6/chl/v1/lady/lady_060418_98x119_1.jpg' width="98" height="119" border="0" alt='店铺' style='border:#5D905D 1px solid;' /></a> </td>
            <td width="160"></td>
          </tr>
          <%
else
%>
          <tr>
            <td width="40%" align="center"><a href='sort.asp' target="_blank" title="店铺"><br />
              <img src='pics/2k6/chl/v1/lady/lady_060418_98x119_1.jpg' width="98" height="119" border="0" alt='店铺' style='border:#5D905D 1px solid;' /></a> </td>
            <td ><%
		do while not shoprs.eof


		response.write "<img src='pics/2k6/chl/v1/culture/culture_060417_categry_5.gif'> &nbsp;&nbsp;<a href=""shop/1/myshop.asp?shopid="&shoprs("id")&""" title="&shoprs("name")&"><span class='whitefont'>"&InterceptString(shoprs("name"),20) &"</span></a></li><br>"


		shoprs.movenext
		loop
		
		shoprs.close
		set shoprs=nothing

	%>            </td>
          </tr>
          <%end if%>
        </table></td>
        <td width="50%"><table width="100%" height="70" border="0" cellpadding="0" cellspacing="0" bgcolor="#efefef">
                   <tr>
                     <td height="25" colspan="2"><img src="pics/2k6/chl/v1/lady/lady_left_category1.gif" width="279" height="28" /></td>
                   </tr> <%
set shoprs = conn.execute("select top 8 id,name,tuijian_shop,lbid from shop where lbid in (select lbid from lb where cang=0 and topic='女人') and tuijian_shop<>0 order by tuijian_shop desc,id desc")
if shoprs.eof then
%>

          <tr>
            <td width="40%" align="center"><a href='sort.asp' target="_blank" title="店铺"><br />
              <img src='pics/2k6/chl/v1/lady/lady_060418_760x150_1.gif' width="98" height="119" border="0" alt='店铺' style='border:#5D905D 1px solid;' /></a> </td>
            <td></td>
          </tr>
          <%
else
%>
          <tr>
            <td width="40%" align="center"><a href='sort.asp' target="_blank" title="店铺"><br />
              <img src='pics/2k6/chl/v1/lady/lady_060418_760x150_1.gif' width="98" height="119" border="0" alt='店铺' style='border:#5D905D 1px solid;' /></a> </td>
            <td ><%
		do while not shoprs.eof


		response.write "<img src='pics/2k6/chl/v1/culture/culture_060417_categry_5.gif'> &nbsp;&nbsp;<a href=""shop/1/myshop.asp?shopid="&shoprs("id")&""" title="&shoprs("name")&"><span class='whitefont'>"&InterceptString(shoprs("name"),20) &"</span></a></li><br>"


		shoprs.movenext
		loop
		
		shoprs.close
		set shoprs=nothing

	%>            </td>
          </tr>
          <%end if%>
        </table></td>
      </tr>
    </table>
    </table>
</td>
    
    </tr>
</table>


</div>
</div>

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