你在登陆后将用户名写入一个全局变量，不就等于有了 User.Name 差不多了。诸如:If User.Name <> "张经理"改成If Vars( 全局变量名 ） <> "张经理"
同时，用Find查找该用户对应的用户组，也写入用户组全局变量。
做好上述工作后，以后每一要控制权限的操作，在执行前先用Find查找用户权限表中对应用户组全局变量是否有开通该权限，if分别处理....
加好友 
发短信
Post By：2008/12/31 12:01:00 [显示全部帖子]
