<!--#include virtual="/incs/config.asp"-->
<!--#include virtual="/incs/top.asp"-->
<% chk_log()%>
<%
chk_newpwr 4,23,1
perpage=20
ThePage=0
conn.open constr
perpage=SafeRequest("perpage")
if chk_int(perpage)=false then
perpage=12
end if 
perpage=clng(perpage)
ThePage=0
page=0
rcount=0
thepage=0
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

		
 query="select * from pwrlst  order by pw_nme"
 '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
    rs.open query,conn,1,1
    if rs.RecordCount<=0 then
          ErrMsg=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 ifdel(pwid)
{
if(confirm("提示：是否确认删除！"))
showurl("pwr_mng.asp?module=<%=server.urlencode("pwr_del")%>&pwid="+pwid);
}
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();
 }
</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>权限分组</strong></span></b></font></td>
          <td valign=bottom noWrap align=right 
                        width="75%"><a href="javascript:showurl('pwr_add.asp');" class=commonface>权限组添加</a> 
            | <a href="javascript:showurl('pwr_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="top" height="28"> 
      <div align="center"> 
        <table width="98%" border="0" cellspacing="0" cellpadding="0" align="center">
          <tbody> 
          <form action=pwr_lst.asp method=post name=searchform2>
            <tr> 
              <td height=20 width="119">&nbsp;共计 <b> <%=rcount%> </b>条记录 </td>
              <td height=20> 
                <div align="center"><%=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="95%" border="0" cellspacing="0" cellpadding="0" align="center">
          <tr> 
            <td height=12></td>
          </tr>
        </table>
        <table border=0 cellpadding=0 
                        cellspacing=0 class=datalist align="center" width="100%">
          <tr > 
            <th class=datalistheader  height="22" align=center> 
              <div align="center">序号</div>
            </th>
            <th  class=datalistheader align=center>组名称</th>
            <th  class=datalistheader align=center>组员管理</th>
            <th  class=datalistheader align=center>权限设置</th>
            <th class=datalistheader align=center>删除</th>
          </tr>
          <%  uv=1
					   while not rs.eof
					 
					    %>
          <form action="pwr_edt.asp" method=post name=pwmng>
            <tr > 
              <td class=datalistgrida   height="22"  align=center><%=uv%></td>
              <td  class=datalistgrida  align=left>&nbsp;&nbsp;<%=rs("pw_nme")%></td>
              <td  class=datalistgrida  align=center><a href="javascript:showurl('pwr_mem.asp?k_tpe=pwr&k_wrds=<%=rs("pw_id")%>');" class=commonface><u>组员管理</u></a></td>
              <td  class=datalistgrida  align=center><a href="javascript:showurl('pwr_edt.asp?pwid=<%=rs("pw_id")%>');" class=commonface><u>权限设置</u></a></td>
              <td  class=datalistgrida  align=center> <img src="/imgs/del.gif" width="17" height="17" border=0 alt="删除" onClick="javascript:ifdel('<%=rs("pw_id")%>');" style="cursor:hand;">&nbsp;&nbsp; 
              </td>
            </tr>
          </form>
          <% 
					  newid=cint(rs("pw_id"))+1
				
					rs.movenext
uv=uv+1
					wend
					rs.close
					conn.close
					%>
        </table>
        <table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
          <tr> 
            <td height=8></td>
          </tr>
        </table>
        <table width="98%" border="0" cellspacing="0" cellpadding="0" align="center">
          <tbody> 
          <form action=pwr_lst.asp method=post name=searchform>
            <tr> 
              <td height=20 width="120">&nbsp;共计 <b> <%=rcount%> </b>条记录 </td>
              <td height=20> 
                <div align="center"><%=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="95%" border="0" cellspacing="0" cellpadding="0" align="center">
          <tr> 
            <td height=8></td>
          </tr>
        </table>
      </div>
    </td>
  </tr>
  </tbody> 
</table>
<!--#include virtual="/incs/bottom.asp"-->


