Notes 9邮箱崩溃 - 对话框方法

Question

我们有一个自定义的邮件模板，我们在queryclose中使用了ws.dialogbox方法。在注释9中，这似乎是一个问题，并且注释在执行对话框代码时完全崩溃（在编辑外部电子邮件时仅发生此崩溃）。在以前版本的笔记中，此代码可以正常工作。这是代码：

On Error GoTo DocDeleted

If uiCurrDoc.FieldGetText("SendOrEsc") = "" And _
uiCurrDoc.EditMode  And _
((uiCurrDoc.document.DoCloseDialog(0)) Or (uiCurrDoc.document.ActionInProgress(0) = "4096")) And _
(LCase$(uiCurrDoc.FieldGetText("DeleteFlag")) <> "true") Then

On Error GoTo 0

Set tempDoc = CurrDoc.ParentDatabase.CreateDocument     
**varResponse = wsCurrDoc.DialogBox("TLSCloseMailWindow", True, True, , , , , "Close Window", tempdoc)**