<!--#include file="inc/conn.asp"-->
<!--#include file="inc/jle_sub.asp"-->
<!--#include file="inc/function.asp"-->
<%
'    @@@@@@ www.jl-e.com @@@@@@@@@@@@@@@@@
'   @                                        @
'  @                                          @
'  @      吉林信息网，服务百姓生活      @
'  @                                          @
'   @                                        @
'    @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
%>
<%
sc1=HtmlEncode(request("sc1"))
sc2=HtmlEncode(request("sc2"))
jle=HtmlEncode(request("jle"))
tit=HtmlEncode(request("tit"))
sheng_id=HtmlEncode(request("sheng_id"))
shi_id=HtmlEncode(request("shi_id"))
%>

<head>
<title><%=title%>-<%=city%>商家<%=tit%>店铺,<%=city%>商铺</title>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="keywords" content="门面,店铺-出售|出租|求购|求租|卖买|转让|网上开店">
<meta name="description" content="门面,店铺出租|求租|招租">
<link rel="icon" href="<%=web%>/favicon.ico" type="image/x-icon" />
<link rel="shortcut icon" href="<%=web%>/favicon.ico" type="image/x-icon" />
<link href="css/style.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body,td,th {
	font-family: 微软雅黑;
	font-size: 14px;
}
-->
</style></head>

<body><%call top()%>
<BR />
<div align="center">
  <table width="1300" border="0" cellspacing="0" cellpadding="0">
    <tr>
      <td width="79%" valign="top"><table width="98%" height="119" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFEFB" style="border:3px #FF7800 solid; margin-bottom:10px;">
          <tr>
            <td width="11%" align="center" class="fontjs" style="border-bottom:1px #FFEBCF dotted;">栏目分类：</td>
            <td width="89%" style="border-bottom:1px #FFEBCF dotted;">  <div class="L-divNB">
            <ul>
       <% if sc1="" then%>
	   <% set rspp=server.CreateObject("adodb.recordset")
						sqlpp="select  * from sjcla1"
						rspp.open sqlpp,conn,1,1
if rspp.eof and rspp.bof then
						response.Write("暂无信息")
						end if
						m=1
						do while not rspp.eof
%>
       <a href="shop.asp?sc1=<%=rspp("id")%>&amp;jle=1" > <%=rspp("sjcla1")%></a>
        <%
						  rspp.movenext
						  m=m+1
						'if m=8 then exit do
loop
set rspp=nothing
rspp.close
else
						  %>
	        
<%if jle<>0 then%>
<%set rs1=server.createobject("ADODB.recordset")
rs1.open"select * from sjcla2 where sjcla1="&sc1&" order by id",conn,1,1 
if rs1.eof then%> 
<li>暂时没有分类!</li> 
<%else
while not rs1.eof
set rs2=server.createobject("ADODB.recordset")
rs2.open"select * from jle_shop where sjcla2="&rs1("id")&"",conn,1,1
totalquestion=rs2.recordcount
rs2.close
set rs2=nothing
%> 
<li><a href="shop.asp?sc1=<%=sc1%>&sc2=<%=rs1("id")%>&jle=2" class="a13"><%=rs1("sjcla2")%>(<%=totalquestion%>)</a> <%rs1.movenext%></li>
<%
wend
end if
rs1.close
set rs1=nothing
end if

end if
%> 
</ul></div></td>
          </tr>
          <tr>
            <td align="center" class="fontjs">地区：</td>
            <td><div class="L-divNB">
<ul>
<%if diqu1="1" then 
set jle_rsdq=server.createobject("adodb.recordset")
jle_sqldq = "select diqu from config "
jle_rsdq.open jle_sqldq,conn,1,1
if jle_rsdq.bof or jle_rsdq.eof then
response.redirect "/"
end if
diqu=split(jle_rsdq("diqu"),"|")
xn=diqu(0)
for x=1 to xn
response.write "<li ><a href=shop.asp?///="&escape(diqu(x))&"&/="&class1&"&//="&class2&"&jle=3>"&diqu(x)&"</a></li>"
next
jle_rsdq.close
set jle_rsdq=nothing
else
sheng_id=request("sheng_id") 
if sheng_id="" then
set rs1=server.createobject("ADODB.Recordset")
            sql1="select * from sc_sheng order by sheng_id asc"
            rs1.open sql1,conn,1,1
            If Not rs1.Eof and not rs1.bof Then 
            do while not rs1.eof
           
			response.write "<a href=""shop.asp?sheng_id="&rs1("sheng_id")&"&sc1="&sc1&"&sc2="&sc2&"&jle="&jle&""">"&rs1("sheng_name")&"</a>"

            rs1.movenext
              loop
              end if
              rs1.close
              set rs1=nothing
         
else
sqlr="select * from sc_shi where sheng_id="&sheng_id&""
set rsquyu=conn.execute(sqlr)
do while not rsquyu.eof
response.write "<li ><a href=shop.asp?sheng_id="&rsquyu("sheng_id")&"&shi_id="&rsquyu("shi_id")&"&sc1="&sc1&"&sc2="&sc2&"&jle="&jle&">"&rsquyu("shi_name")&"</a></li>"
rsquyu.movenext
loop
rsquyu.close
set rsquyu=nothing
end if
end if 
%>
</ul>
</div></td>
          </tr>
        </table>
        <table width="1008" border="0" cellspacing="0" cellpadding="0" class="tbest">
          <tr>
            <td><table width="1008" border="0" cellspacing="0" cellpadding="0" >
                <tr>
                  <%
'Response.Write(sheng_id&"-"&shi_id)
'response.Write(jle)
Sql0="select  * from jle_shop where 1=1 "
Set rs0 = Server.CreateObject("ADODB.Recordset")
Select Case jle
Case "1"
case "2"
if sheng_id<>"" then
Sql0=Sql0&" and city_one ='"&sheng_id&"'"
end if 
if shi_id<>"" then
Sql0=Sql0&" and city_two ='"&shi_id&"'"
end if 

if sc1<>"" then
Sql0=Sql0&" and sjcla1 ="&sc1&""
end if 
if sc2<>"" then
Sql0=Sql0&" and sjcla2 ="&sc2&""
end if 

Sql0=Sql0&" and yz=1 order by id desc"


Case Else
Sql0="select  * from jle_shop where  yz=1 order by id desc"
End Select


rs0.open sql0,conn,1,1
hang=9
rs0.pagesize=1*hang
pagenum=rs0.pagecount
Response.Write"<table border=0 width=""100%"" bgcolor=""#FFFFFF"" cellspacing=6>"
If rs0.eof and rs0.bof Then
Response.Write("该类还没有商家加入！")
End If
pageno=cint(request("pageno"))
if pageno="" or pageno>pagenum or pageno=0 then
pageno=1
else
pageno=pageno
end if
if pageno<>1 then
rs0.move (pageno-1)*rs0.pagesize
end if

for w=1 to hang
Response.Write"<tr>"
for k=0 to 0
if rs0.eof then exit for
if k mod 2 =0 then
bgc="#ffffe3"
else
bgc="#ffffe3"
end If%>
                  <td  height="80"   style="text-align:left;"><table width="100%" border="0" cellspacing="0" cellpadding="0" onMouseOver="this.bgColor='#F6FBFD'" onMouseOut="this.bgColor='#ffffff'" style="CURSOR:default;border:1px #C5D8E6 solid;">
                      <tr>
                        <td width="152" rowspan="4" valign="top" ><table width="152" border="0" cellspacing="0" cellpadding="0" height="162">
                            <tr>
                              <td width="152" height="128" valign="top" ><% if right(rs0("logo"),4)=".gif" or right(rs0("logo"),5)=".jpeg" or right(rs0("logo"),4)=".jpg"then%>
                                  <div style="margin-top:9px;margin-left:9px;border:0px solid #afafae; width:130px">
                                    <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"  
  codebase="http://download.macromedia.com/pub/shockwave/cabs/
  flash/swflash.cab#version=6,0,29,0"  width="130" height="111">
                                      <param name="movie" value="img/swfoto2.swf?image=<%=rs0("logo")%>&amp;isShowLoader=true&amp;loaderColor=13421772&amp;roundCorner=7" />
                                      <param name="wmode" value="transparent" />
                                      <embed  src="img/swfoto2.swf?image=<%=rs0("logo")%>&amp;isShowLoader=true&amp;loaderColor=13421772&amp;roundCorner=7" 
  width="130" height="111" 
  pluginspage="http://www.macromedia.com/go/getflashplayer" 
  type="application/x-shockwave-flash"></embed>
                                    </object>
                                  </div>
                                <%else%>
                                  <a target="_blank" href="shop/sp<%=rs0("mb")%>.asp?m=<%=rs0("username")%> " ><img src="image/nopic.gif" style="padding-left:2px;margin-top:2px;margin-left:1px;margin-bottom:2px; padding-right:2px" border="0" align="left" width="130" height="111" /> </a>
                                  <%end if%>
                              </td>
                            </tr>
                            <tr>
                              <td height="36"><div style="font-size:14px;color:#C00; margin-left:7px;">
                                  <%
if rs0("vip")=1 then%>
                                  <img src="img/vip.gif" />&nbsp;<font color="#FF0000"><b>VIP商家会员</b></font>
                                  <%else%>
                                  <img src="img/pt.png" />&nbsp;<b><font color="#ff6600">普通商家会员</font></b>
                                  <%
end if%>
                              </div></td>
                            </tr>
                        </table></td>
                        <td width="854" height="30" valign="top" bgcolor="#0082BF"><div style="margin-top:5px;color:#ffffff; line-height:30px;"> &nbsp;<a target="_blank" href="shop/sp<%=rs0("mb")%>.asp?m=<%=rs0("username")%>" class="bar4"><%=left(rs0("com"),30)%></a>&nbsp;&nbsp;&nbsp;积分:<%=rs0("jf")%>&nbsp;&nbsp;&nbsp;&nbsp;创店时间：<font color="#90D8FA"><%=formatdatetime(rs0("zcdata"),1)%></font> </div></td>
                      </tr>
                      <tr>
                        <td  valign="top"><div style=" padding:6px; ">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<%=left(rs0("comabout"),150)%> &nbsp;&nbsp;<img src="img/zc.gif" /> 网友支持度：[<%=rs0("tong")%>]</div></td>
                      </tr>
                      <tr>
            <td height="36" style="border-top:1px solid #C5D8E6;"><img src="img/dh.gif" />&nbsp;电话：<font color="#0082BF"><b><%=left(rs0("dianhua"),30)%></b></font>&nbsp;&nbsp;<img src="img/home.gif" />&nbsp;地址：<font color="#0082BF"><b><%=left(rs0("dizhi"),21)%></b></font></td>
          </tr>
                      <tr>
                        <td></td>
                      </tr>
                  </table></td>
                  <%
rs0.movenext 
next%>
                </tr>
                <%
if rs0.eof then exit for
next%>
              </table>
                <div class="jle" align="center"> <a href="?sc1=<%=sc1%>&amp;sc2=<%=sc2%>&amp;jle=<%=jle%>&amp;pageno=1">首页</a>
                    <%
'显示数量设定
showpagenum=10
'上一页显示判断
if pageno>1 then      
response.write "<a href='?sc1="&sc1&"&sc2="&sc2&"&jle="&jle&"&pageno="&pageno-1&"'>上一页</a> "
end if
if pagenum>showpagenum then
num_left=pageno-1
num_right=pagenum-pageno
if num_left>(showpagenum/2) then
 if num_right<(showpagenum/2) then
    page_left=pageno-(showpagenum-num_right)+1
    page_right=pagenum
 else
    page_left=pageno-(showpagenum/2)
    page_right=pageno+(showpagenum/2)
 end if
else
    page_left=1
    page_right=pageno+(showpagenum-num_left)-1
end if
'前项输出
for P=page_left to pageno-1
    response.write " <a href='?sc1="&sc1&"&sc2="&sc2&"&jle="&jle&"&pageno="&p&"'>"&p&"</a> "
next
'当前项输出
'response.write " <span class=""current""><a href='?sc1="&sc1&"&sc2="&sc2&"&jle="&jle&"&pageno="&pageno&"'>"&pageno&"</a></span> "
response.write " <span class=""current"">"&pageno&"</span> "

'后项输出
for f=pageno+1 to page_right
    response.write " <a href='?sc1="&sc1&"&sc2="&sc2&"&jle="&jle&"&pageno="&f&"'>"&f&"</a> "
next
else
for i=1 to pagenum
 if i=pageno then
	'response.write " <span class=""current""><a href='?sc1="&sc1&"&sc2="&sc2&"&jle="&jle&"&pageno="&i&"'>"&i&"</a></span> "
	response.write " <span class=""current"">"&i&"</span> "
	'response.end()
 else
	response.write " <a href='?sc1="&sc1&"&sc2="&sc2&"&jle="&jle&"&pageno="&i&"'>"&i&"</a> "
	'response.end()
 end if
next
end if
'最后一页判断
if pageno<pagenum then
response.write "<a href='?sc1="&sc1&"&sc2="&sc2&"&jle="&jle&"&pageno="&pageno+1&"'>下一页</a>"
end if
%>
                    <a href="?sc1=<%=sc1%>&amp;sc2=<%=sc2%>&amp;jle=<%=jle%>&amp;pageno=<%=pagenum%>">尾页</a>
                    <%
rs.close
set rs=nothing
%>
              </div></td>
          </tr>
        </table></td>
      <td width="21%" valign="top" bgcolor="#F6FBFD" style="border-left:1px #C5D8E6 dotted;"><table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td height="40" bgcolor="#229DD7" class="fontgg" style="padding-left:15px;">推荐信息</td>
          </tr>
          <tr>
            <td bgcolor="#F6FBFD" style="padding:5px;"><%
dim rsnewinfo1
set rsnewinfo1=server.createobject("adodb.recordset")
sqlnewinfo1 = "select top 12 * from jle_shop where yz=1 and vip=1 order by id desc"
rsnewinfo1.open sqlnewinfo1,conn,1,1
i=1
Do while not rsnewinfo1.eof
If rsnewinfo1.eof Then
Response.Write("还没有任何信息!")
Response.end 
End If%>
                <div style="height:30px; line-height:30px;"><img  src="img/arrow_gree.gif" /><a target="_blank" href="shop/sp<%=rsnewinfo1("mb")%>.asp?m=<%=rsnewinfo1("username")%>" ><%=left(rsnewinfo1("com"),30)%></a></div>
              <% rsnewinfo1.movenext 
i=i+1
loop
rsnewinfo1.close
set rsnewinfo1=nothing
%>
            </td>
          </tr>
        </table>
          <table width="100%" border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td height="40" bgcolor="#229DD7" class="fontgg" style="padding-left:15px;">广告招商</td>
            </tr>
            <tr>
              <td bgcolor="#F6FBFD" style="padding:5px;">&nbsp;</td>
            </tr>
        </table></td>
    </tr>
  </table>
</div>


    <%
call bottom()
Call closedb()
%>

</body>
</html>