Question

我想预览当前表单，在预览中我可以打印它，如何在Lotus脚本中执行此操作？

Answer 1

您想要在视图中预览当前选定的文档吗？
您可以使用运行类似这样的视图操作：

Sub Click(Source As Button)
    Dim w As New NotesUIWorkspace
    Dim doc As NotesDocument
    Set doc = GetSelectedDoc()

    Call w.DialogBox(doc.form(0),True,True,True,True,False,True,"Put your title here",doc,True,True,False)
End Sub

Function GetSelectedDoc() As NotesDocument
    'Mb¤, 04.04.2005
    'The function returns currently selected document
    'On Error Goto ErrHandler
    Dim s As New NotesSession
    Dim db As NotesDatabase
    Dim c As NotesDocumentCollection

    Set db = s.CurrentDatabase  
    Set c = db.UnprocessedDocuments
    If c Is Nothing Then Exit Function

    Set GetSelectedDoc = c.getFirstdocument

    'add your error handling
End Function

有关NotesUIWorkspace.DialogBox参数的说明，请参阅here。

或者您只需使用@DialogBox公式：

@DialogBox( form ; [AUTOHORZFIT] : [AUTOVERTFIT] : [NOCANCEL] : [NONEWFIELDS] : [NOFIELDUPDATE] : [READONLY] : [SIZETOTABLE] : [NOOKCANCEL] : [OKCANCELATBOTTOM] : [NONOTE] ; title )

Answer 2

笔记对于打印来说并不是很好。根据您的要求，您可能最好编写代码来创建Word文档，然后可以打印该文档。有很多例子可以帮助您实现这一目标，以下是其中一个让您入门的例子：http://searchdomino.techtarget.com/tip/A-flexible-data-export-agent-for-Lotus-Notes

希望这有帮助。

Answer 3

使用您要打印的表单的只读版本创建一个子表单。

预览表单 - 在子对话框中显示子表单。设置对话框以继承主文档中的值。

在子窗体上显示一个打印按钮，用于打印只读文档。打印时隐藏打印按钮。

Answer 4

您是否尝试右键单击该文档？您可以通过右键单击来打印它。我会首先尝试简单的事情，看看这是否符合用户需求。

如果您正在讨论处理文档的工作流程并且流程已完成并且您想要预览最终文档，那么您应该能够通过Java文档类或Java中的UIUI类来执行此操作。 LotusScript中。一旦掌握了UIDocument，就可以做几件事。

如果该对象在您的UI设计中，我会尝试将文档设置为只读并在预览窗格中显示它。然后，您可以询问用户是否要打印文档，并使用UIDocument.print选项。

如何使用lotus脚本预览表单

4 个答案: