权限管理的设计和实现--.net framework--IT文谷

权限管理的设计和实现2006-7-15权限管理的设计和实现2006-7-15权限管理的设计和实现

权限管理的设计和实现

文谷 www.wengu.com
来源：不详作者：佚名
时间：2006-7-15 浏览人数：

权限管理的设计和实现2006-7-15权限管理的设计和实现2006-7-15权限管理的设计和实现

权限管理的核心，就是对不同权限的用户，分配管理对应权限的资源。

   本例以一个网站栏目后台管理模块（资源）的权限管理为例，实现了不同用户的权限管理。

   数据库设计：

   帐户信息表：
   f_i_autoid 自动编码(主键)
   f_i_orderid
   f_accountid 帐户编码
   f_accountname 帐户 (外键)
   f_password 密码
   f_accounttype
   f_username
   f_remark
   f_datetime


   栏目信息表：
   f_i_autoid 自动编码(主键)
   f_i_orderid
   f_lanmuid 栏目编码
   f_lanmuname 栏目 (外键)
   f_ishidden
   f_remark
   f_datetime


   权限表：
   f_i_autoid 自动编码(主键)
   f_accountname 帐户 (外键)
   f_lanmuname 栏目 (外键)
   f_remark
   f_datetime

   通过权限表的 f_accountname 帐户(外键)和 f_lanmuname 栏目(外键)把帐户信息表
   和栏目信息表联系起来，通过给“帐户”分配“栏目”，或者给“栏目”分配“帐户”，使帐户和栏目建立关系（可以是“一对多”“多对一”或者“多对多”）。

   然后以当前登陆的帐户为基准，在权限表中查找其可管理的栏目(资源)。

   本例实现了一个用户对多栏目的管理(但是一个栏目只能被一个用户管理 - 这个通过程序代码的约束来实现)。

   以下是部分代码：
  <% Option explicit %>
  
  

  <html>
  <head>
   <title>编辑权限</title>
   <link href="./style/style.css" rel="stylesheet" type="text/css">
   <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
   <meta http-equiv="Page-Enter" content="blendTrans(Duration=1.0)">
   <meta http-equiv="Page-Exit" content="blendTrans(Duration=1.0)">
   <script language="javascript">
   function openwin(url, l, t, w ,h)
   {open(url,'','toolbar=no,location=no,status=no,menubar=no,scrollbars=no,resizable=no,width='+ w +',height='+ h +',left='+ l +',top='+ t);}

   function check_and_submit(frm)
   {
   SelectAll(frm.SelectedItem);
   frm.submit();
   }
   </script>
  </head>

  <body topmargin=20 leftmargin=0 background="../images/bg.gif">

  <%
   Dim sSQL, rs1, rs2, rs3, CurrentAccount

   CurrentAccount = request("CurrentAccount")
  %>

  <form name="frm1" id="frm1" method="post" action="save.asp">
  <input name="allowsubmit" type="hidden" value="OK">

  <table width="500" border="0" cellspacing="0" cellpadding="0" align="center">
   <tr height=30>
   <td colspan=3>

   帐号信息：
   <input name="accountname" type="hidden" value="<%=CurrentAccount%>">
   <%
   sSQL = "select * from tabAccountInfo where f_accountname='" & CurrentAccount & "'"
   Set rs1 = Server.CreateObject("ADODB.Recordset")
   rs1.open sSQL, sConn, 1, 1
   if rs1.eof and rs1.bof then
   response.write("没有取得该用户的信息。")
   response.end
   else
   response.write " [帐号:] <font color=#ff0000>" & rs1("f_accountname") & "</font> [用户姓名:] " & rs1("f_username") & " [帐号类型:] " & rs1("f_accounttype")
   end if
   Set rs1 = nothing
   %>
   </td>
   </tr>
   <tr height=10><td colspan=3></td></tr>
   <tr>
   <td width="220" align=center valign="top">
   已分配该用户管理的栏目：<br><br>
   <select name="SelectedItem" id="SelectedItem" size=12 multiple="true">
   <%
   '选择所有栏目中除去已经分配的栏目：
   sSQL = "select f_lanmuname from tabQXB where f_accountname='"& CurrentAccount &"' order by f_lanmuname"
   Set rs3 = Server.CreateObject("ADODB.Recordset")
   rs3.open sSQL, sConn, 1, 1
   if rs3.eof and rs3.bof then
   response.write("<option>无</option>") & chr(13)
   else
   while not rs3.eof
   response.write "<option>" & rs3("f_lanmuname") & "</option>" & chr(13)
   rs3.movenext
   wend
   end if
   Set rs3 = nothing
   %>
   </select>
   </select>
   </td>
   <td width="60" align=center>
   <br><br>
   <button onClick="MoveSingleItem(WaitSelectItem, SelectedItem)"><</button><br><br>
   <button onClick="MoveAllItems(WaitSelectItem, SelectedItem)"><<</button><br><br><br><br>
   <button onClick="MoveSingleItem(SelectedItem, WaitSelectItem)">></button><br><br>
   <button onClick="MoveAllItems(SelectedItem, WaitSelectItem)">>></button><br>
   </td>
   <td width="220" align=center valign="top">
   待分配的栏目：<br><br>
   <select name="WaitSelectItem" size=12 multiple=true>
   <%
   '选择所有栏目中除去已经分配的栏目：
   sSQL = "select f_lanmuid, f_lanmuname from tabLanmuInfo " & _
   "where f_lanmuname not in (select distinct f_lanmuname from tabQXB) order by f_lanmuid"
   Set rs2 = Server.CreateObject("ADODB.Recordset")
   rs2.open sSQL, sConn, 1, 1
   if rs2.eof and rs2.bof then
   response.write("<option>无</option><br>")
   else
   while not rs2.eof
   response.write "<option>" & rs2("f_lanmuname") & "</option><br>"
   rs2.movenext
   wend
   end if
   Set rs2 = nothing
   %>
   </select>
   </td>
   </tr>
   <tr height=120>
   <td colspan=3 align=center>
   <button onClick="check_and_submit(frm1);"> 保存 </button>

   <button onClick="history.go(-1);"> 返回 </button>
   </td>
   </tr>
  </table>
  </form>

  <script language="javascript">
   function MoveSingleItem(sel_source, sel_dest)
   {
   if (sel_source.selectedIndex==-1) //源：没有点选任何项目
   return;

   if (sel_source.options[0].text=="无") //源：只有“无”项目
   return;

   if (sel_dest.options[0].text=="无") //目标：只有“无”项目，则先删除该提示性项目
   sel_dest.options.remove(0);

   var SelectedText = sel_source.options[sel_source.selectedIndex].text;
   sel_dest.options.add(new Option(SelectedText));
   sel_source.options.remove(sel_source.selectedIndex);

   if (sel_source.options.length==0) //源：如果删除完所有有用项目，则添加提示项目：“无”
   sel_source.options.add(new Option("无"));
   }

   function MoveAllItems(sel_source, sel_dest)
   {
   if (sel_source.options[0].text=="无") //源：只有“无”项目
   return;

   if (sel_dest.options[0].text=="无") //目标：只有“无”项目，则先删除该提示性项目
   sel_dest.options.remove(0);

   //首先拷贝所有项目到目标：
   var sel_source_len = sel_source.length;
   for (var j=0; j<sel_source_len; j++)
   {
   var SelectedText = sel_source.options[j].text;
   sel_dest.options.add(new Option(SelectedText));
   }

   //然后删除“源”所有项目：
   while ((k=sel_source.length-1)>=0)
   {
   if (sel_source.options[0].text=="无") //源：只有“无”项目
   break;
   sel_source.options.remove(k);
   if (sel_source.options.length==0) //源：如果删除完所有有用项目，则添加提示项目：“无”
   sel_source.options.add(new Option("无"));
   }
   }

   function SelectAll(theSel) //选中select中全部项目
   { for (i = 0 ;i<theSel.length;i++)
   theSel.options[i].selected = true;
   }
  </script>

   本例的演示代码参见 http://www.why100000.com/_demos/ 中，“ASP代码演示” - “权限表测试代码”。
   源代码下载：http://www.why100000.com/_ftps/others/admin_QX.rar
   更多的代码请浏览 http://www.why100000.com/_demos/ 或者 http://lab.why100000.com

   张庆 QQ: 9365822
   zhangking@hotmail.com
   zhangking@snnu.net

权限管理的设计和实现2006-7-15权限管理的设计和实现2006-7-15权限管理的设计和实现

上一篇文章： ASP.NET服务器控件之视图状态

下一篇文章： ASP.NET下MVC设计模式的实现

进入论坛讨论

基于.NET的多线程编程入门
Microsoft .NET 框架资源基础
VS2005常用插件搜罗
.net中用GDI+提高gif图片保存画质
VS.NET:通过Web服务瞄准电子商务
对象设计中创建VS使用
安装/初始化/个性化DotNetNuke
介绍dotnet原动力(DNN)
GDI+编程10个基本技巧
DTE .NET工程的自动化编译
.Net中如何操作IIS的原理分析
VS.NETRC5无法创建Add-IN工程

热门文章	最新推荐

版权与免责声明：
① 本网转载其他媒体稿件是为传播更多的信息，此类稿件不代表本网观点，版权归原作者所有，本网不承担此类稿件侵权行为的连带责任。
② 在本网BBS上发表言论者，文责自负。
③ 如您因版权等问题需要与本网联络，请在30日内联系。

权限管理的设计和实现2006-7-15权限管理的设计和实现2006-7-15权限管理的设计和实现

.net framework专题

人气排行

此栏目下没有文章