<!--#include file="../include/Conn.jsp"-->
<!--#include file="../Include/Char.jsp" -->
<!--#include file="Admin_IsLogin.jsp" -->
<%
'Define Variable 
dim i
dim rs
dim mGrade,m_SQL,mFlag,mBgColor
'initialization 
mFlag=true'add

'Display
if request("action")="edit" then 
 m_SQL="Select * From CityCard_League Where companyid="&Request.QueryString("ModifyID")
 Set rs = conn.Execute(m_SQL)
 if Not rs.Eof then
   m_UserName = rs("username")
   m_Password = rs("password")
   m_CompanyName = rs("name")
   m_iscard=rs("iscard")
   m_PayClass = rs("payclass")
   m_Operation = rs("operation")
   m_Grade = rs("grade")
   m_CityTypeID = rs("stateid")
   m_AreaTypeID = rs("cityid")
   m_TradeType = rs("hangyeid")
   m_Traffic = rs("traffic")
   m_Tbtj = rs("Tbtj")
   m_Linkman = rs("linkman")
   m_BusinessHours = rs("startbusinesstime")
   m_BusinessHours2 = rs("endbusinesstime")
   m_YouhuiTime = rs("starttime")
   m_YouhuiTime2 = rs("endtime")
   m_Other = rs("businesstimecontent")
   m_Consume = rs("Consume")
   m_Tel = rs("tel")
   m_StarGradeTypeID = rs("cabaretgrade")
   m_Address = rs("address")
   m_WebSite = rs("website")
   m_Car = rs("car")
   m_Commend = rs("tuijian")
   m_Agio = rs("agio")
   m_AgioContent = rs("agiocontent")
   m_Image = rs("logo")
   m_Image1 = rs("logo1")
   m_Image2 = rs("logo2")
   m_Image3 = rs("logo3")
   m_Image4 = rs("logo4")
  ' m_Image5 = rs("logo5")

   m_Intro = rs("content")
 End if
 mFlag=false
 rs.Close
end if

if Request.ServerVariables("REQUEST_METHOD")="POST" then
   m_UserName = checkStr(Trim(Request.Form("txtUserName")))
   m_Password = checkStr(Trim(Request.Form("txtPassword")))
   m_PayClass = checkStr(Trim(Request.Form("txtPayClass")))
   m_Operation = checkStr(Trim(Request.Form("txtOperation")))   
   m_CompanyName = checkStr(Trim(Request.Form("txtCompanyName")))
   m_TypeID = Request.Form("TypeID")
   if instr(m_TypeID,":") <> 0 then
     m_CityTypeID = mid(m_TypeID,1,instr(m_TypeID,":")-1)
     m_AreaTypeID = mid(m_TypeID,instr(m_TypeID,":")+1)
   else
	 m_CityTypeID = 0
	 m_AreaTypeID = 0
   end if
   m_TradeType = checkStr(Trim(Request.Form("selTrade")))
   m_Grade = checkStr(Trim(Request.Form("selGrade")))
   m_Traffic = checkStr(Trim(Request.Form("txtTraffic")))
   m_Consume = checkStr(Trim(Request.Form("txtConsume")))
   m_Linkman = checkStr(Trim(Request.Form("txtLinkman")))
   m_BusinessHours = checkStr(Trim(Request.Form("txtBusinessHours")))
   m_BusinessHours2 = checkStr(Trim(Request.Form("txtBusinessHours2")))
   m_YouhuiTime = (Trim(Request.Form("txtYouhuiTime")))
   m_YouhuiTime2 = (Trim(Request.Form("txtYouhuiTime2")))
   m_Other = checkStr(Trim(Request.Form("txtOther")))
   m_Tbtj = checkStr(Trim(Request.Form("txtTbtj")))
   m_Tel = checkStr(Trim(Request.Form("txtTel")))
   m_StarGrade = checkStr(Trim(Request.form("selStarGrade")))
   m_Address = checkStr(Trim(Request.Form("txtAddress")))
   m_WebSite = checkStr(Trim(Request.Form("txtWebSite")))
   m_Car = checkStr(Trim(Request.Form("txtCar")))
   m_Commend = checkStr(Trim(Request.Form("txtCommend")))
   m_Agio = checkStr(Trim(Request.Form("txtAgio")))
   m_AgioContent = checkStr(Trim(Request.Form("txtAgioContent")))
   m_Image = checkStr(Trim(Request.Form("txtImage")))
   m_Image1 = checkStr(Trim(Request.Form("txtImage1")))
   m_Image2 = checkStr(Trim(Request.Form("txtImage2")))
   m_Image3 = checkStr(Trim(Request.Form("txtImage3")))
   m_Image4 = checkStr(Trim(Request.Form("txtImage4")))
   m_uptype = checkStr(Trim(Request.Form("up_type")))'判定是/否为消费卡加盟商
   if m_uptype="" then
   m_uptype="0"
   end if
   m_uptype1 = checkStr(Trim(Request.Form("up_type1")))'判定是/否为手机短信加盟商
   if m_uptype1="" then
   m_uptype1="0"
   end if
   m_uptype=m_uptype&","&m_uptype1
   m_Intro = checkStr(rTrim(Request.Form("txtIntro")))

  if Request.Querystring("action")="Insert" then
    m_SQL = "Select * From CityCard_League Where username='"&m_UserName&"'"
	Set rs = conn.Execute(m_SQL)
	if not rs.Eof then
	   rs.Close
	   call msgbox("对不起，该用户名已存在，请更换用户名后再试",1)
	else
	  rs.Close
	  m_Sql = "Insert Into CityCard_League(username,password,name,iscard,operation,payclass,grade,hangyeid,stateid,cityid,traffic,Consume,linkman,startbusinesstime,endbusinesstime,starttime,endtime,businesstimecontent,tbtj,tel,cabaretgrade,address,website,car,tuijian,agio,agiocontent,content,adddate,ischecked,logo,logo1,logo2,logo3,logo4)"
	  m_Sql = m_Sql + "Values('"&m_UserName&"','"&m_Password&"','"&m_CompanyName&"','"&m_uptype&"','"&m_Operation&"','"&m_PayClass&"','"&m_Grade&"',"&m_TradeType&","&m_CityTypeID&","&m_AreaTypeID&",'"&m_Traffic&"','"&m_Consume&"','"&m_Linkman&"','"&m_BusinessHours&"','"&m_BusinessHours2&"','"&m_YouhuiTime&"','"&m_YouhuiTime2&"','"&m_Other&"','"&m_Tbtj&"','"&m_Tel&"',"&m_StarGrade&",'"&m_Address&"','"&m_Website&"','"&m_Car&"','"&m_Commend&"','"&m_Agio&"','"&m_AgioContent&"','"&m_Intro&"','"&now&"',1,'"&m_Image&"','"&m_Image1&"','"&m_Image2&"','"&m_Image3&"','"&m_Image4&"')"
	  response.Write(m_sql)
	  conn.Execute(m_Sql)
      response.redirect "Admin_AgioLeague.jsp?action=IsInsert&pageno="&Request("pageno")
     end if '//rs.eof
   end if
  
   if Request.Querystring("action")="Modify" then
      m_SQL = "UPDATE CityCard_League SET"
      m_SQL = m_SQL+" username='"&m_UserName&"',"
      if m_Password <> "" then  m_SQL = m_SQL+" password='"&m_Password&"',"
      m_SQL = m_SQL+" name='"&m_CompanyName&"',"
	  m_SQL = m_SQL+" iscard='"&m_uptype&"',"	  
	  m_SQL = m_SQL+" grade='"&m_Grade&"',"
	  m_SQL = m_SQL+" operation='"&m_Operation&"',"
	  m_SQL = m_SQL+" payclass='"&m_PayClass&"',"
      m_SQL = m_SQL+" hangyeid="&m_TradeType&","
      m_SQL = m_SQL+" stateid="&m_CityTypeID&","
      m_SQL = m_SQL+" cityid="&m_AreaTypeID&","
      m_SQL = m_SQL+" traffic='"&m_Traffic&"',"
      m_SQL = m_SQL+" Consume='"&m_Consume&"',"
      m_SQL = m_SQL+" linkman='"&m_Linkman&"',"
      m_SQL = m_SQL+" startbusinesstime='"&m_BusinessHours&"',"
      m_SQL = m_SQL+" endbusinesstime='"&m_BusinessHours2&"',"
      m_SQL = m_SQL+" starttime='"&m_YouhuiTime&"',"
      m_SQL = m_SQL+" endtime='"&m_YouhuiTime2&"',"
      m_SQL = m_SQL+" businesstimecontent='"&m_Other&"',"
      m_SQL = m_SQL+" Tbtj='"&m_Tbtj&"',"
      m_SQL = m_SQL+" tel='"&m_Tel&"',"
      m_SQL = m_SQL+" cabaretgrade="&m_StarGrade&","

      m_SQL = m_SQL+" address='"&m_Address&"',"
      m_SQL = m_SQL+" website='"&m_Website&"',"
      m_SQL = m_SQL+" car='"&m_Car&"',"
      m_SQL = m_SQL+" tuijian='"&m_Commend&"',"
      m_SQL = m_SQL+" agio='"&m_Agio&"',"
      m_SQL = m_SQL+" agiocontent='"&m_AgioContent&"',"
	  m_SQL = m_SQL+" logo='"&m_Image&"',"
	  m_SQL = m_SQL+" logo1='"&m_Image1&"',"
	  m_SQL = m_SQL+" logo2='"&m_Image2&"',"
	  m_SQL = m_SQL+" logo3='"&m_Image3&"',"
	  m_SQL = m_SQL+" logo4='"&m_Image4&"',"
	  'm_SQL = m_SQL+" logo5='"&m_Image5&"',"

      m_SQL = m_SQL+" content='"&m_Intro&"'"
      m_SQL = m_SQL +" WHERE companyid=" & Request("ModifyID") 
      conn.Execute(m_SQL)
      Response.redirect "Admin_AgioLeague.jsp?action=IsModify&pageno="&Request("pageno")
    End if
 End if
 
'Delect Records
if request("action")="Delete" then
  m_SQL = "DELETE FROM CityCard_League WHERE companyid=" &Request.QueryString("DeleteID")
  conn.execute m_SQL
  Response.write "<script>location.replace('Admin_AgioLeague.jsp?action=IsDelete&pageno="&Request.Querystring("pageno")&"')</script>"
end if
%>

<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="images/Style.css" rel="stylesheet" type="text/css">
<SCRIPT language="JavaScript">
function jDelete(url)
{
  if((confirm(" 警告:请确定是否删除,删除后不能恢复! "))==true) 
	self.location=url+'&action=Delete';
}
</SCRIPT>
<script language="javascript">
function CheckData(){
  if (document.form1.txtUserName.value=="")
   {
    alert("对不起,用户名不能为空，请输入！");
	document.form1.txtUserName.focus();
	return false;
   }
}
</script>
</head>
<body text="#000000" >
<table width="100%" height="1"  border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td></td>
  </tr>
</table>
<TABLE width=100% height=95% border=1 align="center" cellPadding=0 
cellSpacing=0 borderColor=#7c96b8 borderColorDark=#ffffff>
  <TBODY>
    <TR> 
      <TD align=center valign="top">
        <%
      admin_flag=",5|2|0,"
      if instr(session("flag"),admin_flag)=0 or isnull(session("flag"))=true then
         Response.write "<br><br><br><br><b><font color=red>对不起，您没有管理本页面的权限!</font></B>"
		 Response.end
	  end if
      %>
        <table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="#dde1ec">
          <tr><form name="frmSearch" method="post" action="Admin_AgioLeague.jsp">
              <td align="center" bgcolor="#FFFFFF"> 请输入关键字 
                <input type="text" name="Keywords" class="text"> 
				<select name="TradeType" class="text">
			  <%
			   Response.write "<option value='-1'>所有类别</option>"
			   m_SQL = "SELECT F_ID,F_Value FROM T_TradeType ORDER BY F_ID "
			   Set rs = conn.Execute(m_SQL)
			   Do While Not rs.Eof
			     Response.write "<option value='"&rs(0)&"'>"&rs(1)&"</option>"
				 rs.MoveNext
			   Loop
			   rs.Close
			   %>
                </select>
				<input name="btnSearch" type="submit"  value="搜索"> </td>
            </form>
          </tr>
        </table> 
        <table width="100%" border="0" cellspacing="1" cellpadding="0" align="center">
          <tr style="cursor:hand" onMouseOut="this.style.backgroundColor=''" onMouseOver="this.style.backgroundColor='#EBEEF6'"  bgcolor="#dde1ec" align="center"> 
            <td width="5%" height="11"><font color="#666666"><b>级别</b></font></td>
            <td width="9%"><font color="#666666"><b>用户名</b></font></td>
            <td bgcolor="#dde1ec"><font color="#666666"><b>商家名称</b></font></td>
            <td width="6%" bgcolor="#dde1ec"><strong><font color="#666666">签约</font></strong></td>
            <td width="8%"><font color="#666666"><b>地区</b></font></td>
            <td width="9%"><font color="#666666"><b>所属分类</b></font></td>
            <td width="5%"><font color="#666666"><b>推荐</b>&nbsp;</font></td>
            <td width="6%"><strong>登陆</strong></td>
            <td width="14%"><strong>在线申请信息</strong></td>
            <td width="5%"><strong><font color="#666666">审核</font></strong></td>
            <td width="12%"><font color="#666666"><b>管理<a title="添加记录" href='Admin_AgioLeague.jsp?pageno=<%=mPage%>#anInsert'><font color="#FF0000">[添加]</font></a></b></font></td>
          </tr>
        </table>
        <table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#ebeef6">
   <%  
	Keywords = Trim(Request("keywords"))
	TradeType = Trim(Request("TradeType"))
	Set rs=Server.createobject("Adodb.RecordSet")
    pageno=request.querystring("pageno")
    pmcount=16  
    m_SQL = "SELECT * FROM CityCard_League WHERE (iscard<>'0,0')"
	if TradeType <> "" and TradeType <> "-1" then
      m_SQL = m_SQL + " AND hangyeid="&TradeType
	end if

    m_SQL = m_SQL +" and (name like  '%" & Keywords & "%'"
	m_SQL = m_SQL +" or address like  '%" & Keywords & "%'"
	m_SQL = m_SQL +" or username like  '%" & Keywords & "%')"

	m_SQl = m_SQL + " order by companyid desc,cityid desc"
	rs.open m_SQL,conn,1,1

	if rs.eof then
	   'response.write "<br><p  align='center'><font color=red><B> 对不起，数据已清空！</B></font></p>"
    else
    rs.pagesize=pmcount
    mpage=rs.pagecount
    if pageno="" then pageno=1
    if  cint(pageno)<1 or cint(pageno)>mpage then  pageno=1
    rs.absolutepage=pageno

 Dim rc,re
 rc=rs.pagesize
 re=1
 do while not rs.eof and rc>0
 mBgColor=Request.Querystring("BgColor")
 if Trim(rs("companyid"))=Trim(mBgColor) then mColor= "D6DFFF" else mColor= "ffffff"
 if Trim(rs("ischecked"))="1" then onColor= "#EBEEF6" else onColor= "#FF9797"
 amid=split(rs("iscard"),",")
%>
          <tr bgcolor="<%=mColor%>"   onmouseout="this.style.backgroundColor=''" onMouseOver="this.style.backgroundColor='<%=onColor%>'" > 
            <td width="5%" align="center"><%=left(rs("grade"),2)%></td>
            <td width="9%" align="center" ><a href="../CardManage/Login.jsp?ID=<%=rs("companyid")%>" target="_blank"><%=rs("username")%></A></td>
            <td> <a target='_blank' href="../jubao/Show.jsp?ID=<%=rs("companyid")%>"> 
              <%=rs("name")%> </a><font color="#FF0000">(<%=rs("Agio")%>)
			  <%  if amid(1)="1" then  %>
			  <img src="Images/sms.gif" width="18" height="14" title="短信加盟商家">
			  <% end if %>
              <A href="../jubao/Admin_CreateHtml.jsp?id=<%=rs("companyid")%>">[生成网页]</A> </font></td>
            <td width="6%" align="center"> <%=rs("operation")%> </td>
            <td width="8%" align="center" > <%
			m_SQL = "SELECT F_Value FROM T_TradeType Where F_ID=" & rs("hangyeid")
			Set rst = conn.Execute(m_SQL)
			if not rst.Eof then Response.Write rst(0)
			rst.Close
			%> </td>
            <td width="9%" align="center" > <%
			m_SQL = "SELECT F_Value FROM T_AreaType Where F_ID=" & rs("cityid")
			Set rst = conn.Execute(m_SQL)
			if not rst.Eof then Response.Write rst(0)
			rst.Close
			%> </td>
            <td width="5%" align="center" > <%=rs("tuijian")%> </td>
            <td width="6%" align="center" ><%=rs("LoginCount")%></td>
            <td width="14%" align="center" bgcolor="<%=mColor%>" >
			<%
			if Request("action")="isclear" then
			 mSql = "update CityCard_League Set request='' Where companyid="&Request("ID")
              conn.execute(mSql)
			  Response.redirect "Admin_AgioLeague.jsp?pageno="&Request("pageno")
			end if
			%>
			<a href="Admin_AgioLeague.jsp?action=isclear&pageno=<%=Request("pageno")%>&ID=<%=rs("companyid")%>" title ="点击清除当前申请信息"><%=rs("request")%></a></td>
            <td width="5%" align="center" > <%
			'推荐处理
			if Request("action") = "IsCommend" then
			  mIsCommend = Request("IsCommend")
			  if mIsCommend=1 then mIsCommend = 0 else mIsCommend = 1
			  mSql = "update CityCard_League Set ischecked= "&mIsCommend&" Where companyid="&Request("ID")
              conn.execute(mSql)
			  Response.redirect "Admin_AgioLeague.jsp?pageno="&Request("pageno")
			end if
			Response.Write "<a href='Admin_AgioLeague.jsp?action=IsCommend&IsCommend="&rs("ischecked")&"&pageno="&Request("pageno")&"&ID="&rs("companyid")&"'>"
			if rs("ischecked")=1 then Response.Write "<font color=red><b>通过</b></font>" Else Response.write "<font color=#0000FF><b>待审</b></font>"
			Response.Write "</a>"
			%> </td>
            <td width="12%" align="center" > <a title="修改记录" href='Admin_AgioLeague.jsp?action=edit&ModifyID=<%=rs("companyid")%>&BgColor=<%=rs("companyid")%>&pageno=<%=cstr(pageno)%>#anModify'><font color="#666666">[修改]</font></a> 
              <a title="请确定是否删除,删除后不能恢复!" href="javascript:jDelete('Admin_AgioLeague.jsp?DeleteID=<%=rs("companyid")%>&pageno=<%=cstr(pageno)%>')"><font color="#666666">[删除]</font></a></td>
          </tr>
          <%
 rs.movenext
 re=re+1
 rc=rc-1
 loop
 end if
%>
        </table> 
        <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="FFFFFF">
          <tr> 
            <td width="35%" height="22">
			  &nbsp;共
			  <font color=red><strong><% = rs.recordcount%></strong></font>
			  条记录 当前第
			  <font color=red><strong><% = Trim(pageno)%></strong></font>页/共
			  <font color=red><strong><% = Trim(mpage)%></strong></font>页
			  </td>
            <td width="65%" align="right"> 
<%
if pageno="" then pageno=1
if pageno>1 then
   response.write "<a href='Admin_AgioLeague.jsp?keywords="&Keywords&"&TradeType="&TradeType&"'> <img alt='首页' src='Images/boqb02.gif' border=0 width='15' height='14'></a>"
else
   response.write "<img alt='首页' src='Images/boqb02.gif' border=0 width='15' height='14'>"
end if

if pageno>1 then
   response.write "<a href='Admin_AgioLeague.jsp?pageno="&pageno-1&"&keywords="&Keywords&"&TradeType="&TradeType&"'><img alt='上一页' src='Images/bob02.gif' border=0 width='15' height='14'></a>"
else
   response.write "<img alt='上一页' src='Images/bob02.gif' border=0 width='15' height='14'>"
end if

add=5'数字分页个数+1
if pageno-int(add/2)<=1 then m=1 else m=pageno-int(add/2)
if m+add>mpage then 
   n=mpage
   if mpage-add<=1 then m=1 else m=mpage-add
else
   n=m+add
end if

for pno=m to n
 if pno=cint(pageno) then
   response.write "&nbsp;<font color=red>"&pno&"</font>"
 else
   response.write "<b>&nbsp;<a href='Admin_AgioLeague.jsp?pageno="&pno&"&keywords="&Keywords&"&TradeType="&TradeType&"'>"&pno&"</a></b>"
 end if
next
response.write "&nbsp"

if int(pageno) < int(rs.pagecount) then
  response.write "<a href='Admin_AgioLeague.jsp?pageno="&pageno+1&"&keywords="&Keywords&"&TradeType="&TradeType&"'><img alt='下一页' src='Images/fbob02.gif' border=0 width='15' height='14'></a>"
else 
  response.write "<img alt='下一页' src='Images/fbob02.gif' border=0 width='15' height='14'>"
end if

if int(pageno) < int(rs.pagecount) then
   response.write "<a href='Admin_AgioLeague.jsp?pageno="&mpage&"&keywords="&Keywords&"&TradeType="&TradeType&"'><img alt='末页' src='Images/fboqb02.gif' border=0 width='15' height='14'></a>"
else
   response.write "<img alt='末页' src='Images/fboqb02.gif' border=0 width='15' height='14'>"
end if
Response.write "&nbsp;&nbsp;"
%>
            </td>
          </tr>
        </table>
        <%if mFlag=true then'add%>
        <strong><font color=red><a name="anInsert"></a></font></strong> 
        <table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td height="32" align="center" bgcolor="FFFFFF"><strong><font color=red> 
              <%
		  if Request.QueryString("action")="IsInsert" then response.write "提示：记录添加成功！" 
		  if Request.QueryString("action")="IsDelete" then response.write "提示：记录删除成功！" 
		  if Request.QueryString("action")="IsModify" then response.write "提示：记录修改成功！" 
  		  if Trim(Request.QueryString("action"))="" then response.write "提示：当前为添加状态！" 
		%>
              </font></strong></td>
          </tr>
        </table> 
        <strong><font color=red> </font></strong> 
        <table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
          <tr> 
            <form name="form1" method="post" action="Admin_AgioLeague.jsp?action=Insert" onSubmit="return CheckData()">
              <td> <table width="100%" border="0" cellpadding="2" cellspacing="0">
                  <tr background="Images/mmTo.gif"> 
                    <td height="6" background="Images/mmTo.gif"> <span style="CURSOR: hand; FILTER: dropshadow(color=#FFFFFF, offx=1, offy=1, positive=1);  WIDTH: 100%">功能：添加记录</span></td>
                  </tr>
                  <tr> 
                    <td valign="top" bgcolor="fcfcfc"> 
                      <table width="100%" border="0" cellspacing="2" cellpadding="0">
                      
						<tr> 
                          <td width="12%" height="19">用 户 名：</td>
                          <td width="88%"><input name="txtUserName" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="" size="21" maxlength="20"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="19">密　　码：</td>
                          <td width="88%"> <input name="txtPassword" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="888888" size="21" maxlength="20">
                            //如果不输入密码,密码为888888</td>
                        </tr>
                        <tr> 
                          <td width="12%" height="19">商家名称：</td>
                          <td width="88%"><input name="txtCompanyName" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="" size="36" maxlength="20"></td>
                        </tr>
						  <tr> 
                          <td width="12%" height="19">签　　单：</td>
                          <td width="88%"><input name="txtOperation" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="" size="21" maxlength="20">
                          </td>
                        </tr>
						<tr> 
                          <td width="12%" height="19">加盟类型：</td>
                          <td width="88%"> 
                            <input name="up_type" type="checkbox" id="up_type" value="1" checked>
                            聚宝卡加盟商
                            <input name="up_type1" type="checkbox" id="up_type1" value="1">
                            手机短信加盟商</td>
                        </tr>
						                        <tr> 
                          <td width="12%" height="19">商家级别：</td>
                          <td width="88%"><select name="selGrade">
                              <option value="1" selected>普通商家</option>
							  <option value="2">铜牌商家</option>                              
                              <option value="3">银牌商家</option>
							  <option value="4">金牌商家</option>
                            </select></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="19">所属分类：</td>
                          <td width="88%"> <select name="selBigCategory" onChange="TypeChange(this);" >
                              <%
             m_SQL="Select F_ID,F_Value From T_CityType order by F_ID"
			 Set rs = conn.Execute(m_SQL)

			 mBigArray = rs.GetRows()
			 for i=0 to ubound(mBigArray,2)
			   m_SQL2="Select * From T_AreaType Where F_CityTypeID="&mBigArray(0,i)&" order by F_Grade"
			   Set rs = conn.Execute(m_SQL2)
			   strSmallCategory = mBigArray(0,i)&"-"
			   Do While not rs.Eof 
   			     strSmallCategory = strSmallCategory & rs("F_ID")&"+"&rs("F_Value")+"-"
				 rs.Movenext
			   Loop
			   Response.write "<option value="&strSmallCategory&">"&mBigArray(1,i)&"</option>"
			 next'for
          %>
                            </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'>";
for(i=1;i<sSubTypeArray.length-1;i++)
{
 sTemp=sSubTypeArray[i].split("+");

 sString+="<option value='"+sBigTypeID+":"+sTemp[0]+"'>"+sTemp[1]+"</option>";
}
 sString+="<option value='"+sBigTypeID+":0'>全　部</option>";
sString+="</Select>"
form1.TypeID.outerHTML=sString;

}
</script> <select name="TypeID" >
                            </select> <script language="javascript">TypeChange(form1.selBigCategory);</script></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="2">地 　区：</td>
                          <td width="88%"> <select name="selTrade">
                              <%
			   m_SQL = "SELECT F_ID,F_Value FROM T_TradeType ORDER BY F_ID "
			   Set rs = conn.Execute(m_SQL)
			   Do While Not rs.Eof
			     Response.write "<option value='"&rs(0)&"'>"&rs(1)&"</option>"
				 rs.MoveNext
			   Loop
			   rs.Close
			   %>
                            </select></td>
                        </tr>
                         <tr> 
                          <td width="12%" height="19">付款方式：</td>
                          <td width="88%"><input name="txtPayClass" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="" size="21" maxlength="20"></td>
                        </tr>
					    <tr> 
                          <td width="12%" height="4">地　　址：</td>
                          <td><input name="txtAddress" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" size="36" maxlength="120"> 
                          </td>
                        </tr>
                        <tr> 
                          <td width="12%" height="9">交　　通：</td>
                          <td><input name="txtTraffic" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" size="36" maxlength="120"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="19">电　　话：</td>
                          <td width="88%"><input name="txtTel" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="" size="21" maxlength="120"> 
                          </td>
                        </tr>
                        <tr> 
                          <td width="12%" height="8">联 系 人：</td>
                          <td width="88%"><input name="txtLinkman" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="" size="21" maxlength="120"> 
                          </td>
                        </tr>
                        <tr> 
                          <td width="12%" height="9">人均消费：</td>
                          <td><input name="txtConsume" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" size="36" maxlength="80"> 
                          </td>
                        </tr>
                        <tr> 
                          <td width="12%" height="8">网　　址：</td>
                          <td width="88%"><input name="txtWebsite" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" size="36" maxlength="80"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="-2">特别推荐：</td>
                          <td><input name="txtTbtj" type="text" style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" size="60" > 
                            <font size="2">&nbsp; </font></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="8">营业时间：</td>
                          <td width="88%">自 
                            <input name="txtBusinessHours" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" size="8" maxlength="80">
                            至 
                            <input name="txtBusinessHours2" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" size="8" maxlength="80"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="17">补充说明：</td>
                          <td width="88%"><input name="txtOther" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" size="36" maxlength="80"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="8">优惠期限：</td>
                          <td width="88%">自 
                            <input name="txtYouhuiTime" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" size="8" maxlength="80">
                            至 
                            <input name="txtYouhuiTime2" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" size="8" maxlength="80"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="8">酒店星级：</td>
                          <td width="88%"> <select name="selStarGrade">
                              <%
			   m_SQL = "SELECT F_ID,F_Value FROM Tour_StarGradeType ORDER BY F_ID DESC"
			   Set rs = conn.Execute(m_SQL)
			   Do While Not rs.Eof
			     Response.write "<option value='"&rs(0)&"'>"&rs(1)&"</option>"
				 rs.MoveNext
			   Loop
			   rs.Close
			   %>
                            </select>
                            非酒店不需输入</td>
                        </tr>
                        <tr> 
                          <td width="12%" height="17">停 车 位：</td>
                          <td width="88%"><input name="txtCar" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" size="36" maxlength="80"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="-2">商家标志：</td>
                          <td><input name="txtImage" type="text" style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" size="36"> 
                            <font size="2"> 
                            <input style="width:70;border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" type="button" value="上传图片" name="UpImage13" onClick="javascript:window.open('UploadWindows.jsp?Uploadpath=../CardManage/UploadLogoImages&ReturnForm=form1&ReturnText=txtImage','upload','top=20,left=30,height=134,width=420,scrollbars=no,resizable=no')">
                            </font></td>
                        </tr>
                       <!--
					    <tr> 
                          <td width="12%" height="-2">形像照片1：</td>
                          <td><input name="txtImage1" type="text" style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" size="36"> 
                            <font size="2"> 
                            <input style="width:70;border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" type="button" value="上传图片" name="UpImage13" onClick="javascript:window.open('UploadWindows.jsp?Uploadpath=../Consumed/UploadImages&ReturnForm=form1&ReturnText=txtImage1','upload','top=20,left=30,height=134,width=420,scrollbars=no,resizable=no')">
                            </font></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="-2">形像照片2：</td>
                          <td><input name="txtImage2" type="text" style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" size="36"> 
                            <font size="2"> 
                            <input style="width:70;border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" type="button" value="上传图片" name="UpImage13" onClick="javascript:window.open('UploadWindows.jsp?Uploadpath=../Consumed/UploadImages&ReturnForm=form1&ReturnText=txtImage2','upload','top=20,left=30,height=134,width=420,scrollbars=no,resizable=no')">
                            </font></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="-2">形像照片3：</td>
                          <td><input name="txtImage3" type="text" style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" size="36"> 
                            <font size="2"> 
                            <input style="width:70;border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" type="button" value="上传图片" name="UpImage13" onClick="javascript:window.open('UploadWindows.jsp?Uploadpath=../Consumed/UploadImages&ReturnForm=form1&ReturnText=txtImage3','upload','top=20,left=30,height=134,width=420,scrollbars=no,resizable=no')">
                            </font></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="-2">形像照片4：</td>
                          <td><input name="txtImage4" type="text" style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" size="36"> 
                            <font size="2"> 
                            <input style="width:70;border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" type="button" value="上传图片" name="UpImage13" onClick="javascript:window.open('UploadWindows.jsp?Uploadpath=../Consumed/UploadImages&ReturnForm=form1&ReturnText=txtImage4','upload','top=20,left=30,height=134,width=420,scrollbars=no,resizable=no')">
                            </font></td>
                        </tr>
						
						-->
                        <tr> 
                          <td width="12%" height="8"><font color="#FF6600">推 荐 
                            度：</font></td>
                          <td width="88%"><input name="txtCommend" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" size="12" maxlength="4"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="8"><font color="#FF6600">打折：</font></td>
                          <td width="88%"><input name="txtAgio" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" size="12" maxlength="20"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="8"><font color="#FF6600">折扣说明：</font></td>
                          <td width="88%"><textarea name="txtAgioContent" cols="86" style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff"></textarea></td>
                        </tr>
                        <tr> 
                          <td>商家介绍： </td>
                          <td><textarea name="txtIntro" id="txtIntro" cols="86" rows="16" style="display:none" ></textarea>
						  <IFRAME ID="LatticeEditDocument" SRC="../Editor/eWebEditor.jsp?id=txtIntro&style=standard" FRAMEBORDER="0" SCROLLING="no" WIDTH="620" HEIGHT="350"></IFRAME>
						  </td>
                        </tr>
                        <tr> 
                          <td height="37" colspan="2"><input  type="submit" value="提交信息" name="B32" style="width:80;border:1 solid #9a9999; font-size:9pt; background-color:f2f2f2"> 
                            &nbsp; <input type="reset" value="从新来过" name="B32" style="width:80;border:1 solid #9a9999; font-size:9pt; background-color:#f2f2f2"></td>
                        </tr>
                      </table>
                      
                    </td>
                  </tr>
                </table></td>
            </form>
          </tr>
        </table>
        <%else%>
        <strong><font color=red><a name="anModify"></a></font></strong> 
        <table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr> 
            <td height="32" align="center" bgcolor="ffffff"><strong><font color=red> 
       <%
		  if Request.QueryString("action")="IsInsert" then response.write "提示：记录添加成功！" 
		  if Request.QueryString("action")="IsDelete" then response.write "提示：记录删除成功！" 
		  if Request.QueryString("action")="IsModify" then response.write "提示：记录修改成功！" 
		  if Trim(Request.QueryString("action"))="edit" then response.write "提示：当前为修改状态！" 
	   %>
              </font></strong></td>
          </tr>
        </table>
        <table width="100%" border="0" cellspacing="0" cellpadding="0" align="center" height="54">
          <tr> 
            <form name="form1" method="post" action="Admin_AgioLeague.jsp?action=Modify&pageno=<%=request("pageno")%>&ModifyID=<%=request("ModifyID")%>" onSubmit="return CheckData()">
              <td> <table width="100%" border="0" cellpadding="2" cellspacing="0">
                  <tr background="Images/mmTo.gif"> 
                    <td height="6" background="Images/mmTo.gif"> <span style="CURSOR: hand; FILTER: dropshadow(color=#FFFFFF, offx=1, offy=1, positive=1);  WIDTH: 100%">功能：修改记录</span></td>
                  </tr>
                  <tr> 
                    <td valign="top" bgcolor="fcfcfc">
					<table width="100%" border="0" cellspacing="2" cellpadding="0">
                        <tr> 
                          <td width="12%" height="19">用 户 名：</td>
                          <td width="88%"><input name="txtUserName" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_UserName%>" size="21" maxlength="20"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="19">密　　码：</td>
                          <td width="88%"> <input name="txtPassword" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_Password%>" size="21" maxlength="20"> 
                          </td>
                        </tr>
                        <tr> 
                          <td width="12%" height="19">商家名称：</td>
                          <td width="88%"><input name="txtCompanyName" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_CompanyName%>" size="36" maxlength="20"></td>
                        </tr>
						<tr> 
                          <td width="12%" height="19">签　　单：</td>
                          <td width="88%"><input name="txtOperation" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_Operation%>" size="21" maxlength="20"></td>
                        </tr>
						<tr> 
                          <td width="12%">加盟类型：</td>
                          <td width="88%" height="20">
						  <%
						   dim anid
			              anid=split(m_iscard,",")
						  %>
                            <input name="up_type" type="checkbox" id="up_type" value="1" <% if anid(0)="1" then %> checked <% end if %>>
                            聚宝卡加盟商
                            <input name="up_type1" type="checkbox" id="up_type1" value="1" <% if anid(1)="1" then %> checked <% end if %>>
                            手机短信加盟商
							</td>
                        </tr>
						<tr> 
                          <td width="12%" height="19">商家级别：</td>
                          <td width="88%"><select name="selGrade">
                              <option value="1" <%if m_Grade=1 then response.Write("selected")%>>普通商家</option>
							  <option value="2" <%if m_Grade=2 then response.Write("selected")%>>铜牌商家</option>
                              <option value="3" <%if m_Grade=3 then response.Write("selected")%>>银牌商家</option>
                              <option value="4" <%if m_Grade=4 then response.Write("selected")%>>金牌商家</option>
                            </select></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="19">所属分类：</td>
                          <td width="88%"> <select name="selBigCategory" onChange="TypeChange(this);" >
                              <%
             m_SQL="Select F_ID,F_Value From T_CityType order by F_ID"
			 Set rs = conn.Execute(m_SQL)
			 mBigArray = rs.GetRows()
			 for i=0 to ubound(mBigArray,2)
			   m_SQL2="Select * From T_AreaType Where F_CityTypeID="&mBigArray(0,i)&" order by F_Grade"
			   Set rs = conn.Execute(m_SQL2)
			   strSmallCategory = mBigArray(0,i)&"-"
			   Do While not rs.Eof 
   			     strSmallCategory = strSmallCategory & rs("F_ID")&"+"&rs("F_Value")+"-"
				 rs.Movenext
			   Loop
			   if m_CityTypeID = mBigArray(0,i) then
			      Response.write "<option selected value="&strSmallCategory&">"&mBigArray(1,i)&"</option>"
			   else
			      Response.write "<option value="&strSmallCategory&">"&mBigArray(1,i)&"</option>"
               end if
			 next'for
          %>
                            </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'>";
for(i=1;i<sSubTypeArray.length-1;i++)
{
 sTemp=sSubTypeArray[i].split("+");
 if (sTemp[0]==<%=m_AreaTypeID%>)
 sString+="<option selected value='"+sBigTypeID+":"+sTemp[0]+"'>"+sTemp[1]+"</option>";
 else
 sString+="<option value='"+sBigTypeID+":"+sTemp[0]+"'>"+sTemp[1]+"</option>";
}
 sString+="<option value='"+sBigTypeID+":0'>全　部</option>";
sString+="</Select>"
form1.TypeID.outerHTML=sString;
}
</script> <select name="TypeID" >
                            </select> <script language="javascript">TypeChange(form1.selBigCategory);</script> 
                          </td>
                        </tr>
                        <tr> 
                          <td width="12%" height="2">地　　区：</td>
                          <td width="88%"> <select name="selTrade">
                              <%
			   m_SQL = "SELECT F_ID,F_Value FROM T_TradeType ORDER BY F_ID "
			   Set rs = conn.Execute(m_SQL)
			   Do While Not rs.Eof
			      if (m_TradeType) = (rs("F_ID")) then
     				Response.write "<option value=" + cstr(rs("F_ID"))
           			Response.write " selected"
       				Response.write ">" + rs("F_Value")
                  Else
                    Response.write "<option value='" & rs("F_ID") &"'>"& rs("F_Value") &"</option>"
                  End if
				 rs.MoveNext
			   Loop
			   rs.Close
			   %>
                            </select></td>
                        </tr>
						<tr> 
                          <td width="12%" height="19">付款方式：</td>
                          <td width="88%"><input name="txtPayClass" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_PayClass%>" size="21" maxlength="20"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="4">地　　址：</td>
                          <td><input name="txtAddress" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_Address%>" size="36" maxlength="120"> 
                          </td>
                        </tr>
                        <tr> 
                          <td width="12%" height="9">交　　通：</td>
                          <td><input name="txtTraffic" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_Traffic%>" size="36" maxlength="120"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="19">电　　话：</td>
                          <td width="88%"><input name="txtTel" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_Tel%>" size="21" maxlength="120"> 
                          </td>
                        </tr>
                        <tr> 
                          <td width="12%" height="8">联 系 人：</td>
                          <td width="88%"><input name="txtLinkman" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_Linkman%>" size="21" maxlength="120"> 
                          </td>
                        </tr>
                        <tr> 
                          <td width="12%" height="9">人均消费：</td>
                          <td><input name="txtConsume" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_Consume%>" size="36" maxlength="80"> 
                          </td>
                        </tr>
                        <tr> 
                          <td width="12%" height="8">网　　址：</td>
                          <td width="88%"><input name="txtWebsite" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_Website%>" size="36" maxlength="80"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="-2">特别推荐：</td>
                          <td><input name="txtTbtj" type="text" style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_Tbtj%>" size="60" > 
                            <font size="2">&nbsp; </font></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="8">营业时间：</td>
                          <td width="88%">自 
                            <input name="txtBusinessHours" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_BusinessHours%>" size="8" maxlength="80">
                            至 
                            <input name="txtBusinessHours2" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_BusinessHours2%>" size="8" maxlength="80"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="17">补充说明：</td>
                          <td width="88%"><input name="txtOther" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_Other%>" size="36" maxlength="80"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="8">优惠期限：</td>
                          <td width="88%">自 
                            <input name="txtYouhuiTime" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_YouhuiTime%>" size="8" maxlength="80">
                            至 
                            <input name="txtYouhuiTime2" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_YouhuiTime2%>" size="8" maxlength="80"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="8">酒店星级：</td>
                          <td width="88%"> <select name="selStarGrade">
                              <%
			   m_SQL = "SELECT F_ID,F_Value FROM Tour_StarGradeType ORDER BY F_ID DESC"
			   Set rs = conn.Execute(m_SQL)
			   Do While Not rs.Eof
   			     if Trim(m_StarGradeTypeID) = Trim(rs("F_ID")) then
     				Response.write "<option value=" + cstr(rs("F_ID"))
           			Response.write " selected"
       				Response.write ">" + rs("F_Value")
                  Else
                    Response.write "<option value='" & rs("F_ID") &"'>"& rs("F_Value") &"</option>"
                  End if
				 rs.MoveNext
			   Loop
			   rs.Close
			   	 %>
                            </select></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="8">停 车 位：</td>
                          <td width="88%"><input name="txtCar" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_Car%>" size="36" maxlength="80"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="-2">商家标志：</td>
                          <td><input name="txtImage" type="text" style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_Image%>" size="36"> 
                            <font size="2"> 
                            <input style="width:70;border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" type="button" value="上传图片" name="UpImage13" onClick="javascript:window.open('UploadWindows.jsp?Uploadpath=../CardManage/UploadLogoImages&ReturnForm=form1&ReturnText=txtImage','upload','top=20,left=30,height=134,width=420,scrollbars=no,resizable=no')">
                            </font></td>
                        </tr>
                       <!--
					    <tr> 
                          <td width="12%" height="-2">形像照片1：</td>
                          <td><input name="txtImage1" type="text" style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_Image1%>" size="36"> 
                            <font size="2"> 
                            <input style="width:70;border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" type="button" value="上传图片" name="UpImage13" onClick="javascript:window.open('UploadWindows.jsp?Uploadpath=../Consumed/UploadImages&ReturnForm=form1&ReturnText=txtImage1','upload','top=20,left=30,height=134,width=420,scrollbars=no,resizable=no')">
                            </font></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="-2">形像照片2：</td>
                          <td><input name="txtImage2" type="text" style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_Image2%>" size="36"> 
                            <font size="2"> 
                            <input style="width:70;border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" type="button" value="上传图片" name="UpImage13" onClick="javascript:window.open('UploadWindows.jsp?Uploadpath=../Consumed/UploadImages&ReturnForm=form1&ReturnText=txtImage2','upload','top=20,left=30,height=134,width=420,scrollbars=no,resizable=no')">
                            </font></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="-2">形像照片3：</td>
                          <td><input name="txtImage3" type="text" style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_Image3%>" size="36"> 
                            <font size="2"> 
                            <input style="width:70;border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" type="button" value="上传图片" name="UpImage13" onClick="javascript:window.open('UploadWindows.jsp?Uploadpath=../Consumed/UploadImages&ReturnForm=form1&ReturnText=txtImage3','upload','top=20,left=30,height=134,width=420,scrollbars=no,resizable=no')">
                            </font></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="-2">形像照片4：</td>
                          <td><input name="txtImage4" type="text" style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_Image4%>" size="36"> 
                            <font size="2"> 
                            <input style="width:70;border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" type="button" value="上传图片" name="UpImage13" onClick="javascript:window.open('UploadWindows.jsp?Uploadpath=../Consumed/UploadImages&ReturnForm=form1&ReturnText=txtImage4','upload','top=20,left=30,height=134,width=420,scrollbars=no,resizable=no')">
                            </font></td>
                        </tr>
						-->
                        <tr> 
                          <td width="12%" height="8"><font color="#FF6600">推 荐 
                            度：</font></td>
                          <td width="88%"><input name="txtCommend" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_Commend%>" size="12" maxlength="10"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="8"><font color="#FF6600">打　　折：</font></td>
                          <td width="88%"><input name="txtAgio" type="text"  style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff" value="<%=m_Agio%>" size="12" maxlength="10"></td>
                        </tr>
                        <tr> 
                          <td width="12%" height="8"><font color="#FF6600">折扣说明：</font></td>
                          <td width="88%"><textarea name="txtAgioContent" cols="86" style="border:1 solid #9a9999; font-size:9pt; background-color:#ffffff"><%=m_AgioContent%></textarea></td>
                        </tr>
                        <tr> 
                          <td>商家介绍： </td>
                          <td><textarea name="txtIntro" id="txtIntro" cols="86" rows="16" style="display:none"><%=m_Intro%></textarea>
						  <IFRAME ID="LatticeEditDocument" SRC="../Editor/eWebEditor.jsp?id=txtIntro&style=standard" FRAMEBORDER="0" SCROLLING="no" WIDTH="620" HEIGHT="350"></IFRAME>
						  </td>                        
						</tr>
                        <tr> 
                          <td height="37" colspan="2"><input  type="submit" value="提交信息" name="B32" style="width:80;border:1 solid #9a9999; font-size:9pt; background-color:f2f2f2"> 
                            &nbsp; <input type="reset" value="从新来过" name="B32" style="width:80;border:1 solid #9a9999; font-size:9pt; background-color:#f2f2f2"></td>
                        </tr>
                      </table>
					</td>
                  </tr>
                </table></td>
            </form>
          </tr>
        </table>
        <%end if%>
      </TD>
    </TR>
  </TBODY>
</TABLE>
</body>
</html>
<%
 CloseDatabase
%>
