Агент По Сохранению Тела Сообщения На Диск

Тема в разделе "Lotus - Программирование", создана пользователем Belocarsk, 15 ноя 2013.

  1. Belocarsk

    Belocarsk New Member

    Регистрация:
    14 ноя 2013
    Сообщения:
    2
    Симпатии:
    0
    Здравствуйте, уважаемые мастера Лотуса! :) :)

    В программировании агентов для лотус я делитант.
    Работодатель поставил задачу, которую нужно решить.
    Приходят сообщения, тела которых нужно выгружать в тексовый файл для использования в стороней программе,по событию: приход нового сообщения.
    Если можно выложите код с объяснениями.

    Спасибо! :huh: B)
     
  2. Serduko

    Serduko Well-Known Member

    Регистрация:
    11 окт 2011
    Сообщения:
    174
    Симпатии:
    0
    Код (LotusScript):
    Dim session As New NotesSession
    Dim Stream As NotesStream

    Set stream=session.CreateStream
    Call Stream.Open("C:\вашфайл.txt")
    Call Stream.WriteText("ваш текст")
    Call Stream.Close
    Для перехода на следующую строку в тексте можно использовать, либо добавляя Chr$(13) + Chr$(10), либо построчно в цикле вызывать Stream.WriteText.
     
  3. ToxaRat

    ToxaRat Чёрный маг
    Lotus team

    Регистрация:
    6 ноя 2007
    Сообщения:
    3.046
    Симпатии:
    18
    неправильно, нужно так
    Call Stream.WriteText("Тело сообщения")
     
  4. savl

    savl Lotus team
    Lotus team

    Регистрация:
    28 окт 2011
    Сообщения:
    2.051
    Симпатии:
    146
    А в сообщениях есть файлы?
    Формат сообщения какой? письмо обычное?
     
  5. afest

    afest Well-Known Member

    Регистрация:
    16 июн 2009
    Сообщения:
    78
    Симпатии:
    0
    неа, нужно так:
    Call Stream.WriteText("Пиченьки/Пыво, нужное подчеркнуть")
     
  6. Belocarsk

    Belocarsk New Member

    Регистрация:
    14 ноя 2013
    Сообщения:
    2
    Симпатии:
    0
    В сообщениях нет прицепов. Письма обычные, текста
     
Загрузка...

Поделиться этой страницей