W
wowa
Нужна помощь.
Есть форма, в ней обычная таблица с текстом, рисунок . Эту таблицу мне нужно перенести в Body письма.
Нашел только один вариант, RenderToRTItem
взял из хелпа код:
Нажимаю Action в Action Bare. Далее открываю письмо, а там в body не моя таблица, а шапка письма, т.е. такие поля как "Отправитель", To,cc,bcc и т.д. ,
Но моей таблицы и рисунка которые мне надо - нет
Есть форма, в ней обычная таблица с текстом, рисунок . Эту таблицу мне нужно перенести в Body письма.
Нашел только один вариант, RenderToRTItem
взял из хелпа код:
Код:
Dim session As New NotesSession
Dim workspace As New NotesUIWorkspace
Dim db As NotesDatabase
Dim uidoc As NotesUIDocument
Dim docA As NotesDocument
Dim docB As NotesDocument
Dim rtitem As NotesRichTextItem
Dim success As Variant
Set db = session.CurrentDatabase
Set uidoc = workspace.CurrentDocument
Set docA = uidoc.Document
Set docB = New NotesDocument( db )
Set rtitem = New NotesRichTextItem( docB, "Body" )
docB.Form = "Memo"
Call docB.Save( True, True )
success = docA.RenderToRTItem( rtitem )
Call docB.Save( True, True )
Нажимаю Action в Action Bare. Далее открываю письмо, а там в body не моя таблица, а шапка письма, т.е. такие поля как "Отправитель", To,cc,bcc и т.д. ,
Но моей таблицы и рисунка которые мне надо - нет