我有一个嵌入视图的表单。现在,从那个嵌入视图中,我需要在对话框中打开文档。所以我创建了一个特定于该对话框的新表单,并在QueryOpenDocument
添加的
@DialogBox("mdro";[AutoHorzFit]:[AutoVertFit]:[OkCancelAtBottom]:[SizeToTable];"My Data")
现在,这将打开一个空白对话框。
我有一个嵌入视图的表单。现在,从那个嵌入视图中,我需要在对话框中打开文档。所以我创建了一个特定于该对话框的新表单,并在QueryOpenDocument
添加的
@DialogBox("mdro";[AutoHorzFit]:[AutoVertFit]:[OkCancelAtBottom]:[SizeToTable];"My Data")
现在,这将打开一个空白对话框。
您将无法使用公式解决此问题,因为“操作”的上下文很可能不是视图中选定的文档。
QueryOpenDocument 是正确的选择,但您必须在 LotusScript 中编写代码:
Dim doc as NotesDocument
Dim ws as New NotesUIWorkspace
Set doc = Source.Documents.GetFirstDocument()
If not doc is Nothing then
Call ws.Dialogbox("mdro", True, True, True, False, False, False, "My Data ", doc, True, True, True)
End If
'Set Continue to false to prohibit opening of the document
Continue = False
注意:您必须在代码中的某处保存文档(使用 doc.Save(True, True, True),否则更改将不可见....
将您的公式放入嵌入式视图的操作栏上。在这种情况下,您将拥有适当的上下文,并且可以从您的视图中成功打开文档。