<!--#include virtual="/incs/config.asp" -->
<!--#include virtual="/incs/top.asp"-->
<%
chk_log()
chk_newpwr 4,19,1
conn.open constr 
perpage=20
ThePage=0
page=0
rcount=0
thepage=0
'''''''''''''''''''''''''''''''''''''''''
query="select  emlmod.*,pdttpe.*  from emlmod    left outer join pdttpe on emlmod.ms_tpe=pdttpe.pt_tag order by pdttpe.pt_tag"
rs.open query,conn,1,1
if rs.RecordCount<=0 then
          ErrMsg="<font color=#ff0000>对不起</font>，没有搜索到符合条件的记录！..."
		
	   else
	      rcount=rs.recordcount
	      rs.pagesize=perpage
		  ThePage=rs.pagecount
		  if Chk_Int(SafeRequest("page"))=false then
		  page=1
		  else
		   page=cint(SafeRequest("page"))
		    if page<=0  then
		       page=1
		    elseif page>ThePage then
		       page=ThePage
		    end if	  
		  end if
		    rs.absolutepage=page
       end if   

%>
<script language="javascript">
<!--

function tofirst()
{searchform.page.value=1;
searchform.submit();
 }
  function toprev()
{searchform.page.value-=1;
searchform.submit();
 }
  function tonext()
{
searchform.page.value=<%=page%>-1+2;
searchform.submit();
 }
  function tolast()
{searchform.page.value=<%=ThePage%>;
searchform.submit();
 }
 function toorder(ordn)
{searchform.ordernum.value=ordn;
searchform.page.value=1;
searchform.submit();
 }
 function delit(msid)
 {
 if (confirm("确定删除吗？"))
 location.href="snd_mng.asp?module=snd_del&msid="+msid;
 }

 //-->
 </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><b>邮件模版列表</b></td>
          <td valign=bottom noWrap align=right 
                        width="75%"><a href="snd_add.asp" class=commonface >添加邮件模版</a> 
            | <a href="snd_add.asp?module=sign" class=commonface >添加邮件签名</a> | 
            <a href="snd_lst.asp" 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 width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tbody> 
        <form action=snd_lst.asp method=post name=searchform2>
          <tr> 
            <td height=20 width="119">&nbsp;共计 <b> <%=rcount%> </b>条记录 </td>
            <td height=20> 
              <div align="center"> 
                <input type=hidden name=ordernum value="<%=ordernum%>">
                <%=page_turn%></div>
            </td>
            <td height=20 width="120"> 
              <div align="right">转第 
                <select name="page" onChange="javascript:document.searchform2.submit();">
                  <option selected value=<%=page%>><%=page%></option>
                  <%
				   for i=1 to thepage
				   response.write "<option value="&i&">"&i&"</option>"
				   next
				   %>
                </select>
                页</div>
            </td>
          </tr>
        </form>
        </tbody> 
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td height=8></td>
        </tr>
      </table>
      <table border=0 cellpadding=0 
                        cellspacing=0 class=datalist align="center"  width="100%">
        <tbody> 
        <tr > 
          <th class=datalistheader width="6%" align=center> <b>序号</b> </th>
          <th class=datalistheader width="12%" align=center>标志</th>
          <th class=datalistheader width="10%" align=center>分类</th>
          <th class=datalistheader width="26%" align=center>简短说明</th>
          <th class=datalistheader align=center width="34%" >邮件标题</th>
          <th class=datalistheader align=center width="6%" >下级平台获取</th>
          <th class=datalistheader align=center><b>操作</b></th>
        </tr>
        <%
			
		  i=1
	Do While Not rs.eof 
	if i mod 2=1 then
	classstl="datalistgrida"
	else
	classstl="datalistgridb"
	end if
	%>
        <tr > 
          <td  class=<%=classstl%>  align=center height="20"><%=i+perpage*(page-1)%></td>
          <td class=<%=classstl%> >&nbsp;<a href="javascript:showurl('snd_edt.asp?msid=<%=rs("ms_id")%>');" class=commonface><b><%=rs("ms_mod")%></b></a> 
          </td>
          <td class=<%=classstl%> >&nbsp;<a href="javascript:showurl('snd_edt.asp?msid=<%=rs("ms_id")%>');" class=commonface> 
            <% if trim(rs("ms_tpe"))="" or trim(rs("ms_tpe"))="oths" then
		  response.write "其它"
		  else
		  response.write "<font color='"&rs("pt_clr")&"'>"&rs("pt_nme")&"</font>"
		  end if %>
            </a> </td>
          <td class=<%=classstl%> >&nbsp;<a href="javascript:showurl('snd_edt.asp?msid=<%=rs("ms_id")%>');" class=commonface><%=rs("ms_nme")%></a> 
          </td>
          <td class=<%=classstl%>>&nbsp;<a href="javascript:showurl('snd_edt.asp?msid=<%=rs("ms_id")%>');" class=commonface><%=trim(rs("ms_ttl"))%></a></td>
          <td class=<%=classstl%> align="center"> 
            <%
 			 if rs("ms_ifagt")<>"1"  then
					  response.write "<font color=#ff0000>禁止</font>"
					  else
					  response.write "允许"
					  end if 
					  
					  %>
          </td>
          <td   class=<%=classstl%> align="center"><a href="javascript:delit(<%=rs("ms_id")%>);" class=commonface><u>删除</u></a></td>
        </tr>
        <%
  rs.movenext
i=i+1
if i>perpage then
exit do
end if

  loop 
  	rs.close
	conn.close
  %>
        </tbody> 
      </table>
      <div align="center"></div>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td height=8></td>
        </tr>
      </table>
      <table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tbody> 
        <form action=snd_lst.asp method=post name=searchform>
          <tr> 
            <td height=20 width="120">&nbsp;共计 <b> <%=rcount%> </b>条记录 </td>
            <td height=20> 
              <div align="center"> 
                <input type=hidden name=ordernum value="<%=ordernum%>">
                <%=page_turn%> </div>
            </td>
            <td height=20 width="120"> 
              <div align="right">转第 
                <select name="page" onChange="javascript:document.searchform.submit();">
                  <option selected value=<%=page%>><%=page%></option>
                  <%
				   for i=1 to thepage
				   response.write "<option value="&i&">"&i&"</option>"
				   next
				   %>
                </select>
                页</div>
            </td>
          </tr>
        </form>
        </tbody> 
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td height=8></td>
        </tr>
      </table>
      <br>
    </td>
  </tr>
  </tbody> 
</table>
<!--#include virtual="/incs/bottom.asp"-->


