Отправить письмо нескольким получателям через Com интерфейс

Тема в разделе "Lotus - Программирование", создана пользователем -=SEGA=-, 19 ноя 2007.

Статус темы:
Закрыта.
  1. -=SEGA=-

    -=SEGA=- Гость

    Здравствуйте, пишу небольшой клиентик для лотуса на Дельфи используя COM интерфейс Lotus Notes. Остро возникла необходимость отправлять одно письмо нескольким получателям одним документом(чтобы не засорялась почта одинаковыми письмами). Пример: хочу передать письмо 2-м получателям.

    Передаю следующую строку: '..., ...'. Письмо не отслылается с ошибкой: "Unable to send mail, no match found in Name & Address Book(s)".
     
  2. morpheus

    morpheus скриптописец

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    <!--QuoteBegin--=SEGA=-+19:11:2007, 10:13 -->
    <span class="vbquote">(-=SEGA=- @ 19:11:2007, 10:13 )</span><!--QuoteEBegin-->Передаю следующую строку: 'Сергей В Бабичев/Rostov/LICard/ru, Планар У Ор/Moscow/LICard/ru'.
    [snapback]86364" rel="nofollow" target="_blank[/snapback]​
    [/quote]
    имхо, проблема может бы ть с кодировкой, попробуйте отсылать юзверю Test ( латинскимим )
     
  3. sega

    sega Гость

    Ну если проблема с кодировкой, то почему тогда одному юзеру передается все нормально?
     
  4. morpheus

    morpheus скриптописец

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    <!--QuoteBegin-sega+19:11:2007, 10:38 -->
    <span class="vbquote">(sega @ 19:11:2007, 10:38 )</span><!--QuoteEBegin-->Латиницей пробовал, передаю: 'svbabichev@licard.ru, arserov@licard.ru', ошибок отправки не возникает но приходит в лотус отчет:
    [snapback]86373" rel="nofollow" target="_blank[/snapback]​
    [/quote]
    НУ так ошибка ведь описана , доме указан не правильно licard.ru,aserov

    Во первіх попробуйте передать 1го адресата, во вторіх папробуте разные разделители между множественными значениями
     
  5. sega

    sega Гость

    хм... а какой тогда должен быть разделитель между адресами? Вот нашел на офф сайте:
    This script mails a document and its form to Jim Dinauer, Betty Dinauer, and Mary Sticka.
    Код (Text):
    Dim recipients( 1 To 3 ) As String
    recipients( 1 ) = "Jim Dinauer"
    recipients( 2 ) = "Betty Dinauer"
    recipients( 3 ) = "Mary Sticka"
    Call doc.Send( True, recipients )
    Но разделитель переноса каретки не подходит (#13#10).
     
  6. morpheus

    morpheus скриптописец

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    Для: sega
    НУ так recipients в даном слувчае МАССИВ, вот и кинте туда массив, а не строку

    тут схватывает (#10)
     
  7. sega

    sega Гость

    в функцию replaceitemvalue нельзя передать массив, можно только тип variant. ведь должен быть символ-разделитель???
     
  8. morpheus

    morpheus скриптописец

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    Для: sega
    Давно не писал, может так прокатить
    Код (Text):
    Memo.ReplaceItemValue(' "а":"б":"и" ','test send');
     
  9. sega

    sega Гость

    В общем решение нашел, в дельфи есть замечательная вещь VArarrayof. На всякий случай приведу решение, может кто-то еще столкнется:

    Код (Text):
    ReplaceItemValue('SendTo',VArarrayof(['User@mail1.ru', 'User@mail2.ru']));
    Morheus спасибо биг!
     
  10. morpheus

    morpheus скриптописец

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    нема за шо
    Пользуйтсь тегами кода
     
Загрузка...
Статус темы:
Закрыта.

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