请教多用户分级权限设置！
描述如下：
用户有管理员、操作员、营业员、普通用户。。。。
管理员权限最大，什么都可以做。
操作员权限为用户管理、权限设置、统计、浏览
营业员权限为数据输入、修改、删除等。
普通用户仅具有统计、浏览功能。
管理项有：
|—系统设置—|——用户管理
|                         |——密码设置
|                         |——权限管理
|—数据管理—|——新增
|                         |——修改
|                         |——删除
|                         |——结帐
|                         |——报表
|—查询统计—|——统计
|                         |——查询
请问如何编制用户表、权限表及管理项目表，要求管理项目表中有一级项和二级项或写到两个表中；以及如何设置及提取用户的权限。
请高手帮忙，或给份例程研究研究。多谢了。
EMAIL：cttpj@163.com

------解决方案--------------------
private const gUserAdmin=1 '用户管理
private Const gPasswordAdmin =2 '密码设置
private Const gPuerAdmin =4 '权限管理
private Const gAddNew= 8 '新增
private Const gChage =16 '修改
private Const gDll = 32 '删除
private Const gPay=64 '结帐
private Const gStatement =128 ' 报表
private Const gCount=256 '统计
private Const gSelect =512 '查询

private lngAdmin '用来保存用户权限

'权限设置
lngAdmin=(gUserAdmin or gPasswordAdmin or gAddNew or gDll )

'权限判断
with response
if (lngAdmin and gUserAdmin)=gUserAdmin then .write "此用户有用户管理权限 "

if (lngAdmin and gPasswordAdmin)=gPasswordAdmin then .write "此用户有密码管理权限 "
if (lngAdmin and gAddNew)=gAddNew then .write "此用户有机新增权限 "
if (lngAdmin and gChage)=gChage then .write "此用户有修改权限 "
.............................
end with
------解决方案--------------------
你可以下载一个小型论坛研究研究。
结构和你要求得差不多