<!--#include virtual="/incs/config.asp" -->
<!--#include virtual="/incs/top.asp" -->
<SCRIPT language=JavaScript type=text/javascript>

function ifok()
{
if (confirm("请再次确认是否更换域名！"))
document.mail_modi.submit();
}
function chk_edt()
{
if(confirm("请确认是否更改!"))
return true;
else
return false;
}
function chk_del()
{
if(confirm("如果确认，将删除该邮局组，但不会删除邮局组成员!"))
return true;
else
return false;
}
  </SCRIPT>
<%
chk_log()
chk_newpwr 1,1,1
conn.open constr
	mnme=SafeRequest("mnme")
	mg_nme=trim(SafeRequest("mg_nme"))
	If mnme="" Then
	call errorpage(-2,"对不起，参数错误！")
	End If
	If mg_nme="" Then
	call errorpage(-2,"对不起，参数错误！")
	End If
	mg_nme=lcase(mg_nme)
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")&"')"
else
query="select * from v_emllst   where m_dme ='"&mnme&"' m_unme='"&session("usrname")&"'"
end if
	rs.open query,conn,1,1
    if rs.recordcount<>1 then
	rs.close
	conn.close
	call errorpage(-2,"对不起，该邮局不存在或者您无权操作！")
	end if
	mailname=trim(rs("m_dme"))
		g_sst=rs("m_sst")
	rs.close
	query="select * from emlgrp  where mg_nme ='"&mg_nme&"' and mg_emldme='"&mnme &"'"
	rs.open query,conn,1,1
	if rs.eof  then
	call errorpage(-2,"对不起，该邮局组不存在或者您无权操作！")
	end if
	mg_inf=trim(rs("mg_inf"))
	mg_cnt=trim(rs("mg_cnt"))
	
	mg_cnt=";"&mg_cnt&";"
	rs.close
%>
<%
			    

		%>

      <script language=javascript>
function checkAll()
  {
    for (var i=0;i<document.grp_frm.elements.length;i++)
    {
      var e = document.grp_frm.elements[i];
      var boolValue = document.grp_frm.selectAll.checked;
      if (e.name != 'selectAll')
	  {
        e.checked = boolValue;
	  }
    }
  }
		

		</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="#5785B2" cellpadding="0" cellspacing="0" id="AutoNumber3" style="border-collapse: collapse" width="100%" align="center">
        <tr> 
                      
          <td height="34"> 
            <div align="center"> 
                          
              <table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
                <tr> 
                              <td> 
                                <!--#include file="menu.asp"-->
                              </td>
                            </tr>
                          </table>
                          
              <br>
                        </div>
                      </td>
                    </tr>
                    
        <form action=eml_mng.asp method=post name=grp_frm>
          <tr> 
                        <td valign="top"  height="50"> 
                          
              <table width="100%" cellspacing="0" cellpadding="0" border="0" class=datalist>
                <tr> 
                  <th align="center" colspan="7" class=datalistheader ><b>邮局组修改</b></th>
                            </tr>
                              
                <tr> 
                  <td width=35% align="center" class=datalistgrida height="22" >组名</td>
                              
                  <td colspan="2" class=datalistgrida > &nbsp; <b><%=mg_nme%></b> </td>
                            </tr>   
                <tr> 
                  <td width=35% align="center" class=datalistgrida height="22" >备注</td>
                              
                  <td colspan="2" class=datalistgrida > &nbsp; 
                    <input name="mailcontent" style="FONT-SIZE: 9pt ;border: 1px solid #C0C0C0 ; height:16px ;width=250px" tabindex=1 value="<%=mg_inf%>">
                              </td>
                            </tr>
                      </table>
              <br>
              <table  class=datalist width="100%" cellpadding="0" cellspacing="0" border="0">
                <tr> 
                  <th colspan="3" align="center"  class=datalistheader ><b>邮局组成员</b><font color="#FFFFFF"><b> 
                    <input type=hidden value="<%=mailname%>" name=mailname >
                    <input type=hidden value="eml_grp_edt" name=module>
                    <input type=hidden value="<%=mg_nme%>" name=mailgroup>
                    </b></font></th>
                            </tr>
							
                <tr> 
                  <td height="22"  class=datalistgrida  align=center width="35%"> 
                    <input type="checkbox" name="selectAll" onClick="return checkAll();" value="ON">
                  </td>
                              
                  <td  class=datalistgrida  align=left width="40%">&nbsp;成员名称 
                  </td>
                              
                  <td  class=datalistgrida  align=center>序号</td>
                            </tr>
                            <%
						  query="select * from mbxlst where b_emldme='"& mnme & "' order by b_usrnme desc"
						 
rs1.open query,conn,1,1
If not(rs1.eof And rs1.bof) Then
	%>
                            <%
i=1
	Do While Not rs1.eof
	%>
                            
                <tr> 
                  <td height="22"  class=datalistgrida  align=center> 
                    <input type="checkbox" name="groupmember" value="<%=trim(rs1("b_usrnme"))&"@"&mailname%>"  <%if instr(mg_cnt,";"&trim(rs1("b_usrnme"))&"@"&mailname&";")>0 then
							  response.write " checked"
							  end if %>>
                              </td>
                              
                  <td  class=datalistgrida  align=left>&nbsp;<b><%=trim(rs1("b_usrnme"))%></b>&nbsp;<b><font color="#FF0000">@</font></b>&nbsp;<%=mailname%> 
                  </td>
                              
                  <td   class=datalistgrida align=center><%=i%></td>
                            </tr>
                            <%
	rs1.movenext
	i=i+1
	Loop
End If
%>
                          </table>
                        </td>
                      </tr>
                      <tr> 
                        <td height="20" valign="top"  align="center"><br>
                          <input type=submit value="修 改" name=adfadf class=BTXX>
                          <input type=reset value="复 原" name=adfadf2 class=btxx>
                          <br>
                          <br>
                        </td>
                      </tr>
                    </forM>
                  </table>
                </td>
              </tr>
              </tbody> 
            </table>
          
      <!--#include virtual="/incs/bottom.asp"-->




