Через lotusscript есть возможность в рассылке добавить иконки соц сетей и ссылки ?

Irina

Green Team
31.05.2019
145
2
BIT
0
скажите, а через lotusscript есть возможность в рассылке добавить иконки соц сетей и ссылки ? чтобы потом было это активным

рассылка сделана в виде письма, в котором заполняются поля из определенного документа и необходимо добавить ссылки в виде иконок соц сетей
 
Последнее редактирование:

lmike

нет, пердело совершенство
Lotus Team
27.08.2008
7 983
611
BIT
453
скажите, а через lotusscript есть возможность в рассылке добавить иконки соц сетей и ссылки ? чтобы потом было это активным

рассылка сделана в виде письма, в котором заполняются поля из определенного документа и необходимо добавить ссылки в виде иконок соц сетей
если письмо формируется как mime - просто вставьте иконки со ссылками, если добавлять программно - работайте с mime, будут сложности с бинарными изображениями (программная вставка)
пример без картинок
конвертация РТ
как приатачить файл (для иконок аналогично)
для картинок еще нужен cid: который вставляется в хтмл верстку
пример на java
 
Последнее редактирование:

Irina

Green Team
31.05.2019
145
2
BIT
0
хочу проверить хотя бы без картинок, текст + ссылка при нажатии на текст
Код:
  Dim richStyle As NotesRichTextStyle
  Set richStyle = session.CreateRichTextStyle
  Dim richText As New NotesRichTextItem(doc, "Body")
  richStyle.PassThruHTML = True
  Call richText.AppendStyle(richStyle)
  Call richText.AppendText("<B>Hello</B>")
Call richText.AppendText("<a href=http://www.ibm.com>IBM</a>")

пробовала примеры, но почему-то у меня в результате href=http....>IBM</a> и <B>Hello</B>
 
Последнее редактирование:

lmike

нет, пердело совершенство
Lotus Team
27.08.2008
7 983
611
BIT
453
хочу проверить хотя бы без картинок, текст + ссылка при нажатии на текст
Код:
  Dim richStyle As NotesRichTextStyle
  Set richStyle = session.CreateRichTextStyle
  Dim richText As New NotesRichTextItem(doc, "Body")
  richStyle.PassThruHTML = True
  Call richText.AppendStyle(richStyle)
  Call richText.AppendText("<B>Hello</B>")
Call richText.AppendText("<a href=http://www.ibm.com>IBM</a>")

пробовала примеры, но почему-то у меня в результате href=http....>IBM</a> и <B>Hello</B>
в примерах везде майм, у вас РТ - так не пойдет, внимательнее читайте примеры
 

Irina

Green Team
31.05.2019
145
2
BIT
0
ох не обратила внимание, просто не могу понять в рт поле вообще можно добавить ссылку и подписать ее, чтобы именно текст отображался, а не ссылка
 

lmike

нет, пердело совершенство
Lotus Team
27.08.2008
7 983
611
BIT
453
ох не обратила внимание, просто не могу понять в рт поле вообще можно добавить ссылку и подписать ее, чтобы именно текст отображался, а не ссылка
можно, но лучше майм, если собираетесь делать рассылку, иначе все буде выглядеть убого
 

Irina

Green Team
31.05.2019
145
2
BIT
0
можно, но лучше майм, если собираетесь делать рассылку, иначе все буде выглядеть убого

спасибо, сделала mime и ссылки отлично вышли
только что-то не могу сообразить, надо добавить картинку именно в один столбец
Код:
Call stream.WriteText ({
<table width="100%" border="0" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF">
<tr>
<td>
<img src='' alt='фото'>
</td>

подскажите, пожалуйста, а я могу как-то получить картинку из самой базы, не могу понять, где мне сохранить эту картинку, чтобы использовать в письме потом

а еще не могу найти , как во второй колонке добавить данные после текста

Код:
<td>
Добрый день, FIO

FIO - имя и фамилия из документа
 
Последнее редактирование:

lmike

нет, пердело совершенство
Lotus Team
27.08.2008
7 983
611
BIT
453
подскажите, пожалуйста, а я могу как-то получить картинку из самой базы, не могу понять где мне сохранить эту картинку, чтобы использовать в письме потом
можно ссылку на картинку сделать, но тогда нужно знать имя аттача (или сделать столбец с именами аттачей, в колонке)
еще нужен доступ к этой базе, вьюшке и доку, у внешнего юзера, или док д.б. с полем для паблик просмотра и соответ. ACL в базе
А можно добавить , на LS
 

Irina

Green Team
31.05.2019
145
2
BIT
0
это вам в хтмл ;)
уже все пересмотрела, но не могу найти как сделать
FIO = myView.GetItemValue("name") &....
в Call Stream.WriteText({ текст <и потом данные из поля FIO>})

если несложно подскажите параметр , который отвечает за вывод данных из поля
 

lmike

нет, пердело совершенство
Lotus Team
27.08.2008
7 983
611
BIT
453
уже все пересмотрела, но не могу найти как сделать
FIO = myView.GetItemValue("name") &....
в Call Stream.WriteText({ текст <и потом данные из поля FIO>})

если несложно подскажите параметр , который отвечает за вывод данных из поля
Call Stream.WriteText({ текст} & FIO) или я не понял вашего вопроса
 

Irina

Green Team
31.05.2019
145
2
BIT
0
Call Stream.WriteText({ текст} & FIO) или я не понял вашего вопроса
наверное не совсем я корректно расписала
Код:
 Call stream.WriteText ({
<table><tr>
<td>
и здесь текст &FIO
если просто поставить FIO он его и отобразит также, выделить {} нельзя, а каким параметром вывести я что-то не пойму
 

lmike

нет, пердело совершенство
Lotus Team
27.08.2008
7 983
611
BIT
453

Irina

Green Team
31.05.2019
145
2
BIT
0
можно ссылку на картинку сделать, но тогда нужно знать имя аттача (или сделать столбец с именами аттачей, в колонке)
еще нужен доступ к этой базе, вьюшке и доку, у внешнего юзера, или док д.б. с полем для паблик просмотра и соответ. ACL в базе
А можно добавить , на LS
то есть лучше выложить картинку, чтобы сервер , запускающий агент , имел доступ,так точно из вне получат ее
 

lmike

нет, пердело совершенство
Lotus Team
27.08.2008
7 983
611
BIT
453
то есть лучше выложить картинку, чтобы сервер , запускающий агент , имел доступ,так точно из вне получат ее
,бинго ;) истинно так, но правильнее вложить (и ничего не надо будет шарить) если посмотрите код - это вполне возможно, просто надо внимательнее проанализировать <img src="cid:logotype.jpg" border="0" alt="D-Link Logo" align="left" height="32" width="147" />
Код:
    Set mime = mimeRoot.Createchildentity
    Call stream.Open("C:\Temp\logotype.jpg") 'здесь лучше взять нотусевый ТЕМП ибо в винде может не быть C:\TEMP с доступом и сервер не винда ;)
    Call mime.SetContentFromBytes(stream,"image/jpg",ENC_NONE)
    Call stream.Close
    Call mime.EncodeContent(ENC_BASE64)
    Set header = mime.CreateHeader("Content-ID")
    Call header.SetHeaderVal("<logotype.jpg>")
и придется дать доп. права агенту, т.к. нужен будет доступ к локальному диску (временно сохранять изображения)
Рекомендую подумать об использовании врЕменной папки (есть код для получения её на СиАПИ), для домины/нотус
Все было бы (с моей т.з.) проще на java, там уже есть штатный механизм временных файлов, а есть и вовсе - поток из документа (т.е. не надо заморачиваться созданием файла на диске вручную)
java код практичней было бы запускать через xpages (хотя и в агентах вполне, т.к. используются только штатные библиотеки), но , полагаю, вам пока это будет сложновато (изучать механизмы xpages)
 
Последнее редактирование:

Irina

Green Team
31.05.2019
145
2
BIT
0
подскажите, пожалуйста, а если у меня в поле myitem есть вложение
11.jpg



как мне картинку из Source добавить в mime письмо
пробую Call stream.Open("myitem.getSource")
но размер в stream не меняется
 

lmike

нет, пердело совершенство
Lotus Team
27.08.2008
7 983
611
BIT
453
пробую Call stream.Open("myitem.getSource")
что это?
нотусевый стрим в ЛС работает с файлами и памятью, способа получить сразу встроенный объект у него нет
такой способ есть только в java
выше уже все описано, + надо сохранить аттач во временную папку (см. пост выше)
со встроенными картинка все сложнее, но пока это не ваш случай ;)
Можно играться с ДХЛ, но там свои особенности и будет вопрос по памяти/скорости выдергивания base64/запихивания его в майм (короче - у вас только увеличится кол-во вопросов)
 
Мы в соцсетях:

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