Lotusscript-使用NotesUIDocument.Print打印Notes-Document不能按记录工作

时间:2018-09-12 19:35:42

标签: printing lotusscript

我想将Notes文档直接打印到pdf打印机。在视图中选择了文档。我不想打开打印机对话框表单。

原则上使用“ NotesUIView.Print”方法是有效的,但是,有时生成的pdf文档看起来与Notes文档并不完全一样(尤其是关于表格)。

因此,我尝试使用“ NotesUIDocument.Print”-方法:

Option Public
Option Explicit

Const pdfAppName = "PDF-XChange Standard"

Dim dc As NotesDocumentCollection
Dim curDoc As NotesDocument
Dim uidoc As NotesUIDocument
Dim workspace As New NotesUIWorkspace
...
Set dc  = curDB.UnprocessedDocuments
...
Set curdoc = dc.GetFirstDocument
Call workspace.EditDocument(False,curDoc)
Set uidoc = workspace.Currentdocument
Call uidoc.Print(1,0,0,False,pdfAppName)
...

尽管将“ uidoc.print”中的第一个参数设置为“ 1”,将打开打印机对话框表单。在打印机对话框中,正确选择了打印机“ PDF-XChange Standard”。选择“确定”按钮可以正确打印文档。

非常感谢您的提示。

0 个答案:

没有答案