Документ 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 писатель

Answer 2

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

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