后台表如何隐藏或者禁止导入

lazybird

突然发现用户可以通过 “导入” 来获得客户端的后台表格 （尤其是ODBC链接表），这样就可以直接打开修改后台数据了。
表的属性设置为“隐藏”只能阻止 “链接”方式，并不能阻止“导入”方式。

之前以为后台可以通过禁用 SHIFT键 + 隐藏后台链接表就可以了。
突然发现只要新建一个文件，然后通过“导入”就可以获得全部后台数据了，这漏洞也太大了吧。
大家都是怎么解决的哦。

lazybird

呵呵~ 支持版主观点，这次碰到问题翻了不少以前的老帖子，不管如何，感觉还是受益匪浅的。

roych

lazybird 发表于 2015-5-11 15:25
翻了下论坛以前的帖子，找到了一个解决方法。 （咱家是猫版主答的）
     Dim tabDef As New TableDef
   ...

个人建议不必花太多时间在这上面。对于大部分用户来说，通过文件访问权限+禁用shift+工作组基本就够了。必要的话，再加上域管理禁止切换电脑登录用户名。
http://www.office-cn.net/thread-95999-1-1.html

lazybird

翻了下论坛以前的帖子，找到了一个解决方法。 （咱家是猫版主答的）
     Dim tabDef As New TableDef
     Set dbs = CurrentDb
     For Each tabDef In dbs.TableDefs
             tabDef.Attributes = 1
     Next
不知道这样是否还有其他漏洞啊，学Access深入了之后发现安全性真是让人不放心啊。

lazybird

回版主，就是觉得靠Access来解决安全问题太麻烦，升级SQL Server了。

lazybird

谢谢站长老师：

两个问题：
1.  能否给段范例，设置用户名和密码的。
2.  是不是所有的程序都需要加入这段代码啊？还是在客户端启动时加入这段代码就可以了。

roych

我觉得，不能依靠Access来解决安全问题，应该结合window文件夹访问权限。

tmtony

ODBC不保存 用户名和密码，通过程序运行时 才用代码设置用户名和密码
这样他就导入不了