• Курсы Академии Кодебай, стартующие в мае - июне, от команды The Codeby

    1. Цифровая криминалистика и реагирование на инциденты
    2. ОС Linux (DFIR) Старт: 16 мая
    3. Анализ фишинговых атак Старт: 16 мая Устройства для тестирования на проникновение Старт: 16 мая

    Скидки до 10%

    Полный список ближайших курсов ...

AppendText

Irina

Green Team
31.05.2019
145
2
BIT
0
подскажите, пожалуйста, как только одну строку выделить , если используется AppendText?
например , сделать жирный или другой цвет
Код:
Call item.AppendText("Текст")
Call item.AddNewLine( 2 )
Код:
пробую
Dim richStyle As NotesRichTextStyle
            Set richStyle = S.CreateRichTextStyle
             richStyle.NotesFont = FONT_ROMAN
             richStyle.FontSize = 12
             richStyle.Italic = False
            
        richStyle.NotesColor = COLOR_RED
        Call item.AppendStyle(richStyle)
        Call item.AppendText("")
но он не становится другим цветом
 

ToxaRat

Чёрный маг
Green Team
06.11.2007
3 332
42
BIT
0
сначала задаешь стиль в RT
потом пишешь текст
потом задаешь другой стиль
и опять пишеш текст
Код:
Call item.AppendStyle(richStyle)
Call item.AppendText("теперь текст")
 

garrick

Lotus Team
26.10.2009
1 352
151
BIT
208
сначала задаешь стиль в RT
потом пишешь текст
потом задаешь другой стиль
и опять пишеш текст
Код:
Call item.AppendStyle(richStyle)
Call item.AppendText("теперь текст")
Потом не забываешь вставить снова старый стиль, а то весь текст до конца будет с новым стилем.
 

Irina

Green Team
31.05.2019
145
2
BIT
0
а скажите, пожалуйста, для Call bodyitem.AppendText
можно ли как-то указать utf-8 формат? а то не весь текст корректно отображается .
используется для заполнения Body в письме ,которое формируется в форме
 

Irina

Green Team
31.05.2019
145
2
BIT
0
пробовала
Код:
Set body = doc.CreateMIMEEntity("Body")                   
                html = "<H1>Test</H1>"
                html = html & doc.Subject(0) & "<br>"
                
                j=j+1
                Set stream = session.CreateStream
                Call stream.WriteText(html)
                Call body.SetContentFromText(stream, {text/html; charset="UTF-8"}, ENC_IDENTITY_BINARY)

но пишет на Set body =doc.CreateMIMEEntity("Body") что уже есть .
а если эту строку убрать, то на
body.SetContentFromText(stream, {text/html; charset="UTF-8"}, ENC_IDENTITY_BINARY)
ругается
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!