access2010官方下载如何彻底隐藏对象

来源：蜘蛛抓取(WebSpider) 时间：2012-05-18 23:38 标签： access2010官方下载
Access俱乐部
Access入门经典视频《运用Access实现降本增效》（免费）[] | 免费《Access五节必修课》[]
?&&&&?&&&&?&&&&?&&&&
您的位置：　 > >
Access2010版文件选项卡隐藏方法
来源:&&点击数:5347&&评论数:0　&|&&|&
时　间: 07:32:15
作　者:&&&ID：24749&&城市：闵行
摘　要:2010版&如何使用XML来隐藏文件选项卡，此方法不适合2007版
近段时间一直被2010版 如何使用XML来隐藏文件选项卡困扰，在发帖求助无果后，查阅相关资料，终于知道如何实现此功能，附件打开后大家会发现文件中的[选项]将会消失，在此与大家一起分享:<customUI xmlns=""& 而2007版需引用&&custom UIxmlns==""&
3. 在功能区名称选择 在RibbonName中起的名字，如图：&设置完毕后重启数据库文档，查看文件中的选项将会消失。
补充: 起作用的主要是以下代码&
<customui xmlns="
　　　　　　
&&&&【&&】&&&&【&&】&&&&【&&】&&&&【&&】&&&&【&&】&&&&【&&】
Access网店
价格：￥0 元
价格：￥50 元
价格：￥500 元
(9-5&13:35)
(9-5&09:56)
(9-4&00:21)
(9-3&19:03)
(9-3&16:44)
(9-3&12:37)
(9-3&09:45)
(9-2&21:00)
(9-2&17:15)
(9-2&17:10)
Access软件网 版权所有 CopyRight
提供支持 本站特聘法律顾问: 李慧 律师查看: 1684|回复: 6
请教，如何隐藏Access的菜单启动项
阅读权限20
在线时间 小时
本帖最后由 shepdog 于
08:55 编辑
我们经常在 菜单的“工具”-&“启动项&，设置启动参数。
为了数据库安全，我希望能够在设置好了以后，用VBA语句，把”启动项“隐藏起来，在需要更改的时候，再修改VBA打开。
请问，怎么能够在VBA里写语句，隐藏启动项，或者使启动项失效，无法设置呢？
阅读权限20
在线时间 小时
& & & & & & & &
我的安全设想是：
在启动项关闭 access特殊键，在VBA设置工程密码，然后再把启动项禁用。
这样，用户拿到数据库，也无法打开数据库对象，避免在表或视图直接修改数据；也无法查看VBA代码，从而提高数据库的安全性。进而把修改数据的绑定窗体改为非绑定窗体，尽量只通过VBA语句保存数据，进一步提高数据库的安全性。
阅读权限20
在线时间 小时
窗体中设置如下
Private Sub Form_Open(Cancel As Integer)
&&Application.RunCommand acCmdAppMinimize
DoCmd.Restore
公用模块可以设置如下
Public Sub AdminStartupProperties() '启动管理员权限
Const DB_Text As Long = 10
Const DB_Boolean As Long = 1
& & ChangeProperty &StartupForm&, DB_Text, &frmLoad&
& & ChangeProperty &StartupShowDBWindow&, DB_Boolean, True
& & ChangeProperty &StartupShowStatusBar&, DB_Boolean, True
& & ChangeProperty &AllowBuiltinToolbars&, DB_Boolean, True
& & ChangeProperty &AllowFullMenus&, DB_Boolean, True
& & ChangeProperty &AllowBreakIntoCode&, DB_Boolean, True
& & ChangeProperty &AllowSpecialKeys&, DB_Boolean, True
& & ChangeProperty &AllowBypassKey&, DB_Boolean, True
& & ChangeProperty &AppTitle&, DB_Text, gAppName
& & ChangeProperty &AppIcon&, DB_Text, CurrentProject.Path & &\wh.ico&
MsgBox &管理员权限已开启，请重新启动程序！&
Public Sub UserStartupProperties() '用户权限
Const DB_Text As Long = 10
Const DB_Boolean As Long = 1
If CurrentDb().Properties(&StartupShowDBWindow&) = True Then
& & ChangeProperty &StartupForm&, DB_Text, &frmLoad&
& & ChangeProperty &StartupShowDBWindow&, DB_Boolean, False
& & ChangeProperty &StartupShowStatusBar&, DB_Boolean, False
& & ChangeProperty &AllowBuiltinToolbars&, DB_Boolean, True
& & ChangeProperty &AllowFullMenus&, DB_Boolean, False
& & ChangeProperty &AllowBreakIntoCode&, DB_Boolean, False
& & ChangeProperty &AllowSpecialKeys&, DB_Boolean, False
& & ChangeProperty &AllowBypassKey&, DB_Boolean, False
& & ChangeProperty &AppTitle&, DB_Text, gAppName
& & ChangeProperty &AppIcon&, DB_Text, CurrentProject.Path & &\wh.ico&
Private Function ChangeProperty(strPropName As String, varPropType As Variant, varPropValue As Variant) As Integer
& & '启动属性设置
& & Dim dbs As Object, prp As Variant
& & Const conPropNotFoundError = 3270
& & Set dbs = CurrentDb
& & On Error GoTo Change_Err
& & dbs.Properties(strPropName) = varPropValue
& & ChangeProperty = True
Change_Bye:
& & Exit Function
Change_Err:
& & If Err = conPropNotFoundError Then& & ' Property not found.
& && &&&Set prp = dbs.CreateProperty(strPropName, _
& && && && &varPropType, varPropValue)
& && &&&dbs.Properties.Append prp
& && &&&Resume Next
& && &&&' 未知错误。
& && &&&ChangeProperty = False
& && &&&Resume Change_Bye
& & End If
End Function
阅读权限20
在线时间 小时
& & & & & & & &
rainless 发表于
窗体中设置如下
Private Sub Form_Open(Cancel As Integer)
&&Application.RunCommand acCmdAppMinimize
非常感谢！
请问是在验证登陆密码后，按照权限的不同，分别调用AdminStartupProperties 过程和UserStartupProperties过程吗？
阅读权限20
在线时间 小时
默认就UserStartupProperties，在需要的时候再调用AdminStartupProperties，也就是给管理员指定这个。
阅读权限20
在线时间 小时
请问，你用的是Access2007吗？
阅读权限20
在线时间 小时
2003,07就一脑残的版本
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师【图文】ACCESS2010基础教程精辟版_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
评价文档：
ACCESS2010基础教程精辟版
上传于||暂无简介
大小：2.20MB
登录百度文库，专享文档复制特权，财富值每天免费拿！
你可能喜欢Access俱乐部
Access入门经典视频《运用Access实现降本增效》（免费）[] | 免费《Access五节必修课》[]
?&&&&?&&&&?&&&&?&&&&
您的位置：　 > >
显示隐藏表
来源:&&点击数:2730&&评论数:0　&|&&|&
时　间: 20:19:23
作　者:&&&ID：30587&&城市：常德
摘　要:显示隐藏表
下面就以Microsoft&Access&2010为例看如何显示隐藏的表。
打开数据库之后，在左边导航栏上或者空白处点击右键，选择导航选项。
在导航选项里在显示选项里，将显示隐藏对象和显示系统对象前面的复选框选中，然后点击确定。
　　　　　　
&&&&【&&】&&&&【&&】&&&&【&&】&&&&【&&】&&&&【&&】
Access网店
价格：￥0 元
价格：￥50 元
价格：￥500 元
(9-5&13:35)
(9-5&09:56)
(9-4&00:21)
(9-3&19:03)
(9-3&16:44)
(9-3&12:37)
(9-3&09:45)
(9-2&21:00)
(9-2&17:15)
(9-2&17:10)
Access软件网 版权所有 CopyRight
提供支持 本站特聘法律顾问: 李慧 律师access2010怎样显示隐藏的数据库_百度知道

我要回帖

更多关于 access2010官方下载 的文章

 

随机推荐