S
sinq
Коллеги, помогите с освоением. Написать агент, при запуске сохраняет все вложения из выбранного письма в указанную папку и само письмо в удобочитаемом виде. Попробовал найти методику сохранения писем в pdf, оказалось это не так то просто, необходимы дополнительные shareware плагины. С rtf примерно такая же ситуация.
LotusScript только осваиваю, поэтому если есть дока или хороший хелп по методам с описанием, поделитесь пож-та.
Мой хеллоувордный скрипт пока выглядит так:
Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim workspace As New NotesUIWorkspace
Dim collection As NotesDocumentCollection
Dim doc As NotesDocument
Dim uiview As NotesUIView
Set db = session.CurrentDatabase
Set uiview = workspace.CurrentView
Set collection = db.UnprocessedDocuments
Set doc = collection.GetFirstDocument
Msgbox doc.body ' Чтобы хоть чтото происходило
End Sub
ищу также ссылки на похожие примеры, потому как гугл предлагает чтото уж больно замудреное
если есть время, хелп)
LotusScript только осваиваю, поэтому если есть дока или хороший хелп по методам с описанием, поделитесь пож-та.
Мой хеллоувордный скрипт пока выглядит так:
Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim workspace As New NotesUIWorkspace
Dim collection As NotesDocumentCollection
Dim doc As NotesDocument
Dim uiview As NotesUIView
Set db = session.CurrentDatabase
Set uiview = workspace.CurrentView
Set collection = db.UnprocessedDocuments
Set doc = collection.GetFirstDocument
Msgbox doc.body ' Чтобы хоть чтото происходило
End Sub
ищу также ссылки на похожие примеры, потому как гугл предлагает чтото уж больно замудреное
если есть время, хелп)