<!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="../sql/Neeao_SqlIn.Asp" -->
<%dim rs,m_SQL
 dim m_ID
 m_ID = int(trim(Request("ID")))
 if trim(m_ID) = "" OR (not isnumeric(m_ID)) then
   call msgbox("请不要误操作!",2)
 end if
 m_SQL = "SELECT hangyeid,username,name FROM CityCard_League WHERE iscard<>'0,0' and ischecked=1 and companyid="&m_ID
 Set rs = conn.Execute(m_SQL)
 If rs.Eof then
   Response.write "对不起，该加盟商不存在，或已被取消！"
   Response.end
 end if 
 m_HangyeID = rs("hangyeid")
 m_UserName = rs("username")
 m_SQL = "UPDATE CityCard_League set hits = hits +1 , F_Integral = F_Integral+'0.05' WHERE companyid="&m_ID
 conn.Execute(m_SQL)

m_SQL = "SELECT F_ID,F_Value FROM T_TradeType WHERE F_ID="&rs("hangyeid")
Set rst = conn.Execute(m_SQL)
TradeTypeid=rst(0)
TradeTypename=rst(1)
rst.Close
%><head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=rs("name")%>网友留言,<%=rs("name")%>,电话，地址，<%=TradeTypename%>,黄冈信息港</title>
<meta name="description"content="襄樊生活网是襄樊地区生活,消费,信息,资讯综合网络媒体。主要提供本地资讯,消费,商家信息,本地搜索,便民服务,休闲娱乐,餐饮美食,旅游出行,社区,俱乐部等全方位于一体的黄冈本地化信息服务">
<meta name="keywords" content="都市消费,信息,折扣商家,餐饮美食,便民服务,休闲娱乐">
<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="../">首页</A>&nbsp;&gt;&gt;&nbsp;<A href="index.htm">折扣商家</A>&nbsp;&gt;&gt;&nbsp;<% Response.write "<a href='Search.asp?TypeID="&m_TypeID&"&TradeTypeID="&TradeTypeid&"'>"
						  Response.write TradeTypename
						  Response.write "</a>" %>&nbsp;&gt;&gt;&nbsp;<a href="Show.asp?Id=<%=m_ID%>"><%=rs("name")%></a>&nbsp;&gt;&gt;&nbsp;网友留言</DIV>
<!--页面标题结束-->
<!--页面正文结束-->
<TABLE cellSpacing=0 cellPadding=0 width=100% align=center bgColor=#ffffff 
border=0>
  <TBODY>
  <TR>
    <TD vAlign=top width=184 bgColor=#efefef>
      <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
          <TBODY>
            <TR> 
              <TD><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>
                            <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 height="14" 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="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></TD>
            </TR>
            <TR> 
              <TD align="center"><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></TD>
            </TR>
            <TR> 
              <TD align="center"> <table width="177"  border="0" cellpadding="0" cellspacing="3" bgcolor="f2f2f2">
                  <tr> 
                    <td align="center" background="../images/card/about_bj.gif" class="p4"><img src="../images/card/about.gif" width="160" height="35"></td>
                  </tr>
                  <tr> 
                    <td align="left" bgcolor="ffffff" class="p1"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
                        <tr> 
                          <td height="34"  class="p1"> <%
				m_SQL = "SELECT TOP 12 companyid,name FROM CityCard_League where iscard<>'0,0' and ischecked=1 and hangyeid=" & m_HangyeID &" ORDER BY companyid DESC"
				Set rst = conn.Execute(m_SQL)
				Do While Not rst.Eof
				  if rst("name")<> m_Name then
			        response.write "·<a href=show.asp?id="&rst("companyid")&">"&rst("name")&"</a><BR>"
		          end if
				  rst.MoveNext
				Loop
				rst.Close%> </td>
                        </tr>
                        <tr> 
                          <td align="right"><a href="search.asp">更多...</a></td>
                        </tr>
                      </table></td>
                  </tr>
                </table></TD>
            </TR>
            <TR> 
              <TD align="center">&nbsp; </TD>
            </TR>
            <TR> 
              <TD align="center"><a href="../CardManage"><img src="../images/card/shangjia.jpg" width="177" height="62" border="0"></a></TD>
            </TR>
          </TBODY>
      </TABLE></TD>
      <TD width="580" vAlign=top> 
        <TABLE cellSpacing=0 cellPadding=0 width=580 border=0>
        <TBODY>
        <TR>
          <TD colSpan=3><IMG height=13 src="../images/card/list-table01.jpg" width=580></TD></TR>
        <TR>
              <TD valign="top" background="../images/card/list-table02.jpg"><IMG height=520 src="../images/card/list-table02.jpg" width=65></TD>
          <TD vAlign=top width=493 height=520>
            <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
              <TBODY>
              <TR>
                      <TD height=40 align="center" background=images/list-title01.jpg> 
                        <TABLE cellSpacing=0 cellPadding=0 width="98%" border=0>
                          <TBODY>
                    <TR>
                              <TD><font color="#000000" class="p4">&nbsp;<b><%=rs("name")%></b>&nbsp;</font></TD>
                            </TR></TBODY></TABLE>                      </TD>
                    </TR></TBODY></TABLE>
                <table width="100%" border="0" cellspacing="3" cellpadding="0">
                  <tr> 
                    <td valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
                        <tr> 
                          <td width="71%" height="40" align="left"><img src="../images/card/penlun.gif" width="190" height="34"></td>
                          <td width="29%" align="right" valign="bottom">&nbsp;</td>
                        </tr>
                      </table>
                      <table width="100%" border="0">
                        <tr>
                          <form name="form2" method="post" action="show.asp?id=<%=m_ID%>" onSubmit="return CheckData1()">
                            <td>

			      <table width="100%"  border="1" align="center" cellpadding="0" cellspacing="0" borderColorDark=#ffffff borderColorLight=#CCCCCC>
                                <%m_SQL = "SELECT F_name,F_Content,F_Addtime FROM CityCard_LeagueReview WHERE F_LeagueID="&m_ID&" order by F_Addtime desc"
				   Set rst = conn.Execute(m_SQL)
				   Do While Not rst.Eof %>
                                <tr bgcolor="#EEEEEE">
                                  <td width="36%" height="25">&nbsp;<font color="#888888"><B>评论者：</B></font><font color="#444444"><B><%=rst("F_name")%></B></font>
                                  <td><font color="#888888">&nbsp;评论发表时间：</font><font color="#888888">(<%=rst("F_Addtime")%>)</font></td>
                                </tr>
                                <tr>
                                  <td bgcolor="#FFFFFF" height="50" colspan="2"> ·<%=rst("F_Content")%></td>
                                </tr>
                                <%
				  rst.MoveNext
				  Loop
				  rst.Close
				  %>
                              </table>

                              <table width="100%" border="0" cellpadding="0" cellspacing="3">
                                <tr> 
                                  <td height="28" colspan="2"><strong><font color="#990000"> 
                                    欢迎您对该商家发表评论，谢谢！</font></strong></td>
                                </tr>
                                <tr> 
                                  <td width="14%" align="right">您的名字：</td>
                                  <td width="86%"><input name="txtName" type="text" value="网友" size="16"> 
                                    <input name="ID" type="hidden" value="<%=m_ID%>"></td>
                                </tr>
                                <tr> 
                                  <td align="right">评论内容：</td>
                                  <td><textarea name="txtContent" cols="40" rows="4"></textarea></td>
                                </tr>
								<tr>
                                  <td align="right">验 证 码：</td>
                                  <td><!--#include file="../Images/index/login.gif"--><input name="txtCheckCode" size="13" maxlength="4" style="BORDER-RIGHT: rgb(182,182,182) 1px solid; BORDER-TOP: rgb(182,182,182) 1px solid; FONT-WEIGHT: lighter; FONT-SIZE: 12px; BORDER-LEFT: rgb(182,182,182) 1px solid; BORDER-BOTTOM: rgb(182,182,182) 1px solid; FONT-FAMILY: 奔覆"> 
                          <img src="../include/checkcode.asp"></td>
                                </tr>
                                <tr> 
                                  <td>&nbsp;</td>
                                  <td><input type="submit" name="Submit" value="发表"> 
                                    <input type="reset" name="Submit2" value="重新填写"></td>
                                </tr>
                              </table></td>
                          </form>
                        </tr>
                      </table></td>
                  </tr>
                </table></TD>
              <TD background="../images/card/list-table03.jpg"><IMG height=520 alt="" src="../images/card/list-table03.jpg" 
            width=22></TD>
            </TR>
        <TR>
  <TD colSpan=3><IMG height=25 alt="" 
            src="../images/card/list-table04.jpg" 
    width=580></TD></TR></TBODY></TABLE></TD>
      <TD width="196" vAlign=top>
<div class="aListShow">
<div style="margin:5px"><TABLE width=100% 
            border=0 align=center cellPadding=0 cellSpacing=0>
              <TBODY>
              <TR>
                <TD width=14% align=middle><IMG height=18 
                  src="../images/card/013.gif" width=18></TD>
                <TD width=40% align=middle class="aTexe14"><A href="../news/">新闻资讯</A></TD>
                <TD width=17% height=20 bgColor=#FF9900></TD>
                <TD width=29% bgColor=#FF9900><A href="../news/"><span class="aTexeMore" >更多&gt;&gt;</span></A></TD>
              </TR></TBODY></TABLE>
</div>
<%m_SQL = "SELECT TOP 10 title,id FROM tb_news where lm='8' ORDER BY id DESC"
Set rst = conn.Execute(m_SQL)
Do While Not rst.Eof
response.write "<div class=aList1>·<a href=../News/Show.asp?ArticleID="&rst("id")&" title="&rst("title")&">"&rst("title")&"</a></div>"
rst.MoveNext
Loop
rst.Close%></div>
<div class="aListShow">
<div style="margin:5px"><TABLE width=100% 
            border=0 align=center cellPadding=0 cellSpacing=0>
              <TBODY>
              <TR>
                <TD width=14% align=middle><IMG height=18 
                  src="../images/card/013.gif" width=18></TD>
                <TD width=40% align=middle class="aTexe14"><A href="../info/Class_index.htm">信息广场</A></TD>
                <TD width=17% height=20 bgColor=#FF9900></TD>
                <TD width=29% bgColor=#FF9900><A href="../info/Class_index.htm"><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>  
<div class="aListShow">
<div style="margin:5px"><TABLE width=100% border=0 align=center cellPadding=0 cellSpacing=0>
              <TBODY>
              <TR>
                <TD width=14% align=middle><IMG height=18 src="../images/card/013.gif" width=18></TD>
                <TD width=40% align=middle class="aTexe14"><A href="../Tour/Travel_Sightall.asp">旅游景点</A></TD>
                <TD width=17% height=20 bgColor=#FF9900></TD>
                <TD width=29% bgColor=#FF9900><A href="../Tour/Travel_Sightall.asp"><span class="aTexeMore" >更多&gt;&gt;</span></A></TD>
              </TR></TBODY></TABLE>
</div>
<%m_SQL = "SELECT TOP 10 F_ID,F_SightName,F_Place From Tour_TravelSight 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_SightShow.asp?ID="&rst("F_ID")&" title="&rst("F_Place")&">"&rst("F_SightName")&"</a></div>"
rst.MoveNext
Loop
rst.Close%></div>  
	  </TD>
</TR></TBODY></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 6 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>
