<!--#include virtual="/incs/config.asp" -->
<!--#include virtual="/incs/top.asp" -->
<!--#include virtual="/incs/present.asp" -->
<%
chk_log()
chk_newpwr 4,1,5
	mnme=SafeRequest("mnme")
	If mnme="" Then
	call errorpage(-2,"对不起，参数错误！")

	End If
if session("sysclass")>=5 then
query="select * from v_emllst   where m_dme ='"&mnme&"'"
elseif session("sysclass")>=4 then
query="select * from v_emllst  where m_dme ='"&mnme&"'  and  ((("&session("sysarestr")&" or u_myare=0) and u_rotnme='') or u_rotnme='"&session("usrname")&"')"
end if
	conn.open constr
	rs.open query,conn,1,1
    if rs.recordcount<>1 then
	rs.close
	conn.close
	call errorpage(-2,"对不起，该邮局不存在或者您无权操作！")

	end if

%>
<%
			    m_dme = rs("m_dme") 
				mailname=m_dme
			    proid=trim(rs("m_prd"))
				g_sst=rs("m_sst")

		%>
<script language=javascript>
		function expl()
		{
		if (identity.style.display=="none")
		identity.style.display="block";
		else
		identity.style.display="none";
		}
		
		function deleteit(proid)
{
if (confirm("确认删除此邮局吗？"))
{location.href="/master/pdtmng/eml_mng/eml_del.asp?mailname="+proid;
}
}

		</script>
<table cellspacing=2 cellpadding=0 width="100%" border=0>
  <tbody> 
  <tr> 
    <td  colspan=2 valign="middle"> 
      <table class=line cellspacing=0 cellpadding=0 width="100%" 
                  border=0 align="center">
        <tbody> 
        <tr> 
          <td valign=bottom width="25%" height=20><font color="#000000" class=ddropshadow><b><span class=enbold><strong>邮局<font color="#000000">列表</font></strong></span></b><span class=enbold><font color="#000000"><a class=commonface  href="index.asp"><font color="#FF0000">（查询）</font></a></font></span></font></td>
          <td valign=bottom noWrap align=right 
                        width="75%"><a href="eml_lst.asp?querytype=8" class=commonface >今天新开通</a> 
            | <a href="eml_lst.asp?querytype=9" class=commonface >本周新开通</a> | 
            <a href="eml_lst.asp?querytype=10" class=commonface >本周到期</a> | <a href="eml_lst.asp?querytype=11" class=commonface >本月到期</a></td>
        </tr>
        <tr> 
          <td align=middle width="100%" colspan=2 height=5></td>
        </tr>
        <tr> 
          <td align=middle width="100%" colspan=2 height=2 class=menuline></td>
        </tr>
        </tbody> 
      </table>
      <br>
    </td>
  </tr>
  <tr> 
    <td  colspan=2 valign="middle" height="28"> 
      <table   bordercolor="#FFFFFF" cellpadding="0" cellspacing="0" id="AutoNumber3" style="border-collapse: collapse" width="100%" align="center">
        <tr> 
          <td height="4" width="99%" valign="top"  > 
            <table cellpadding="0" cellspacing="0" id="AutoNumber3" style="border-collapse: collapse" width="100%" height="118" border="0">
              <tr> 
                <td  valign="top"> 
                  <table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
                    <tr> 
                      <td> 
                        <!--#include file="menu.asp"-->
                      </td>
                    </tr>
                  </table>
       
                  <br>
                  <table align="center" border="0" cellpadding="0" cellspacing="0" width="100%" class=datalist>
                    <tr > 
                      <th colspan="3" class=datalistheader > <b>邮局所有人信息（仅修改数据库）</b> 
                        <%=m_dme%> </th>
                    </tr>
                    <form action=eml_adm_rez.asp method=post>
                      <tr> 
                        <td  width="25%" class=datalistgrida align="center" > 
                          公司名称： </td>
                        <td  class=datalistgrida > 
                          <input type="text" size=28 name="m_copnme_cn" value="<%=trim(rs("m_copnme_cn"))%>">
                        </td>
                        <td  class=datalistgrida width="20%" >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida  width="25%" align="center"> 
                          联系人： </td>
                        <td class=datalistgrida  > 
                          <input type="text" size=28 name="m_ctt_cn"  value="<%=trim(rs("m_ctt_cn"))%>">
                        </td>
                        <td class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida  width="25%" align="center"> 
                          省份： </td>
                        <td class=datalistgrida  > 
                          <input type="text" size=28 name="m_prv_cn"  value="<%=trim(rs("m_prv_cn"))%>">
                        </td>
                        <td class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida align="center" > 联系地址： </td>
                        <td class=datalistgrida  > 
                          <input type="text" size=28 name="m_adr_cn"  value="<%=trim(rs("m_adr_cn"))%>">
                        </td>
                        <td class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida align="center"  > 邮政编码： </td>
                        <td  class=datalistgrida  > 
                          <input type="text" size=28 name="m_cde"  value="<%=trim(rs("m_cde"))%>">
                        </td>
                        <td  class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td class=datalistgrida align="center"  > 电话： </td>
                        <td  class=datalistgrida > 
                          <input type="text" size=28 name="m_tel"  value="<%=trim(rs("m_tel"))%>">
                        </td>
                        <td  class=datalistgrida >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida align="center"  > 传真： </td>
                        <td  class=datalistgrida  > 
                          <input type="text" size=28 name="m_fax"  value="<%=trim(rs("m_fax"))%>">
                        </td>
                        <td  class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida align="center"  > 邮件： </td>
                        <td  class=datalistgrida  > 
                          <input type="text" size=28 name="m_eml"  value="<%=trim(rs("m_eml"))%>">
                        </td>
                        <td  class=datalistgrida  > 
                          <input type="submit" name="Submit2" value="更  改" class=btxx >
                          <input type="reset" name="Submit3" value="复  原" class=btxx >
                          <input type=hidden name=mailname value="<%=mailname%>">
                          <input type=hidden name=module value="eml_ctt">
                        </td>
                      </tr>
                    </form>
                  </table>
                  <br>
                  <table align="center" border="0" cellpadding="0" cellspacing="0" width="100%" class=datalist>
                    <tr > 
                      <th  class=datalistheader  colspan="3" > <b>邮局参数修改一（仅修改数据库）</b> 
                        <%=m_dme%> </th>
                    </tr>
                    <form action="eml_adm_rez.asp"  method="post">
                      <tr> 
                        <td  class=datalistgrida   width="25%" align="center"> 
                          邮局型号：</td>
                        <td  class=datalistgrida > 
                          <select name="m_prd" style="font-size: 9pt" size="1" >
                            <option value="<%=rs("g_prd")%>" ><%=rs("g_nme")%></option>
                            <% query="select * from v_pdtlst  where pt_tag='eml'"
						  rs1.open query,conn,1,1
						  while not rs1.eof 
						  response.write "<option value='"&rs1("g_prd")&"' >"&rs1("g_nme")&"</option>"
					  rs1.movenext
					  wend
					  rs1.close
					  %>
                          </select>
                        </td>
                        <td  class=datalistgrida >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td valign=center class=datalistgrida  noWrap height=27 width="20%" align="center">购买类型：</td>
                        <td valign=center class=datalistgrida > 
                          <select name="m_regtpe" style="font-size: 9pt" size="1" >
                            <option value="1" <%if rs("m_regtpe")=1 then
					  response.write " selected "
					  end if %> >购买</option>
                            <option value="0" <%if rs("m_regtpe")=0 then
					  response.write " selected "
					  end if %> >试用</option>
                            <option value="5" <%if rs("m_regtpe")=5 then
					  response.write " selected "
					  end if %> >赠送</option>
                          </select>
                        </td>
                        <td valign=center class=datalistgrida width="20%" >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td valign=center class=datalistgrida  noWrap height=27 width="20%" align="center">邮局系统：</td>
                        <td valign=center class=datalistgrida > 
                          <select   name="m_sst" style="font-size: 9pt" size="1" >
                            <option value="1" <%if rs("m_sst")=1 then
							response.write " selected"
							end if %>>Imail系统</option>
                            <option value="2"  <%if rs("m_sst")=2 then
							response.write " selected"
							end if %>>WebEasymail系统</option>
                          </select>
                        </td>
                        <td valign=center class=datalistgrida width="20%" >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td valign=center class=datalistgrida  noWrap height=27 width="20%" align="center">产品状态：</td>
                        <td valign=center class=datalistgrida> 
                          <select name="m_regstt" style="font-size: 9pt" size="1" >
                            <option value="0"  <%if rs("m_regstt")=0 then
					  response.write " selected "
					  end if %> >未开通</option>
                            <option value="1" <%if rs("m_regstt")=1 then
					  response.write " selected "
					  end if %> >运行中</option>
                            <option value="3" <%if rs("m_regstt")=3 then
					  response.write " selected "
					  end if %> >处理中</option>
                            <option value="5" <%if rs("m_regstt")=5 then
					  response.write " selected "
					  end if %> >被停止</option>
                            <option value="4" <%if rs("m_regstt")=4 then
					  response.write " selected "
					  end if %> >已被完全删除</option>
                            <option value="17" <%if rs("m_regstt")=17 then
					  response.write " selected "
					  end if %> >邮局设置被删除/邮件资料保留</option>
                            <option value="6" <%if rs("m_regstt")=6 then
					  response.write " selected "
					  end if %> >待开通</option>
                          </select>
                        </td>
                        <td valign=center class=datalistgrida >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida align="center"  > 申请总期限： </td>
                        <td class=datalistgrida  > 
                          <input   style="font-size: 9pt"  type="text" name="m_yarcnt" maxlength=32 size=20 value="<%=mynum(rs("m_yarcnt"))%>" >
                          年 </td>
                        <td class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida align="center"  > 申请总价格： </td>
                        <td class=datalistgrida  > 
                          <input   style="font-size: 9pt"  type="text" name="years" maxlength=32 size=8 value="<%=rs("years")%>" >
                          X 
                                                                              						  <%
						  prcstrname="m_prcstr"
						  prcstr=rs(prcstrname)
						  %>
                          <select name="<%=prcstrname%>" style="font-size: 9pt" size="1" >
                            <%
							query="select * from memlst where u_nme='"&rs("m_unme")&"'"
							rs2.open query,conn,1,1
							if not rs2.eof then
							u_prc=rs2("u_prc")
							canlist=true
							end if
							rs2.close 
							if canlist then
							 query="select * from v_prclst where p_prd='"&proid&"' and p_cls="&u_prc&" order by p_tmetpe,p_yar"
					  rs2.open query,conn,1,1
					  while not rs2.eof 
					  response.write "<option "
					  if  prcstr=trim(rs2("p_prcstr")) then
					  response.write " selected "
					  end if
					  p_yar=rs2("p_yar")
					  if p_yar="1" then
					  p_yar=""
					  end if
					  response.write " value="&rs2("p_prcstr")&">"&rs2("p_prc")&"元/"&p_yar&tmenmes(rs2("p_tmetpe"))&"</option>"
					  rs2.movenext
					  wend
					  rs2.close
					  end if
					  %>
                          </select>
</td>
                        <td class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td   class=datalistgrida align="center"  > 注册时间： </td>
                        <td  class=datalistgrida  > 
                          <input type="text" size=28 name="m_addtme" value="<%=trim(rs("m_addtme"))%>">
                        </td>
                        <td  class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida  height="22"> 
                          <div align="center">服务提供商：</div>
                        </td>
                        <td class=datalistgrida  > 
                          <input type="text" size=28  name="m_cprnme" value="<%=trim(rs("m_cprnme"))%>">
                        </td>
                        <td class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida align="center"   > 到期时间： </td>
                        <td  class=datalistgrida  > 
                          <input type="text" size=28 name="m_exptme" value="<%=trim(rs("m_exptme"))%>">
                        </td>
                        <td  class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td   class=datalistgrida align="center"  > 邮局IP： </td>
                        <td  class=datalistgrida  > 
                          <input type="text" size=28 name="m_svrip" value="<%=trim(rs("m_svrip"))%>">
                        </td>
                        <td  class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida  height="22" > 
                          <div align="center">其它说明：</div>
                        </td>
                        <td  class=datalistgrida  > 
                          <textarea cols="48" name="content" rows="3"><%=trim(rs("content"))%></textarea>
                        </td>
                        <td  class=datalistgrida  > 
                          <input type="submit" name="Submit23" value="更  改" class=btxx >
                          <input type="reset" name="Submit33" value="复  原" class=btxx >
                          <input type=hidden name=mailname value="<%=mailname%>">
                          <input type=hidden name=module value="eml_edta">
                        </td>
                      </tr>
                    </form>
                    <tr > 
                      <th  class=datalistheader colspan="3" > <b>邮局参数修改二（仅修改数据库）</b><%=m_dme%> 
                      </th>
                    </tr>
                    <form action=eml_adm_rez.asp method=post>
                      <tr> 
                        <td   class=datalistgrida align="center"  > 绑定域名： </td>
                        <td  class=datalistgrida  > 
                          <input type="text" size=28 name="m_dme" value="<%=trim(rs("m_dme"))%>">
                        </td>
                        <td  class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td   class=datalistgrida align="center"  > 绑定域名数： </td>
                        <td  class=datalistgrida  > 
                          <input type="text" size=28 name="m_maxdns" value="<%=trim(rs("m_maxdns"))%>">
                          （对Imail系统有效）</td>
                        <td  class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida align="center"   > 邮局大小： </td>
                        <td  class=datalistgrida  > 
                          <input type="text" size=28 name="m_sze" value="<%=trim(rs("m_sze"))%>">
                          M </td>
                        <td  class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida align="center"  > 邮箱数量： </td>
                        <td class=datalistgrida  > 
                          <input type="text" size=28 name="m_usrcnt" value="<%=trim(rs("m_usrcnt"))%>">
                          个 </td>
                        <td class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td class=datalistgrida align="center"    > 空间增加： </td>
                        <td  class=datalistgrida  > 
                          <input type="text" size=28 name="m_szeadd" value="<%=trim(rs("m_szeadd"))%>">
                          M 
                          <input type=hidden name=mailname value="<%=mailname%>">
                          <input type=hidden name=module value="eml_edtb">
                        </td>
                        <td  class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida align="center"   > 用户增加： </td>
                        <td  class=datalistgrida  > 
                          <input type="text" size=28 name="m_usradd" value="<%=trim(rs("m_usradd"))%>">
                          个</td>
                        <td  class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td   class=datalistgrida align="center"  > 是否付款： </td>
                        <td  class=datalistgrida  > 
                          <input type="radio" name="m_ifpay" value="1" <% if rs("m_ifpay")=1 then
						  response.write " checked "
						  end if %>>
                          1已付款 
                          <input type="radio" name="m_ifpay" value="0" <% if rs("m_ifpay")=0 then
						  response.write " checked "
						  end if %>>
                          0表未付 </td>
                        <td  class=datalistgrida  > 
                          <input type="submit" name="Submit24" value="更  改" class=btxx >
                          <input type="reset" name="Submit34" value="复  原" class=btxx >
                        </td>
                      </tr>
                    </form>
                    <form action=eml_adm_rez.asp method=post>
                      <tr> 
                        <th  class=datalistheader colspan="3" > <b>邮局参数修改三（仅修改数据库）</b><%=m_dme%> 
                        </th>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida  height="22"> 
                          <div align="center">赠送品一产品编号：</div>
                        </td>
                        <td class=datalistgrida > 
                          <select name="pstprd1">
                            <option value="" <%if trim(rs("pstprd1"))="" then
					  response.write " selected "
					  end if %>>没有赠送品</option>
                            <% 
				query="select * from v_pdtlst  where pt_tag<>'set' order by pt_odr,pc_odr"
						rs1.open query,conn,1,1
						while not rs1.eof 
						response.write "<option style='color:"&trim(rs1("pt_clr"))&";' value="&rs1("g_prd")
						if trim(rs1("g_prd"))=trim(rs("pstprd1")) then
						response.write " selected "
						end if
						response.write ">"&rs1("g_nme")&"----"&trim(Rs1("pt_nme"))&"</option>"
						rs1.movenext
						wend
						rs1.close
						%>
                          </select>
                        </td>
                        <td class=datalistgrida >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida  height="22" > 
                          <div align="center">赠送品一：</div>
                        </td>
                        <td  class=datalistgrida  > 
                          <input type="text" size=28  name="pstnme1" value="<%=rs("pstnme1")%>">
                          填：域名/主机名/FTP名/数据库名...</td>
                        <td  class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida  height="22"> 
                          <div align="center">赠送品二产品编号：</div>
                        </td>
                        <td  class=datalistgrida > 
                          <select name="pstprd2">
                            <option value="" <%if trim(rs("pstprd2"))="" then
					  response.write " selected "
					  end if %>>没有赠送品</option>
                            <% 
				query="select * from v_pdtlst  where pt_tag<>'set' order by pt_odr,pc_odr"
						rs1.open query,conn,1,1
						while not rs1.eof 
						response.write "<option style='color:"&trim(rs1("pt_clr"))&";' value="&rs1("g_prd")
						if trim(rs1("g_prd"))=trim(rs("pstprd2")) then
						response.write " selected "
						end if
						response.write ">"&rs1("g_nme")&"----"&trim(Rs1("pt_nme"))&"</option>"
						rs1.movenext
						wend
						rs1.close
						%>
                          </select>
                        </td>
                        <td  class=datalistgrida >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida  height="22" > 
                          <div align="center">赠送品二：</div>
                        </td>
                        <td  class=datalistgrida  > 
                          <input type="text" size=28  name="pstnme2" value="<%=rs("pstnme2")%>">
                          填：域名/主机名/FTP名/数据库名... </td>
                        <td  class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida  height="22" > 
                          <div align="center">赠送品三产品编号：</div>
                        </td>
                        <td   class=datalistgrida > 
                          <select name="pstprd3">
                            <option value="" <%if trim(rs("pstprd3"))="" then
					  response.write " selected "
					  end if %>>没有赠送品</option>
                            <% 
				query="select * from v_pdtlst  where pt_tag<>'set' order by pt_odr,pc_odr"
						rs1.open query,conn,1,1
						while not rs1.eof 
						response.write "<option style='color:"&trim(rs1("pt_clr"))&";' value="&rs1("g_prd")
						if trim(rs1("g_prd"))=trim(rs("pstprd3")) then
						response.write " selected "
						end if
						response.write ">"&rs1("g_nme")&"----"&trim(Rs1("pt_nme"))&"</option>"
						rs1.movenext
						wend
						rs1.close
						%>
                          </select>
                        </td>
                        <td   class=datalistgrida >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida  height="22"> 
                          <div align="center">赠送品三：</div>
                        </td>
                        <td class=datalistgrida  > 
                          <input type="text" size=28  name="pstnme3" value="<%=rs("pstnme3")%>">
                          填：域名/主机名/FTP名/数据库名... </td>
                        <td class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida  height="22"> 
                          <div align="center">获得此赠送品的产品编号：</div>
                        </td>
                        <td class=datalistgrida  > 
                          <select name="pstrotprd">
                            <option value="" <%if trim(rs("pstrotprd"))="" then
					  response.write " selected "
					  end if %>>非赠送品</option>
                            <% 
				query="select * from v_pdtlst  where pt_tag<>'set' order by pt_odr,pc_odr"
						rs1.open query,conn,1,1
						while not rs1.eof 
						response.write "<option style='color:"&trim(rs1("pt_clr"))&";' value="&rs1("g_prd")
						if trim(rs1("g_prd"))=trim(rs("pstrotprd")) then
						response.write " selected "
						end if
						response.write ">"&rs1("g_nme")&"----"&trim(Rs1("pt_nme"))&"</option>"
						rs1.movenext
						wend
						rs1.close
						%>
                          </select>
                        </td>
                        <td class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td  class=datalistgrida  height="22"> 
                          <div align="center">获得此赠送品的产品：</div>
                        </td>
                        <td class=datalistgrida  > 
                          <input type="text" size=28  name="pstrotnme" value="<%=rs("pstrotnme")%>">
                          填：域名/主机名/FTP名/数据库名... 
                          <input type=hidden name=mailname value="<%=mailname%>">
                          <input type=hidden name=module value="eml_edtc">
                        </td>
                        <td class=datalistgrida  >&nbsp;</td>
                      </tr>
                      <tr> 
                        <td class=datalistgrida  height="22" > 
                          <div align="center">所属套餐名称：</div>
                        </td>
                        <td class=datalistgrida  > 
                          <input type="text" size=28  name="setnme" value="<%=trim(rs("setnme"))%>">
                          无则填0 </td>
                        <td class=datalistgrida  > 
                          <input type="submit" name="Submit22" value="更  改" class=btxx >
                          <input type="reset" name="Submit32" value="复  原" class=btxx >
                        </td>
                      </tr>
                    </form>
                  </table>
                  <br>
                  <br>
                </td>
              </tr>
            </table>
            <%
rs.close
conn.close
%>
          </td>
        </tr>
        <tr> 
          <td height="4" width="99%" valign="top"  >&nbsp;</td>
        </tr>
      </table>
      <br>
      <br>
      <br>
    </td>
  </tr>
  </tbody> 
</table>
<!--#include virtual="/incs/bottom.asp"-->

