<%
'商易仿淘宝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
%>
<!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">
<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="pics/favicon.ico" type="image/x-icon" />
<style type="text/css" media="screen">
	@import url("css/v1.2.php@t=2006512.css");
	@import url("css/component.php@t=2006512.css");
</style>
</head>
<body class="CurCulture" >
<!--#include file="FHeadAll.asp"-->


<div class="HackBox"></div>
<div id="Content" class="">
<a name="main"></a>

<base target="_blank" />
<div align="center">
  <table width="764" border="0" cellspacing="0" cellpadding="0">
    <tr>
      <th width="4" scope="col"></th>
      <th scope="col"><%Response.Write "<table width=760 align=center cellpadding=0 cellspacing=0><tr><td>"
set banner1= conn.execute("select top 1 * from ad where adtype1=12 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
else
Response.Write"还没有广告数据"
end if
banner1.close
set banner1=nothing
Response.Write "</td></tr></table>"
%></th>
    </tr>
  </table>

 </div>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="5"></td>
  </tr>
</table>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="180" height="160" valign="top" background="pics/2k6/chl/v1/lady/lady_060303_center.gif"><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="http://www.alipay.com/"><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></td>
    <td width="10" rowspan="2"></td>
    <td width="570" rowspan="2" valign="top"><table width="570" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td><table width="570" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="340"><a href="ProductList.asp?lbid=18"><img src="pics/2k5/chl/v1/culture/111.gif" width="340" border="0" /></a></td>
                <td width="5"></td>
                <td width="225" background="pics/2k6/chl/v1/culture/060421_culture_01.jpg"><table width="225" border="0" cellspacing="0" cellpadding="0" id="CommendSeller">
                    <tr>
                      <td width="225" height="35"></td>
                    </tr>
                    <tr>
                      <td width="225" height="143" valign="top"><table width="217" border="0" cellspacing="6" cellpadding="0">
<%

set ydrs=server.createobject("adodb.recordset")
sql="select top 4 chanpin.id,chanpin.mc,chanpin.xt from chanpin left join lb on chanpin.lbid=lb.lbid where lb.topic='书籍音像' and chanpin.tui=0 and chanpin.tuijian=1 and chanpin.cang=0 order by chanpin.sj desc,chanpin.rq desc,chanpin.id"
ydrs.open sql,conn,1,1
if ydrs.eof then
%>
<tr><td align="center"  width="100%"  >没有数据</td></tr>
<%
else
do while not ydrs.eof
%>
<tr><td height="28">&nbsp;<font color="white">·</font>&nbsp;<a href=" merchandise.asp?id=<%=encode(ydrs("id")) %>" target="_blank" title=<%=ydrs("mc")%>><%=InterceptString(ydrs("mc"),26)%></a></td></tr>
<%
ydrs.movenext
loop
ydrs.close
set ydrs=nothing
end if
%>

                        </table></td>
                    </tr>
                  </table></td>
              </tr>
            </table></td>
        </tr>
        <tr>
          <td></td>
        </tr>
        <tr>
          <td><table width="570" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td><img src="pics/2k6/chl/v1/culture/culture_051231_book_15.gif" alt="" /></td>
              </tr>
              <tr>
                <td background="pics/2k5/chl/v1/culture/culture_051108_music_di.gif"><table width="570" border="0" align="center" cellpadding="0" cellspacing="0">
                    <tr>
                      <td colspan="7"><img src="pics/2k6/chl/v1/culture/culture_051231_book_1.gif" width="570" height="11" alt="" /></td>
                    </tr>
                    <tr>
                      <td width="10" height="420" valign="top"><img src="pics/2k6/chl/v1/culture/culture_051231_book_2.gif" width="10" height="420" alt="" /></td>
                      <td width="212" height="418" background="pics/2k6/chl/v1/culture/culture_051231_book_b8.gif"><table width="212" border="0" cellspacing="0">
                          <tr>
                            <td height="255" valign="top"><table width="205" border="0" cellspacing="0"  class="style1">
                                <tr valign="top">
                                  <td class="title">[新书推荐]</td>
                                </tr>
                                <tr>
                                  <td><table width="100%" border="0" cellspacing="0" cellpadding="0">
                                    <tr>
<%
set newrs=server.createobject("adodb.recordset")
sql="select top 4 chanpin.id,chanpin.mc,chanpin.xt from chanpin left join lb on chanpin.lbid=lb.lbid where lb.topic='书籍音像' and chanpin.tui=0 and chanpin.cang=0 and chanpin.lbid=38 order by chanpin.sj desc,chanpin.id"
newrs.open sql,conn,1,1
if newrs.eof then
response.Write"<td>没有数据</td>"
else
ii=1
do while not newrs.eof
if ii=2 then
%>	
<td align="center"><a href=" merchandise.asp?id=<%=encode(newrs("id")) %>"  title=<%=newrs("mc")%>><img src="user/images/rikeeupimages/<%=newrs("xt")%>" width="87" height="87" border="0" style="margin-bottom:5px;"  /><br /><%=InterceptString(newrs("mc"),12)%></a></td><tr>
<%else%>

<td align="center"><a href=" merchandise.asp?id=<%=encode(newrs("id")) %>"  title=<%=newrs("mc")%>><img src="user/images/rikeeupimages/<%=newrs("xt")%>" width="87" height="87" border="0" style="margin-bottom:5px;"  /><br /><%=InterceptString(newrs("mc"),12)%></a></td>
<%
end if
newrs.movenext
ii=ii+1
loop
end if
newrs.close
set newrs=nothing
%>	

                                    </tr>
                                  </table>								  </td>
                                </tr>
                              </table></td>
                          </tr>
                          <tr>
                            <td height="160" valign="top"><table width="100" height="143" border="0" cellpadding="o" cellspacing="o">
                                <tr>
                                  <td class="title">[<a href="ProductList.asp?lbid=38&amp;xlbid=322&amp;slbid=2665">女性读物·服饰美容</a>]</td>
                                </tr>
                                <tr>
                                  <td height="127" valign="top"><table width="210" border="0" cellspacing="o" cellpadding="o" class="style1">
                                      <tr>
                                        <td valign="top"><ul style="margin-left:0px; margin-top:10px;line-height:16px;">



<%
set hwrs=server.createobject("adodb.recordset")
sql="select top 8 id,mc,xt from chanpin where lbid=38 and slbid=2665 and xlbid=322 and tui=0 and cang=0 order by sj desc,id"
hwrs.open sql,conn,1,1
if hwrs.eof then
response.write"没有数据"
else
do while not hwrs.eof

%>
<li><a href=" merchandise.asp?id=<%=encode(hwrs("id")) %>"  title=<%=hwrs("mc")%>><%=InterceptString(hwrs("mc"),18)%></a></li>
<%
hwrs.movenext
loop
hwrs.close
set hwrs=nothing
end if
%></td>
                                      </tr>
                                    </table></td>
                                </tr>
                              </table></td>
                          </tr>
                        </table></td>
                      <td valign="top"><img src="pics/2k6/chl/v1/culture/culture_051231_book_4.gif" width="2" height="418" alt="" /></td>
                      <td width="156" height="418" valign="top"><table width="156" height="418" border="0" cellspacing="0">
                          <tr>
                            <td  height="250" valign="top" background="pics/2k6/chl/v1/culture/culture_051231_book_b2.gif"><table width="74" border="0">
                                <tr>
                                  <td width="141"><span class="top">[人气TOP]</span></td>
                                </tr>
                                <tr>
                                  <td></td>
                                </tr>
                              </table>
                              <ul id="BookTop10">
                                
<%
set ydrs=server.createobject("adodb.recordset")
sql="select top 13 chanpin.id,chanpin.mc,chanpin.xt from chanpin left join lb on chanpin.lbid=lb.lbid where lb.topic='书籍音像' and chanpin.tui=0  and chanpin.lbid=38 order by chanpin.rq desc,chanpin.sj desc,chanpin.id"
ydrs.open sql,conn,1,1
if ydrs.eof then
response.write"没有数据"
else
do while not ydrs.eof
response.write"<li>&nbsp;&nbsp;<font color=white>·</font><a href=""merchandise.asp?id="&encode(ydrs("id"))&""" title="&ydrs("mc")&">"&InterceptString(ydrs("mc"),20)&"</li>"
ydrs.movenext
loop
ydrs.close
set ydrs=nothing
end if
%>
                             </ul>                              </td>
                          </tr>
                          <tr>
                            <td height="160" valign="top" background="pics/2k6/chl/v1/culture/culture_051231_book_b3.gif"><table width="149" height="132" border="0" cellpadding="0" cellspacing="o">
                                <tr>
                                  <td valign="baseline" class="title">[<a href="ProductList.asp?lbid=38&amp;xlbid=322&amp;slbid=2669">时尚生活</a>]</td>
                                </tr>
                                <tr>
                                  <td valign="top"><table width="150" border="0" cellspacing="o" cellpadding="o">
                                      <tr valign="top">
                                        <td class="style" style="margin-left:2px;margin-right:2px;"><ul id="row4" style="margin-left:0px; margin-top:12px;">



<%
set hwrs=server.createobject("adodb.recordset")
sql="select top 8 id,mc,xt from chanpin where lbid=38 and xlbid=322 and slbid=2669 and tui=0 and cang=0 order by sj desc,id"
hwrs.open sql,conn,1,1
if hwrs.eof then
response.write"没有数据"
else
do while not hwrs.eof

%>
<li><a href=" merchandise.asp?id=<%=encode(hwrs("id")) %>"  title=<%=hwrs("mc")%>><%=InterceptString(hwrs("mc"),18)%></a></li>
<%
hwrs.movenext
loop
hwrs.close
set hwrs=nothing
end if
%>



</ul>                                        </td>
                                      </tr>
                                    </table></td>
                                </tr>
                              </table></td>
                          </tr>
                        </table></td>
                      <td width="15" height="418" valign="top"><img src="pics/2k6/chl/v1/culture/culture_051231_book_6.gif" width="15" height="420" alt="" /></td>
                      <td width="166" valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
                          <tr>
                            <td height="183" valign="top" background="pics/2k6/chl/v1/culture/culture_051231_book_b7.gif"><div  style="margin-left:0px; margin-top:-2px;"><span class="title">[最新店铺]</span></div>
                              <div  style="margin-left:0px; margin-top:0px;">
                                <div><ul id="Culturebbs">
<%
set shoprs = conn.execute("select top 7 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
response.write"没有数据"
else
do while not shoprs.eof
response.write"<li>&nbsp;·<a href=""shop/1/myshop.asp?shopid="&shoprs("id")&""" title="&shoprs("name")&"><span class='whitefont'>"&InterceptString(shoprs("name"),20) &"</span></a></li>"
		shoprs.movenext
	
		loop
		end if 
		shoprs.close
		set shoprs=nothing
%>
								
								


</ul></div>                              </div>
                              <div style="margin-left:120px; margin-top:3px;"></div></td>
                          </tr>
                          <tr>
                            <td height="122" valign="middle" background="pics/2k6/chl/v1/culture/culture_051231_book_b6.gif"><table width="159" border="0" cellspacing="0" cellpadding="0">
                                <tr>
                                  <td colspan="2" class="title">[<a href="ProductList.asp?lbid=38&amp;xlbid=324">管理精品</a>]</td>
                                </tr>
                                <tr>
                                  <td width="64" height="80" valign="top"><a href="ProductList.asp?lbid=38&amp;xlbid=324" target="_blank"><img src="pics/2k6/chl/v1/culture/culture_060512_04.gif" width="64" height="78" border="0" /></a></td>
                                  <td  id="row1" width="95" valign="top"><ul id="row1" style="margin-left:0px; margin-top:0px; list-style:none;">
<%
set hwrs=server.createobject("adodb.recordset")
sql="select top 5 id,mc,xt from chanpin where lbid=38 and xlbid=324 and tui=0 and cang=0 order by sj desc,id desc"
hwrs.open sql,conn,1,1
if hwrs.eof then
response.write"没有数据"
else
do while not hwrs.eof

%>
<li>&nbsp;&nbsp;·<a href=" merchandise.asp?id=<%=encode(hwrs("id")) %>"  title=<%=hwrs("mc")%>><%=InterceptString(hwrs("mc"),12)%></a></li>
<%
hwrs.movenext
loop
hwrs.close
set hwrs=nothing
end if
%>

</ul></td>
                                </tr>
                              </table></td>
                          </tr>
                          <tr>
                            <td valign="top">&nbsp;</td>
                          </tr>
                        </table>
                        <table width="159" border="0" cellspacing="0" cellpadding="0">
                          <tr>
                            <td colspan="2" class="title">[<a href="ProductList.asp?lbid=38&xlbid=323">中外文学</a>]</td>
                          </tr>
                          <tr>
                            <td width="64" height="80" valign="top"><a href="ProductList.asp?lbid=38&xlbid=323" target="_blank"><img src="pics/2k6/chl/v1/culture/culture_060512_04.gif" width="64" height="78" border="0" /></a></td>
                            <td  id="row1" width="95" valign="top"><ul id="row1" style="margin-left:0px; margin-top:0px; list-style:none;">
                                <%
set hwrs=server.createobject("adodb.recordset")
sql="select top 5 id,mc,xt from chanpin where lbid=38 and xlbid=323 and tui=0 and cang=0 order by sj desc,id desc"
hwrs.open sql,conn,1,1
if hwrs.eof then
response.write"没有数据"
else
do while not hwrs.eof

%>
                                <li>&nbsp;&nbsp;·<a href=" merchandise.asp?id=<%=encode(hwrs("id")) %>"  title="<%=hwrs("mc")%>"><%=InterceptString(hwrs("mc"),12)%></a></li>
                              <%
hwrs.movenext
loop
hwrs.close
set hwrs=nothing
end if
%>
                            </ul></td>
                          </tr>
                        </table></td>
                      <td width="9" valign="top"><img src="pics/2k6/chl/v1/culture/culture_051231_book_8.gif" width="9" height="420" alt=""/></td>
                    </tr>
                    <tr valign="top">
                      <td colspan="7" height="10"><img src="pics/2k6/chl/v1/culture/culture_051231_book_9.gif" width="570" height="10" alt="" /></td>
                    </tr>
                  </table></td>
              </tr>
              <tr>
                <td height="8"></td>
              </tr>
            </table>		  </td>
        </tr>
        <tr>
          <td></td>
        </tr>
        <tr>
          <td><table width="570" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td><img src="pics/2k6/chl/v1/culture/culture_060214_01.gif" width="570" height="32" /></td>
              </tr>
              <tr>
                <td background="pics/2k5/chl/v1/culture/culture_051108_music_di.gif"><table width="570" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td width="6"></td>
                      <td width="407"><table width="402" border="0" cellspacing="0" cellpadding="0">
                          <tr>
                            <td width="402"><table width="402" border="0" cellspacing="0" cellpadding="0">
                                <tr>
                                  <td width="201" height="17" bgcolor="#FFFFFF" class="style15"><span style="color:#666666;font-weight:bold;font-size:13px;"><a href="ProductList.asp?lbid=42&amp;xlbid=354">音乐</a></span></td>
                                  <td width="201" bgcolor="#FFFFFF" class="style15"><span style="color:#666666;font-weight:bold;font-size:13px;"><a href="ProductList.asp?lbid=42&amp;xlbid=355">娱乐/演唱会门票</a></span></td>
                                </tr>
                                <tr>
                                  <td colspan="2"><table width="402" border="0" cellspacing="0" cellpadding="0">
                                      <tr>
                                        <td background="pics/2k5/chl/v1/culture/culture_051108_music_greend.gif" bgcolor="#FFFFFF" id="NewSpecial"><table width="402" border="0" cellspacing="0" cellpadding="0">
                                            <tr align="center" valign="middle">
                                              <td colspan="2" valign="middle"><div style="float:left; margin-top:10px;width:200px; font-size:12px;"><table border="0" cellspacing="0" cellpadding="0"><tr>
                 
<%
set hwrs=server.createobject("adodb.recordset")
sql="select top 4 id,mc,xt from chanpin where lbid=42 and xlbid=354 and tui=0 and cang=0 order by sj desc,id desc"
hwrs.open sql,conn,1,1
if hwrs.eof then
response.write"没有数据"
else
zz=1
do while not hwrs.eof
if zz=2 then
%>
<td align="center"><div style="float:left;clear:left;height:130px;width:100px;"><a href="merchandise.asp?id=<%=encode(hwrs("id")) %>" title="<%=hwrs("mc")%>"><img src="user/images/rikeeupimages/<%=hwrs("xt")%>" width="80" height="80"/><br /><%=InterceptString(hwrs("mc"),12)%></a></div></td></tr><tr>
<%else%>

<td align="center"><div style="float:left;clear:left;height:130px;width:100px;"><a href="merchandise.asp?id=<%=encode(hwrs("id")) %>" title="<%=hwrs("mc")%>"><img src="user/images/rikeeupimages/<%=hwrs("xt")%>" width="80" height="80"/><br /><%=InterceptString(hwrs("mc"),12)%></a></div></td>


<%
end if 
hwrs.movenext
zz=zz+1
loop
hwrs.close
set hwrs=nothing
end if
%>
		</tr></table>		 
				                             



                                                </div></td>
                                              <td colspan="2"><div style="float:left;margin-top:10px;width:200px;">
 
 <table border="0" cellspacing="0" cellpadding="0"><tr>
                 
<%
set hwrs=server.createobject("adodb.recordset")
sql="select top 4 id,mc,xt from chanpin where lbid=42 and xlbid=355 and tui=0 and cang=0 order by sj desc,id desc"
hwrs.open sql,conn,1,1
if hwrs.eof then
response.write"没有数据"
else
zz=1
do while not hwrs.eof
if zz=2 then
%>
<td align="center"><div style="float:left;clear:left;height:130px;width:100px;"><a href="merchandise.asp?id=<%=encode(hwrs("id")) %>" title="<%=hwrs("mc")%>"><img src="user/images/rikeeupimages/<%=hwrs("xt")%>" width="80" height="80"/><br /><%=InterceptString(hwrs("mc"),12)%></a></div></td></tr><tr>
<%else%>

<td align="center"><div style="float:left;clear:left;height:130px;width:100px;"><a href="merchandise.asp?id=<%=encode(hwrs("id")) %>" title="<%=hwrs("mc")%>"><img src="user/images/rikeeupimages/<%=hwrs("xt")%>" width="80" height="80"/><br /><%=InterceptString(hwrs("mc"),12)%></a></div></td>


<%
end if 
hwrs.movenext
zz=zz+1
loop
hwrs.close
set hwrs=nothing
end if
%>
		</tr></table>
 
 
                                                  
                                                </div></td>
                                            </tr>
                                          </table></td>
                                      </tr>
                                    </table></td>
                                </tr>
                              </table></td>
                          </tr>
                          <tr>
                            <td width="407" height="42" background="pics/2k5/chl/v1/culture/culture_051108_music_22.gif"><table width="402" border="0" cellspacing="0" cellpadding="0" class="HotKeyword">
                                <tr>
                                  <td width="402" height="21" valign="bottom">&nbsp; <span style="color:#ffffff;font-size:12px;" class="ClassTitle"><a href="ProductList.asp?lbid=42&amp;xlbid=357&amp;slbid=2959">欧美新品</a></span>&nbsp; 
								 
<%
set hwrs=server.createobject("adodb.recordset")
sql="select top 4 id,mc,xt from chanpin where lbid=42 and xlbid=357 and slbid=2959 and tui=0 and cang=0 order by sj desc,id desc"
hwrs.open sql,conn,1,1
if hwrs.eof then
response.write"没有数据"
else
do while not hwrs.eof

%>
<a href=" merchandise.asp?id=<%=encode(hwrs("id")) %>"  title=<%=hwrs("mc")%>><span style="color:#ffffff;font-size:12px;"><%=InterceptString(hwrs("mc"),12)%></span></a>
<%
hwrs.movenext
loop
hwrs.close
set hwrs=nothing
end if
%> </td>
                                </tr>
                                <tr>
                                  <td width="402" height="21" valign="bottom">&nbsp; <span style="color:#ffffff;font-size:12px;" class="ClassTitle"><a href="ProductList.asp?lbid=42&amp;xlbid=357&amp;slbid=2956">华语经典</a></span>&nbsp; 
								
<%
set hwrs=server.createobject("adodb.recordset")
sql="select top 4 id,mc,xt from chanpin where lbid=42 and xlbid=357 and slbid=2956 and tui=0 and cang=0 order by sj desc,id desc"
hwrs.open sql,conn,1,1
if hwrs.eof then
response.write"没有数据"
else
do while not hwrs.eof

%>
<a href=" merchandise.asp?id=<%=encode(hwrs("id")) %>"  title=<%=hwrs("mc")%>><span style="color:#ffffff;font-size:12px;"><%=InterceptString(hwrs("mc"),12)%></span></a>
<%
hwrs.movenext
loop
hwrs.close
set hwrs=nothing
end if
%>                                </tr>
                              </table></td>
                          </tr>
                        </table></td>
                      <td width="2" height="325"></td>
                      <td width="140"><table width="140" border="0" cellspacing="0" cellpadding="0">
                          <tr>
                            <td height="216" background="pics/2k5/chl/v1/culture/culture_051108_music_7.gif"><ul id="MusicTop10">
                                
<%
set ydrs=server.createobject("adodb.recordset")
sql="select top 10 chanpin.id,chanpin.mc,chanpin.xt from chanpin left join lb on chanpin.lbid=lb.lbid where lb.topic='书籍音像' and chanpin.tui=0  and chanpin.lbid=42 order by chanpin.rq desc,chanpin.sj desc,chanpin.id"
ydrs.open sql,conn,1,1
if ydrs.eof then
response.write"没有数据"
else
do while not ydrs.eof
response.write"<li>&nbsp;&nbsp;<font color=white>·</font><a href=""merchandise.asp?id="&encode(ydrs("id"))&""" title="&ydrs("mc")&">"&InterceptString(ydrs("mc"),20)&"<span style=""color:#FFFF00;font-weight:bold;text-decoration:line-through;""></span></li>"
ydrs.movenext
loop
ydrs.close
set ydrs=nothing
end if
%>






  </ul></td>
                          </tr>
                          <tr>
                            <td height="27"></td>
                          </tr>
                          <tr>
                            <td height="81" background="pics/2k5/chl/v1/culture/culture_051108_music_bbs.gif"><div id="Musicbbs">
                                <div><ul id="Culturebbs">



<%
set hwrs=server.createobject("adodb.recordset")
sql="select top 4 id,mc,xt from chanpin where lbid=42 and xlbid=357 and slbid=2961 and tui=0 and cang=0 order by sj desc,id desc"
hwrs.open sql,conn,1,1
if hwrs.eof then
response.write"没有数据"
else
do while not hwrs.eof

%>
<li><a href=" merchandise.asp?id=<%=encode(hwrs("id")) %>"  title=<%=hwrs("mc")%>><span style="color:#ffffff;font-size:12px;"><%=InterceptString(hwrs("mc"),12)%></span></a></li>
<%
hwrs.movenext
loop
hwrs.close
set hwrs=nothing
end if
%>	



</ul></div>                              </div></td>
                          </tr>
                        </table></td>
                    </tr>
                  </table></td>
              </tr>
              <tr>
                <td height="8"><img src="pics/2k5/chl/v1/culture/culture_051108_music_19.gif" width="570" height="8" /></td>
              </tr>
            </table></td>
        </tr>
        <tr>
          <td></td>
        </tr>
        
      </table></td>
  </tr>
  <tr>
    <td valign="top" bgcolor="#FFFFFF">
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	<table width="180" border="0" cellspacing="0" cellpadding="0" valign="top">
     <tr><td><table width="100%" border="0" cellspacing="0" cellpadding="0" valign="top" background="pics/2k6/chl/v1/culture/culture_060417_categry_4.gif">
	    
		
<%
	dim sql,rs,xrs,srs
	Sql="select  lbid,lbname from lb where cang=0 and topic='书籍音像' order by px desc,lbid"
    set rs=server.createobject("adodb.recordset")
    rs.open Sql,conn,1,1
	if rs.eof then
	response.write "无类别"
	response.end
	end if
do while not rs.eof
%>
<tr><td valign="middle" height="25" bgcolor="#8DDCD0" align="center"><a href="ProductList.asp?lbid=<%=rs(0)%>"title=<%=rs(1)%>><span style="color:#FFFFFF;font-weight:bold;margin:10px 0 0 12px;" title=<%=rs(1)%>><%=InterceptString(rs(1),22)%></a></td>
<tr><tr><td>
<%
set xrs = conn.execute("select top 4  xlbid,xlbname,cp from xlb where lbid="&rs("lbid")&" and cang=0 order by cp desc,xlbid")
		if xrs.eof then
		response.Write"" 
		end if
z=1
		do while not xrs.eof
%>
<div class="culturecate"><img src="pics/2k6/chl/v1/culture/culture_060417_categry_5.gif" width="3" height="6"/><a href="ProductList.asp?lbid=<%=rs(0)%>&xlbid=<%=xrs("xlbid")%>" title=<%=xrs("xlbname")%>><span style="margin-left:3px;"><%=InterceptString(xrs("xlbname"),22)%></span></a><ul>

<%
set srs = conn.execute("select slbid,slbname,cp from slb where xlbid="&xrs("xlbid")&"  order by cp desc,slbid")
		if srs.eof then
		response.Write"" 
		end if
do while not srs.eof
%>
<a href="ProductList.asp?lbid=<%=rs("lbid")%>&amp;xlbid=<%=xrs("xlbid")%>&slbid=<%=srs("slbid")%>" title=<%=srs("slbname")%>><%=InterceptString(srs("slbname"),20)%> </a>
<%
		srs.movenext
		loop
		srs.close
%>
<li><img src="pics/2k6/chl/v1/culture/culture_060417_categry_6.gif" width="141" height="1" /></li></ul></div>
<%
		xrs.movenext
		z=z+1
		loop
		xrs.close
%>
</td></tr>
<%
	rs.movenext
	loop
	rs.close
%>      
        <tr>
          <td><img src="pics/2k6/chl/v1/culture/culture_060417_categry_3.gif" width="180" height="9" /></td>
        </tr>
</table></td></tr></table>		
		
		

	
	
	
	
	
	
	
	
	
	
	
	
	
	</td>
  </tr>
</table>
<br>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="10"><img src="pics/2k5/chl/v1/culture/culture_051116_02.gif" width="10" height="100"></td>
    <td background="pics/2k5/chl/v1/culture/culture_051116_03.gif"><span 
style="font-size: 12px; color: #1e998b">声明:<br />
      本网站注重知识产权保护,旨在创建一个遵纪守法的市场环境,因此希望各位卖家所销售商品必须遵守国家有关法律法规。<br />
      用户对自己上传的信息之真实性与合法性承担全部责任,如有交易纠纷,请直接与交易对方协商处理。<br />
      对于产生交易纠纷，如双方提请司法机构处理，本网站将配合取证。</span></td>
    <td width="10"><img src="../../../D_7C/WORK/20070;31821;/051108/images/images/culture_051116_01.gif" width="9" height="100"></td>
  </tr>
</table>
<br />
<style type="text/css">
<!--
 #culture{
 	display:none;
 }
-->
</style>




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

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