设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 3071|回复: 8

[表] 不用"~TMPCLP",如何在Access中隐藏表?

[复制链接]
发表于 2008-10-21 08:00:01 | 显示全部楼层 |阅读模式
想把Access的表隐藏掉,但因为数据库已全部做好了,有什么办法不用"~TMPCLP"而把表隐藏,请各位大师指点.
发表于 2008-10-21 13:46:09 | 显示全部楼层
这个倒没用过,一般我用usys开头命名表来隐藏
发表于 2008-10-21 14:10:38 | 显示全部楼层
表右击属性,点选隐藏,就可以了啊
你的目的是干什么啊

[ 本帖最后由 kevindeng 于 2008-10-21 14:11 编辑 ]
发表于 2008-10-21 14:16:53 | 显示全部楼层
Dim tabDef As New TableDef
    Set dbs = CurrentDb
    For Each tabDef In dbs.TableDefs
        If tabDef.Name = "table1" Then
            tabDef.Attributes = 1
        End If
    Next
发表于 2008-10-21 15:40:58 | 显示全部楼层
学习了,请问,4楼的猫版主,在什么地方运行这代码?另,如果隐藏查询用什么代码?谢谢。
 楼主| 发表于 2008-10-21 18:03:59 | 显示全部楼层
对表右击属性,点选隐藏,是可以隐藏的,但在工具\选项\视图中勾选隐藏对象后仍可以看到.所以这个办法是不行的.
做了一个数据库,然后再折分数据库,把有表的文件作为后台共享,另一个文件的表实际上是链接.所以用代码似也不行.
对共享的后台文件隐藏表后,可以提高安全性.
请问对此有什么解决的办法?
发表于 2008-10-22 13:42:14 | 显示全部楼层
那你把后台数据库中的表名都加上~TMPCLP,前台每次运行时用代码链接后台的表,退出时删除链接,前台链接表的名称仍然用以前的表名(这样你就不必对前台做更改)

[ 本帖最后由 kevindeng 于 2008-10-22 13:47 编辑 ]
 楼主| 发表于 2008-10-22 19:13:35 | 显示全部楼层
7楼的办法很好,但不知这个代码怎么写.谁能提供一下?先谢了.
发表于 2008-10-23 08:54:00 | 显示全部楼层
代码其实很简单,自己去查一下TransferDatabase的帮助好啦
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2025-5-22 17:09 , Processed in 0.095602 second(s), 33 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表