Lotus Notes документ в PDF

Question

Мне нужна помощь, так как я не знаю, с чего начать. В идеале я хотел бы иметь кнопку, которая может конвертировать мой документ Lotus Notes в файл PDF, затем он откроет новое электронное письмо, а затем переместит адрес электронной почты в этом документе в поле «Кому». На данный момент мы используем CutePDF Writer для создания файла PDF. Я ломаю процесс, как показано ниже:

1. Распечатать документ
2. Пользователь выбирает CutePDFwriter
3. Сохранить файл pdf
4. Составьте новое электронное письмо с адресом электронной почты, указанным в документе Notes, помещенном в поле «Кому»

Может ли кто-нибудь помочь мне начать с этого?

Answer 1

Получил ответ из файла справки 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

Answer 2

Если вы рады, что пользователь может выбрать cutepdf в качестве принтера, вы сможете без труда использовать @Commands в кнопке из документа или из представления, содержащего документы (см. Справку дизайнера заметок) ,

Единственная проблема, которую я вижу, состоит в том, что пользователь сможет изменить путь, по которому печатает cutepdf, поэтому вам придется снова заставить пользователя найти вложение (но вы сможете автоматизировать появление диалогового окна вложения). ).