以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  还是权限问题,请教老师  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=179190)

--  作者:xiaofei_00
--  发布时间:2022/8/12 8:22:00
--  还是权限问题,请教老师
老师您好,我的程序采用了咱们教程中“Users”表的做法,现在我遇到一个问题,由于我们使用网络环境的问题,有的用户网络延迟较多,延迟多的情况软件会报错,提示数据库有问题,很多时候会不加载“Users”表的权限信息,使本没有权限的用户看到他不该看到的表和内容,我就想问一下怎么能避免这样的事情,比如必须加载“Users”表,否则别的表也不加载。还有就是没有权限的用户看到了不该看到的表他们是否能修改数据呢?我在“Users”表中已经设置了他们不能修改数据,但是由于网络延迟出错数据库加载有问题,这些权限是不是就不起作用了?
--  作者:有点蓝
--  发布时间:2022/8/12 8:36:00
--  
到AfterOpenProject事件判断有没有users表,数据有没有加载,如果没有就提示并退出程序
--  作者:xiaofei_00
--  发布时间:2022/8/12 8:43:00
--  
劳烦您给写一段代码行吗?我帮助文件找了半天没找到怎么写
--  作者:有点蓝
--  发布时间:2022/8/12 8:49:00
--  
http://www.foxtable.com/webhelp/topics/0365.htm

If DataTables.Contains("users") = false \'如果存在统计表1
    MessageBox.
Show("users表不存在")
Syscmd.Project.Exit()
elseif DataTables("users").datarows.count = 0 then
    MessageBox.Show("users表无数据")
Syscmd.Project.Exit()
End If

--  作者:xiaofei_00
--  发布时间:2022/8/12 8:55:00
--  
感谢老师!!膜拜