我使用以下代码确保在关闭文档并选择新创建的文档时返回特定视图:
Dim ws As New NotesUIWorkspace
Dim uidb As NotesUIDatabase
Set uidb = ws.CurrentDatabase
Call uidb.OpenView("vwMyView", , False)
ws.CurrentView.SelectDocument(Source.Document)
如果视图已经打开,那么此代码将转到上面定义的视图并选择文档。因此,如果视图未打开,它将打开视图并选择我们的文档。这在创建新文档且视图索引尚未更新时很有用。
这段代码效果很好,但是如果我将视图作为框架集的一部分,该框架集也设置为主页(主页选项卡),我该如何让这段代码工作。
编辑:
为了进一步解释这个问题,我有一个链接到多个数据库的框架集,当用户单击大纲控件打开链接时,它会在框架集中打开一个视图。然后,当从该视图创建一个新文档(与大纲所在的位置相比属于另一个数据库)时,我们在该框架集之外打开一个新窗口。关闭此文档时,我想返回框架集(与此文档相比,它现在位于另一个数据库中)并刷新视图以选择当前新文档。这个框架集是我的主页。