急，请高手指点，菜单哪去了

[bls6004]

我使用的是domino5。06a版
打开一个数据库后，工作台菜单就没了，如何解决呀？请高手指点，多谢！！

[bls6004]

打开其他数据库时不是这样，如何实现将隐藏菜单再恢复出来呢？还请指教！！

[rosemerry]

隐藏菜单的方法如下：
1、隐藏菜单栏
在表单事件(Declarations)写入如下内容
Dim hmenu As Long
Declare Function GetActiveWindow% Lib "user32.dll" () As Long
Declare Function GetMenu% Lib "user32.dll" (Byval hmenu As Long) As Integer
Declare Function SetMenu% Lib "user32.dll" (Byval hmenu As Long, Byval newmenu As Long) As Integer
再在表单事件Queryopen中写入如下内容
Dim hwnd As Long
hwnd = GetActiveWindow()
hmenu = GetMenu(hwnd)
Call SetMenu(hwnd,0)
2、隐藏左侧书签
打开bookmark.nsf数据库的ClientLayout帧结构集，找到BMBar帧将其值设小。
你反操作就可以了。

[yanceyxie]

如果你打开的是别人开发的数据库，也许是开发人员把菜单隐藏了。
打开其他数据库时也是这样吗，也有可能是你安装的有问题，重新安装一下吧

[rosemerry]

yes.有程序可以将菜单隐藏的。