如何做web程序权限管理

     权限管理是一个程序必不可少的，也是一个非常难解决的问题。它直接与网站的安全相关。
下面我就谈谈我是如何管理权限的：首先我在User表中添加了一个字段，命名为UserPower,然后在程序中读取，通过Replace这个方法获得用户是否有此权限，如：看用户是否有添加新闻的权限(addNews),就可以这样做：
dim i as integer=UserPower.Length
dim replacestr  as string=Userpower.replace("addNews",1)
dim j as integer =replacestr.length
if i<>j then
用户有此权限
else
用户无此权限
end if
   主要的思想就是通过字符串的替换，然后查看字符串前后的长度，如果不一致，则说明用户有权限，然后就可以授予用户干某事。