<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3c.org/TR/1999/REC-html401-19991224/loose.dtd">
<HTML xmlns="http://www.w3.org/1999/xhtml"><!--#include file="../Include/Conno.asp" --><!--#include file="../Include/function.asp" --><!--#include file="../Include/ShowPage.asp" -->
<!--#include file="../sql/Neeao_SqlIn.Asp" -->
<%TradeTypeID=trim(Request("TradeTypeID"))
if TradeTypeID="all" then
TradeTypename="所有商家"
else
set rs=conn.execute("SELECT F_ID,F_Value FROM T_TradeType where F_ID="&TradeTypeID&" ORDER BY F_ID")
TradeTypename=rs("F_Value")
rs.close
end if
%>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=TradeTypename%>,折扣商家，襄樊生活网</title>
<LINK href="../css/Menu.css" type=text/css rel=stylesheet>
<LINK href="../css/aCardSearch.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2900.3059" name=GENERATOR>
<SCRIPT src="../js/029bxw.js" type=text/javascript></SCRIPT>
</head>
<body>
<!--页面开始-->
<!--页面顶部开始-->
<!--#include file="../include/cardmenu.htm"-->
<!--页面顶部结束-->
<!--页面标题开始-->
<DIV id="aTitle"><img src="../images/Icon/001.gif"/> 您的位置：<A href="../index.asp">首页</A>&nbsp;&gt;&gt;&nbsp;<A href="index.asp">折扣商家</A>&nbsp;&gt;&gt;&nbsp;<%=TradeTypename%></DIV>
<!--页面标题结束-->
<!--页面正文结束-->
<table width="960" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td width="202" valign="top">
<!--左侧包涵开始-->
<div id="aInfo" style="width:200px; text-align:center">
<table width="177" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td><img src="../images/card/11_01.gif" width="177" height="47"></td>
  </tr>
  <tr> 
    <td height="131" valign="top" background="../images/card/xf_06.gif"> <table width="96%"  border="0" cellspacing="3" cellpadding="0">
        <form name="form2" method="post" action="../CardManage/Login.asp?Login=OK" onSubmit="return checkForm()">
          <tr> 
            <td width="39%" height="25" align="right"><font color="#FF6600">用户名：</font></td>
            <td width="61%"><input name="UserName" type="text" size="10" maxlength="10" style="BORDER-RIGHT: #cccccc 1px solid; BORDER-TOP: #cccccc 1px solid; FONT-SIZE: 9pt; BORDER-LEFT: #cccccc 1px solid; WIDTH: 72px; BORDER-BOTTOM: #cccccc 1px solid; HEIGHT: 14px"></td>
          </tr>
          <tr> 
            <td height="25" align="right"><font color="#FF6600">密　码：</font></td>
            <td><input name="UserPWD" type="password" size="10" maxlength="10" style="BORDER-RIGHT: #cccccc 1px solid; BORDER-TOP: #cccccc 1px solid; FONT-SIZE: 9pt; BORDER-LEFT: #cccccc 1px solid; WIDTH: 72px; BORDER-BOTTOM: #cccccc 1px solid; HEIGHT: 14px"></td>
          </tr>
          <tr align="center"> 
            <td height="30" colspan="2"><INPUT type=image 
                        src="../images/card/login_1.gif" border=0 name=imageField3> 
              <img src="../images/card/login_2.gif" width="70" height="18" border="0"></td>
          </tr>
          <tr align="center"> 
            <td colspan="2"><a href="../CardManage/reginfo.asp"><img src="../images/card/11_jm.gif" width="70" height="18" border="0"></a></td>
          </tr>
          <tr align="right"> 
            <td colspan="2">&nbsp;</td>
          </tr>
        </form>
      </table></td>
  </tr>
</table>
<table width="183" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td><img src="../images/card/xf_03.gif" width="183" height="42"></td>
  </tr>
  <tr> 
    <td align="center" background="../images/card/xf_05.gif">
	 <table width="100%" border="0" cellspacing="0" cellpadding="0">
                  <tr>
                    <form name="form1" method="post" action="http://www.tydsw.com/Card/Search.asp">
                            <td><TABLE cellSpacing=2 cellPadding=2 width="90%" align=center border=0>
                                <TBODY>
                                  <TR> 
                                    <TD ><select name="selBigCategory" onChange="TypeChange(this);" >
                                      <option value=15>襄樊市</option>
                                    </select>
                                      <script language="javascript">                               
function TypeChange(theSelect)
{
var sTemp,sString,i,sBigTypeID;
sValue=theSelect.value;
sSubTypeArray=sValue.split("-");
sBigTypeID = sSubTypeArray[0];
sString="<select name='TypeID'>";
 sString+="<option value='"+sBigTypeID+":all'>所有商圈</option>";

for(i=1;i<sSubTypeArray.length-1;i++)
{
 sTemp=sSubTypeArray[i].split("+");
 sString+="<option value='"+sBigTypeID+":"+sTemp[0]+"'>"+sTemp[1]+"</option>";
}
sString+="</Select>"
form1.TypeID.outerHTML=sString;

}
</script> <select name="TypeID" >
                                    </select> <script language="javascript">TypeChange(form1.selBigCategory);</script>                                    </TD>
                                  </TR>
                                  <TR> 
                                    <TD >商户类型: 
                                     <select name="TradeTypeID">
                                        <option value='all'>所有类别</option><option value='1'>宾馆酒店</option><option value='2'>食话食说</option><option value='3'>休闲娱乐</option><option value='4'>视听艺术</option><option value='5'>吧人一族</option><option value='6'>居家生活</option><option value='7'>服饰鞋类</option><option value='8'>美丽人生</option><option value='9'>旅游摄影</option><option value='10'>教育培训</option><option value='11'>运动健身</option><option value='12'>购物商场</option><option value='14'>其他类型</option>
                                      </select> </TD>
                                  </TR>
                                  <TR> 
                                    <TD>关 键 字: 
                                      <INPUT type="text" size=11 name=Keywords>                                    </TD>
                                  </TR>
                                  <TR> 
                                    <TD align="center"><input type="image" height=18 width=70 src="../images/card/sear.jpg" border=0 name=imageField2></TD>
                                  </TR>
                                </TBODY>
                              </TABLE></td>
                    </form>
                  </tr>
      </table></td>
  </tr>
  <tr> 
    <td><img src="../images/card/xf_08.gif" width="183" height="9"></td>
  </tr>
</table>
<table width="183" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td><img src="../images/card/xf_09.gif" width="183" height="43"></td>
  </tr>
  <tr> 
    <td align="center" background="../images/card/xf_05.gif">
      <!--#include file="Type.asp" -->
    </td>
  </tr>
  <tr> 
    <td><img src="../images/card/xf_08.gif" width="183" height="9"></td>
  </tr>
</table>
<table width="183" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td height="30" valign="bottom" background="../images/card/xf_bj.gif"><img src="../images/card/xf_19.gif" width="183" height="30"></td>
  </tr>
</table>
<a href="../CardManage"><img src="../images/card/shangjia.jpg" width="177" height="62" border="0"></a></div>
<!--左侧包涵结束-->
</td>
    <td width="522" valign="top">
<div class="aCenter" style="width:492px;margin:5px 10px 5px 10px; padding:3px">
  <table width="100%" border="0" cellspacing="0" cellpadding="0">
    <tr>
      <td width="5%" valign="top" bgcolor="#F0F7FD">
	  <div class="aCenter01"><img src="../images/Card/010.gif"></div>
	  <div class="aCenter02"><%=TradeTypename%></div>
	  </td>
      <td width="99%" valign="top">
	  <div class="aCenter03">
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="2" bgcolor="<%=m_BgColor%>">
<% m_TypeID = Trim(Request("TypeID"))
	if instr(m_TypeID,":") <> 0 then
      m_BigCategoryID = mid(m_TypeID,1,instr(m_TypeID,":")-1)
      m_SmallCategoryID = mid(m_TypeID,instr(m_TypeID,":")+1)
    else
	  m_BigCategoryID = "all"
	  m_SmallCategoryID = "all"
	end if
	
    m_TradeTypeID = trim(Request("TradeTypeID"))
	m_TradeTypeID=replace(m_TradeTypeID,"'","")
	if m_TradeTypeID = "" then m_TradeTypeID = "all"
    m_Keywords = Trim(Request("Keywords"))
if Instr(LCase(m_Keywords),"'") > 0 or Instr(LCase(m_Keywords),"select ") > 0 or Instr(LCase(m_Keywords),"insert ") > 0 or Instr(LCase(m_Keywords),"delete from") > 0 or Instr(LCase(m_Keywords),"count(") > 0 or Instr(LCase(m_Keywords),"drop table") > 0 or Instr(LCase(m_Keywords),"update ") > 0 or Instr(LCase(m_Keywords),"truncate ") > 0 or Instr(LCase(m_Keywords),"asc(") > 0 or Instr(LCase(m_Keywords),"mid(") > 0 or Instr(LCase(m_Keywords),"char(") > 0 or Instr(LCase(m_Keywords),"xp_cmdshell") > 0 or Instr(LCase(m_Keywords),"exec master") > 0 or Instr(LCase(m_Keywords),"net localgroup administrators") > 0  or Instr(LCase(m_Keywords)," and ") > 0 or Instr(LCase(m_Keywords),"net user") > 0 or Instr(LCase(m_Keywords)," or ") > 0 or Instr(LCase(m_Keywords)," ' ") > 0 then
%>
 <script language="javascript">
   alert("您输入的内容中有非法字符串");
   window.location='../index.asp'
</script>
<%response.End()
end if
    m_Parameter = "TypeID="&m_TypeID&"&TradeTypeID="&m_TradeTypeID&"&Keywords="&m_Keywords
    dim m_RecordCount,m_PageNo,m_Page
    m_RecordCount=0 : m_PageNo=0 : m_Page=0
	m_PageSize = 10 '每页显示数录数
    m_PageNo = Trim(Request.querystring("PageNo"))
	Set rs = Server.createobject("Adodb.RecordSet")
    m_SQL = "SELECT companyid,name,logo,content FROM CityCard_League WHERE (IsCard<>'0,0' and ischecked=1)"	
	if m_SmallCategoryID <> "all" then
	  m_SQL = m_SQL +" and cityid="&m_SmallCategoryID
	else
	  if m_BigCategoryID <> "all" then m_SQL = m_SQL +" and stateid="&m_BigCategoryID
	end if
	
	if m_TradeTypeID <> "all" then
	  m_SQL = m_SQL +" and hangyeid="&m_TradeTypeID
	end if
	
	m_SQL = m_SQL +" and (name like  '%" & m_Keywords & "%'"
	m_SQL = m_SQL +" or address like  '%" & m_Keywords & "%'"
	m_SQL = m_SQL +" or linkman like  '%" & m_Keywords & "%')"
	m_SQL = m_SQL +" order by companyid desc"
	
	rs.open m_SQL,conn,1,1
	if rs.Eof then
	   response.write "<br><p align='center'><font color=666666><B>对不起，找不到你想要查找的商家信息！</B></font></p><br>"
    else
      m_RecordCount = rs.RecordCount
      rs.PageSize = m_PageSize
      m_Page = rs.PageCount
      if m_PageNo = ""  then m_PageNo =1
      if cint(m_PageNo) < 1 or cint(m_PageNo) > m_Page then m_PageNo = 1
      rs.AbsolutePage = m_PageNo
      rc = m_PageSize
      re = 1
	  m_Count = 1'另加
      Do while not rs.eof and rc>0
	  m_Count = m_Count +1'另加
	  if m_Count mod 2 then m_BgColor = "ffffff" else m_BgColor = "f2f2f2" '另加
        '---------------------------------
		'调用显示内容
        ShowContent()
        '---------------------------------
      rs.MoveNext
      re = re+1
      rc = rc-1
    Loop
	rs.Close
 End if	
 Sub ShowContent()%>
 <tr>
    <td width="20%" ><%if rs("logo")="" then m_Image = "defaultlogo.gif" else m_Image = rs("logo") %><a target="_blank" href="Show.asp?id=<%=rs("companyid")%>"><img src="../CardManage/UploadLogoImages/<%=m_Image%>" alt="<%=rs("name")%>" width="120" height="80" hspace="3" vspace="3" border="1"></a></td>
    <td align="left" valign="top" height="50"><a target="_blank" href="show.asp?id=<%=rs("companyid")%>"><b><%=rs("name")%></b></a><br><br><%=gotTopic(deleteHtmlTag(rs("content")),140)%>-<a target="_blank" href="show.asp?id=<%=rs("companyid")%>"><%response.Write "[详细介绍]" %></a></td>
 </tr>
 <tr>
   <td height="1"></td>
   <td height="1" background="../images/card/line.gif"></td>
 </tr>
 <%end sub%>
</table>	  
<% Call ShowPage(m_Parameter)%></div>
	  </td>
    </tr>
  </table>
</div>
</td>
    <td width="236" valign="top">
<div class="aRight" style="width:234px;margin:5px 0px 5px 0px; padding:0px"><a href="../CardManage/reginfo.asp"><img src="../Ad_Web/Images/ad04.gif" border="0"></a></div>
<div class="aList">
<div style="margin:5px"><TABLE cellSpacing=0 cellPadding=0 width=100% align=center 
            border=0>
              <TBODY>
              <TR>
                <TD align=middle width=11%><IMG height=18 
                  src="../images/card/013.gif" width=18></TD>
                <TD width=30% align=middle class="aTexe14"><A href="index.asp">推荐商家</A></TD>
                <TD width=38% height=20 bgColor=#FF9900></TD>
                <TD width=21% bgColor=#FF9900><A href="Card/index.asp"><span class="aTexeMore" >更多&gt;&gt;</span></A></TD>
              </TR></TBODY></TABLE>
</div>
<%m_SQL = "SELECT TOP 12 companyid,name FROM CityCard_League where iscard<>'0,0' and ischecked=1 ORDER BY companyid DESC"
Set rst = conn.Execute(m_SQL)
Do While Not rst.Eof
response.write "<div class=aList1>·<a href=Show.asp?id="&rst("companyid")&" title="&rst("name")&">"&rst("name")&"</a></div>"
rst.MoveNext
Loop
rst.Close%></div>
<div class="aRight2" style="width:234px;margin:5px 0px 5px 0px; padding:0px"><a href="../member/club.asp"><img src="../Ad_Web/Images/ad05.jpg" border="0"></a></div>
<div class="aRight4" >
<div style="margin:5px"><TABLE cellSpacing=0 cellPadding=0 width=100% align=center 
            border=0>
              <TBODY>
              <TR>
                <TD align=middle width=11%><IMG height=18 
                  src="../images/card/013.gif" width=18></TD>
                <TD width=30% align=middle class="aTexe14"><A href="../Tour/Travel_Lineall.asp">旅游线路</A></TD>
                <TD width=38% height=20 bgColor=#F551E0></TD>
                <TD width=21% bgColor=#F551E0><A href="../Tour/Travel_Lineall.asp"><span class="aTexeMore" >更多&gt;&gt;</span></A></TD>
              </TR></TBODY></TABLE>
</div>
<%m_SQL = "SELECT TOP 10 F_ID,F_LineName From Tour_TravelLine order by F_ID desc"
Set rst = conn.Execute(m_SQL)
Do While Not rst.Eof
response.write "<div class=aList1>·<a href=../Tour/Travel_LineShow.asp?ID="&rst("F_ID")&" title="&rst("F_LineName")&">"&rst("F_LineName")&"</a></div>"
rst.MoveNext
Loop
rst.Close%></div>
<div class="aList">
<div style="margin:5px"><TABLE cellSpacing=0 cellPadding=0 width=100% align=center 
            border=0>
              <TBODY>
              <TR>
                <TD align=middle width=11%><IMG height=18 
                  src="../images/card/013.gif" width=18></TD>
                <TD width=30% align=middle class="aTexe14"><A href="../info/Class_index.asp">信息广场</A></TD>
                <TD width=38% height=20 bgColor=#99CC33></TD>
                <TD width=21% bgColor=#99CC33><A href="../info/Class_index.asp"><span class="aTexeMore" >更多&gt;&gt;</span></A></TD>
              </TR></TBODY></TABLE>
</div>
<%m_SQL = "SELECT TOP 10 F_ID,F_title From info_ad order by F_ID desc"
Set rst = conn.Execute(m_SQL)
Do While Not rst.Eof
response.write "<div class=aList1>·<a href=../Info/ShowInfo.asp?ID="&rst("F_ID")&" title="&rst("F_title")&">"&rst("F_title")&"</a></div>"
rst.MoveNext
Loop
rst.Close%></div>	
	</td>
  </tr>
</table>

<TABLE width=100% border=0 cellPadding=0 cellSpacing=0 bgcolor="#76AF03">
    <TR>
      <TD height="26" class="aTexe142">&nbsp;&nbsp;精彩图片</TD>
      <TD width=60><A class=aTexeMore 
      href="../pic" >更多&gt;&gt;</A></TD>
    </TR>
</TABLE>
<div id="aClubPic" style=" height:150px">
<ul id="aClubPicUl"><%m_SQL = "SELECT TOP 12 id,title,titlepic FROM tb_news where lm='13' order by id desc"
			Set rs = conn.Execute(m_SQL)
			Do While Not rs.Eof
			ptitle=rs("title")%>
	 <li>
	 <div class="aPic01"><a href="../Pic/Show.asp?ArticleID=<%=rs("id")%>"><img src="<%=rs("titlepic")%>" alt="<%=ptitle%>" width="130" height="98" border="0" /></a> </div>
	 <div class="aPic01"><a href="../Pic/Show.asp?ArticleID=<%=rs("id")%>" title=<%=ptitle%>><%=gotTopic(ptitle,18)%></a></div>
	 </li><%rs.movenext
	 loop
	 rs.close%>
</ul>
</div>
<!--页面正文结束-->
<!--版权开始-->
<!--#include file="../include/CopyRight.htm"-->
<!--版权结束-->
<!--页面结束-->
</body>
</html>
