Lotus Notes文档为PDF

时间:2012-02-29 12:53:32

标签: lotus-notes lotusscript

我需要一些帮助,因为我不知道从哪里开始。理想情况下,我想有一个可以将我的Lotus Notes文档转换为PDF文件的按钮,然后它将打开一个新的电子邮件,然后将该文档中的电子邮件地址带到“To”字段。此时我们使用CutePDF编写器来创建PDF文件。我打破了下面的过程:

  1. 打印文档
  2. 用户选择CutePDFwriter
  3. 保存pdf文件
  4. 使用位于“收件人”字段
  5. 上的Notes文档上的电子邮件地址撰写新电子邮件

    任何人都可以帮我开始吗?

2 个答案:

答案 0 :(得分:0)

如果您乐意让用户选择cutepdf作为打印机,您应该能够在文档或包含文档的视图中的按钮中使用@Commands(请查看备注设计器帮助) 。

我能看到的唯一问题是用户可以更改cutepdf打印到的路径,因此您必须让用户再次找到附件(但您将能够自动执行附件对话框) )。

答案 1 :(得分:0)

从Domino Designer帮助文件中得到答案。使用以下代码打开邮件文件

Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc = workspace.CurrentDocument

Dim doc As NotesDocument
Dim item As NotesItem
Set doc = uidoc.Document
Set item = doc.GetFirstItem("QSContactEMail")

Set uidoc = workspace.ComposeDocument _
(mailserver$, mailfile$, "Memo")
Call uidoc.FieldAppendText("EnterSendTo", "Test")

对于打印,我只需调用打印功能,让用户选择CutePDF writer