Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Отправка электронного письма пользователю при появлении для него задачи

Помощь - Поиск - Пользователи - Календарь

Полная версия этой страницы: Отправка электронного письма пользователю при появлении для него задачи

Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 8.2 > Программирование управляемых форм 1С 8.2

kosalex

10.07.13, 11:58

Подумал,поискал, и нашёл страндартный общий модуль в типовой конф Документооборот в котором уже реализовано отправления сообщения.

Код:

Функция ОтправитьСообщение(знач УчетнаяЗапись, знач ПараметрыПисьма) Экспорт
    
    Возврат ЭлектроннаяПочта.ОтправитьПочтовоеСообщение(УчетнаяЗапись, ПараметрыПисьма);
    
КонецФункции

Функция ОтправитьПочтовоеСообщение(знач УчетнаяЗапись,
                                   знач ПараметрыПисьма) Экспорт
    
    Если ТипЗнч(УчетнаяЗапись) <> Тип("СправочникСсылка.УчетныеЗаписиЭлектроннойПочты")
       ИЛИ НЕ ЗначениеЗаполнено(УчетнаяЗапись) Тогда
        ВызватьИсключение НСтр("ru = 'Учетная запись не заполнена или заполнена не правильно'");
    КонецЕсли;
    
    Если ПараметрыПисьма = Неопределено Тогда
        ВызватьИсключение НСтр("ru = 'Не заданы параметры отправки.'");
    КонецЕсли;
    
    Кому = "";
    Если ПараметрыПисьма.Свойство("Кому", Кому) Тогда
        Если ТипЗнч(Кому) = Тип("Строка") Тогда
            ПараметрыПисьма.Кому = ОбщегоНазначенияКлиентСервер.РазобратьСтрокуСПочтовымиАдресами(Кому);
        КонецЕсли;
    Иначе
        ВызватьИсключение НСтр("ru = 'Не указан ни один получатель письма.'");
    КонецЕсли;
    
    Копии = "";
    Если ПараметрыПисьма.Свойство("Копии", Копии) Тогда
        Если ТипЗнч(Копии) = Тип("Строка") Тогда
            ПараметрыПисьма.Копии = ОбщегоНазначенияКлиентСервер.РазобратьСтрокуСПочтовымиАдресами(Копии);
        КонецЕсли;
    КонецЕсли;
    
    СлепыеКопии = "";
    Если ПараметрыПисьма.Свойство("СлепыеКопии", СлепыеКопии) Тогда
        Если ТипЗнч(СлепыеКопии) = Тип("Строка") Тогда
            ПараметрыПисьма.СлепыеКопии = ОбщегоНазначенияКлиентСервер.РазобратьСтрокуСПочтовымиАдресами(СлепыеКопии);
        КонецЕсли;
    КонецЕсли;
    
    АдресОтвета = Неопределено;
    
    // проверяем правильную заполненность АдресаОтвета
    Если ПараметрыПисьма.Свойство("АдресОтвета", АдресОтвета) Тогда
        ПараметрыПисьма.АдресОтвета = ОбщегоНазначенияКлиентСервер.РазобратьСтрокуСПочтовымиАдресами(АдресОтвета);
    КонецЕсли;
    
    Вложения = Неопределено;
    
    Если ПараметрыПисьма.Свойство("Вложения", Вложения) Тогда
        Для Каждого Вложение Из Вложения Цикл
            Если ТипЗнч(Вложение.Значение) = Тип("Строка") Тогда
                Если ЭтоАдресВременногоХранилища(Вложение.Значение) Тогда
                    Вложения.Вставить(Вложение.Ключ, ПолучитьИзВременногоХранилища(Вложение.Значение));
                КонецЕсли;
            КонецЕсли;
        КонецЦикла;
        ПараметрыПисьма.Вложения = Вложения;
    КонецЕсли;
    
    Возврат ОтправитьСообщение(УчетнаяЗапись, ПараметрыПисьма);
    
КонецФункции

Как в функцию ОтправитьСообщение передать значения параметров учётная запись?
Задача моя следующая, при формировании какого нибудь БП уведомлять пользователя по электронке,для которого была сформирована задача.

logist

10.07.13, 12:35

Цитата(kosalex @ 10.07.13, 12:58) необходимо зарегистрироваться для просмотра ссылки

Как в функцию ОтправитьСообщение передать значения параметров учётная запись?

Этот код нио чем не говорит?

    Если ТипЗнч(УчетнаяЗапись) <> Тип("СправочникСсылка.УчетныеЗаписиЭлектроннойПочты")
       ИЛИ НЕ ЗначениеЗаполнено(УчетнаяЗапись) Тогда
        ВызватьИсключение НСтр("ru = 'Учетная запись не заполнена или заполнена не правильно'");
    КонецЕсли;

kosalex

10.07.13, 13:08

Говорит! Как в неё передать пользователя - исполнителя БП?

ЭлектроннаяПочта.ОтправитьСообщение(????,????);

logist

10.07.13, 13:14

А зачем это в нее передавать пользователя? В нее надо передать ПараметрыПисьма. Смотрим код дальше:

    Если ПараметрыПисьма.Свойство("Кому", Кому) Тогда
        Если ТипЗнч(Кому) = Тип("Строка") Тогда
            ПараметрыПисьма.Кому = ОбщегоНазначенияКлиентСервер.РазобратьСтрокуСПочтовымиАдресами(Кому);
        КонецЕсли;
    Иначе

Может сразу составите вопросы для себя и проанализируете код, как видите там есть ответы на многие вопросы.

kosalex

10.07.13, 13:46

я понимаю,что в эту функцию нужно передать пользователя для которого создаётся БП и параметры письма.

Если НЕ ФормаОповещенияОткрыта Тогда 
            
            ЭлектроннаяПочта.ОтправитьСообщение(что сдесь писать?); //Как определить кому отослать сообщение?


            ОткрытьФормуМодально("ОбщаяФорма.ОповещениеПользователяНовыеЗадачи");
            ОповещениеПользователей.ОчиститьОповещенияОЗадачах();
КонецЕсли;

Vofka

10.07.13, 14:03

Цитата(kosalex @ 10.07.13, 14:46) необходимо зарегистрироваться для просмотра ссылки

что сдесь писать?

УчетнаяЗапись - это ссылка на элемент соответствующего справочника.
А ПараметрыПисьма - это я не помню что уже, вроде структура какая-то.

logist

10.07.13, 14:26

УчетнаяЗапись - это учетная запись от имени которой будет отправляться письмо. Это запись соответствующего справочника, которая хранит, в данном случае, настройки "Отправителя".
А ПараметрыПисьма это произвольная структура, в которую можно передавать что необходимо для составления письма, типовые ключи структуры видны в "ОтправитьПочтовоеСообщение".
Вам же перед вызовом этой перед вызовом функции необходимо заполнить эту структуру, ПараметрыПиьма.Кому = АдресПользователяДляОповещения.

kosalex

10.07.13, 14:27

мне нужно передать ссылку на пользователя в справочнике "СправочникСсылка.УчетныеЗаписиЭлектроннойПочты", да?

logist

10.07.13, 14:37

Цитата(kosalex @ 10.07.13, 15:27) необходимо зарегистрироваться для просмотра ссылки

В первом параметре - да. Ссылку на ОТПРАВИТЕЛЯ письма.

kosalex

10.07.13, 15:23

я не шарю....

что туда нужно написать и как?

Vofka

10.07.13, 15:42

kosalex, посмотрите как эту функция вызывается в документообороте.

kosalex

11.07.13, 7:34

Здравствуйте. Не нашёл как вызывается....

Вот что у меня написалось:

Процедура ПроверитьЗадачиПользователя() Экспорт
    

    Параметры = Новый Структура;
    Параметры.Вставить("Кому",Исполнитель);
    
    УчетнаяЗапись = Пользователи.ТекущийПользователь();
    
    Если ОповещениеПользователей.ЕстьНовыеЗадачи() Тогда
        Сигнал();
        Если НЕ ФормаОповещенияОткрыта Тогда 
            
            ЭлектроннаяПочта.ОтправитьПочтовоеСообщение(УчетнаяЗапись,Параметры); //Как определить кому отослать сообщение?

            ОткрытьФормуМодально("ОбщаяФорма.ОповещениеПользователяНовыеЗадачи");
            ОповещениеПользователей.ОчиститьОповещенияОЗадачах();
        КонецЕсли;
    КонецЕсли;
КонецПроцедуры

Не могу понять как вернуть, передать пользователя-исполнителя для которого задача!
По подписке на события при записи задачи получаю пользователя-исполнителя:

Процедура ЗадачаИсполнителяПриЗаписи(Источник, Отказ) ЭКСПОРТ
    Если НЕ Источник.Выполнена  Тогда
            НаборЗаписей = РегистрыСведений.ОповещениеПользователя.СоздатьНаборЗаписей();
            НаборЗаписей.Отбор.Пользователь.Установить(Источник.Исполнитель);
            
            СтрокаНабора                 = НаборЗаписей.Добавить();
            СтрокаНабора.Пользователь     = Источник.Исполнитель;
            
            НаборЗаписей.Записать();
            
    КонецЕсли;
КонецПроцедуры

А вот как передать пользователя-исполнителя в структуру "Параметры" ??

asd34

11.07.13, 8:47

Цитата(kosalex @ 11.07.13, 7:34) необходимо зарегистрироваться для просмотра ссылки

ЭлектроннаяПочта.ОтправитьПочтовоеСообщение(УчетнаяЗапись,Параметры); //Как определить кому отослать сообщение?

Как-то так:

Пользователь = Исполнитель;//определяем пользователя 1С.
УчетнаяЗапись = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(Пользователь, "ОсновнаяУчетнаяЗапись"); //это основная учетная запись эл. почты пользователя, указанная в настройках пользователя

ПараметрыПисьма = Новый Структура;
ПараметрыПисьма.Вставить("Тема", НСтр("ru = 'Задачи'"));
ПараметрыПисьма.Вставить("Тело", НСтр("ru = 'У Вас новая задача!'"));
ПараметрыПисьма.Вставить("Кому", УчетнаяЗапись.АдресЭлектроннойПочты);
Если Пароль <> Неопределено Тогда
     ПараметрыПисьма.Вставить("Пароль", Пароль);
КонецЕсли;

kosalex

11.07.13, 9:11

Пользователь = Исполнитель;

как получить Пользователь = Исполнитель;//определяем пользователя 1С. ??

в регистре сведений хранятся пользователи-исполнители.

Как его от туда выбрать?

asd34

11.07.13, 9:57

Процедура ПроверитьЗадачиПользователя() проверяет задачи текущего пользователя? Тогда

Пользователь = глЗначениеПеременной("глТекущийПользователь");

kosalex

11.07.13, 10:11

не текущего. текущий пользователь делает задачу для пользователя - исполнителя. Уведомлять нужно пользователя-исполнителя, который записывается в регистр сведений при формировании бизнес процесса. Если в регистре сведений есть запись с именем "Пользователь-исполнитель",тогда этому пользователю-исполнителю нужно отправить уведомление.

asd34

11.07.13, 10:25

Получайте исполнителя из Вашего регистра.

kosalex

11.07.13, 10:29

не получается....

НаборЗаписей = РегистрыСведений.ОповещениеПользователя.СоздатьНаборЗаписей();
НаборЗаписей.Отбор.Пользователь.Установить( Что сдесь писать?);

или это не правильно?

asd34

11.07.13, 10:36

необходимо зарегистрироваться для просмотра ссылки

kosalex

11.07.13, 10:47

спасибо, гуглить я умею. я сюда пишу после того как погуглю.....

Функция ВыбратьИсполнителяБП() ЭКСПОРТ
    
    НаборЗаписей = РегистрыСведений.ОповещениеПользователя.СоздатьНаборЗаписей();    
    НаборЗаписей.Отбор.Пользователь.Установить("Пользователь", ???????);
    НаборЗаписей.Прочитать();
    Исполнитель = НаборЗаписей.Пользователь;
    НаборЗаписей.Очистить();
    Возврат Исполнитель;
    
    
КонецФункции

Как сдесь установить значение??Сдесь должен быть по идеи пользователь-исполнитель.

kosalex

12.07.13, 8:02

Господа!

Процедура ЗадачаИсполнителяПриЗаписи(Источник, Отказ) ЭКСПОРТ
    Если НЕ Источник.Выполнена  Тогда
            НаборЗаписей = РегистрыСведений.ОповещениеПользователя.СоздатьНаборЗаписей();
            НаборЗаписей.Отбор.Пользователь.Установить(Источник.Исполнитель);
            
            СтрокаНабора                 = НаборЗаписей.Добавить();
            СтрокаНабора.Пользователь     = Источник.Исполнитель;
            
            НаборЗаписей.Записать();
            
        //Отправка эл. письма пользователю-исполнителю при появлении для него задачи.
        ///////////////////////////////////////////////////////////////////////////////////////////////////////////
        ТекстПредупреждения = "В справочнике УчетныеЗаписиЭлектроннойПочты нет такого пользователя " + Источник.Исполнитель; 
        ПользовательИсполнитель =СокрЛП(Источник.Исполнитель);
        
        Запрос = Новый Запрос;
        Запрос.Текст = 
         "ВЫБРАТЬ
         |    УчетныеЗаписиЭлектроннойПочты.ИмяПользователя,
         |    УчетныеЗаписиЭлектроннойПочты.Ссылка
         |ИЗ
         |    Справочник.УчетныеЗаписиЭлектроннойПочты КАК УчетныеЗаписиЭлектроннойПочты
         |ГДЕ
         |    УчетныеЗаписиЭлектроннойПочты.ИмяПользователя = &ИмяПользователя";
         
         Запрос.УстановитьПараметр("ИмяПользователя",ПользовательИсполнитель);
                  
         Если НЕ Запрос.Выполнить().Пустой() Тогда
             
             РезультатЗапроса = Запрос.Выполнить().Выгрузить();
             
             Для Каждого ТекСтрока Из РезультатЗапроса Цикл 
                 
                 Параметры = Новый Структура;
                 ТелоПисьма = "У Вас есть новая задача";
                 
                 Параметры.Вставить("Кому",ТекСтрока.Ссылка);
                 Параметры.Вставить("Тело",ТелоПисьма);
                 
                 
            ЭлектроннаяПочта.ОтправитьПочтовоеСообщение(УчетнаяЗапись,Параметры);
             КонецЦикла;     
             
             
         Иначе 
             Сообщить(ТекстПредупреждения, СтатусСообщения.Важное); 
         КонецЕсли;
         
         
         
         
     КонецЕсли;
КонецПроцедуры

Как получить "УчетнаяЗапись" с типом "СправочникСсылка.УчетныеЗаписиЭлектроннойПочты" ????

Vofka

12.07.13, 8:23

ТекСтрока.Ссылка

kosalex

12.07.13, 8:44

Ошибка:{ОбщийМодуль.ЭлектроннаяПочта.Модуль(267)}: Итератор для значения не определен
Для Каждого ПочтовыйАдресПолучателя Из Кому Цикл

Код:

Процедура ЗадачаИсполнителяПриЗаписи(Источник, Отказ) ЭКСПОРТ
Если НЕ Источник.Выполнена  Тогда
   НаборЗаписей = РегистрыСведений.ОповещениеПользователя.СоздатьНаборЗаписей();
   НаборЗаписей.Отбор.Пользователь.Установить(Источник.Исполнитель);
  
   СтрокаНабора     = НаборЗаписей.Добавить();
   СтрокаНабора.Пользователь  = Источник.Исполнитель;
  
   НаборЗаписей.Записать();
  
  //Отправка эл. письма пользователю-исполнителю при появлении для него задачи.
  ///////////////////////////////////////////////////////////////////////////////////////////////////////////
  ТекстПредупреждения = "В справочнике УчетныеЗаписиЭлектроннойПочты нет такого пользователя " + Источник.Исполнитель;
  ПользовательИсполнитель =СокрЛП(Источник.Исполнитель);
  УчетнаяЗапись = Справочники.УчетныеЗаписиЭлектроннойПочты.СистемнаяУчетнаяЗаписьЭлектроннойПочты
;
 
  Запрос = Новый Запрос;
  Запрос.Текст =
   "ВЫБРАТЬ
   | УчетныеЗаписиЭлектроннойПочты.ИмяПользователя,
   | УчетныеЗаписиЭлектроннойПочты.Ссылка
   |ИЗ
   | Справочник.УчетныеЗаписиЭлектроннойПочты КАК УчетныеЗаписиЭлектроннойПочты
   |ГДЕ
   | УчетныеЗаписиЭлектроннойПочты.ИмяПользователя = &ИмяПользователя";
  
   Запрос.УстановитьПараметр("ИмяПользователя",ПользовательИсполнитель);
     
   Если НЕ Запрос.Выполнить().Пустой() Тогда
   
    РезультатЗапроса = Запрос.Выполнить().Выгрузить();
   
    Для Каждого ТекСтрока Из РезультатЗапроса Цикл
    
     Параметры = Новый Структура;
     ТелоПисьма = "У Вас есть новая задача";
    
     Параметры.Вставить("Кому",Справочники.УчетныеЗаписиЭлектроннойПочты.НайтиПоНаименованию(ПользовательИсполнитель));
     Параметры.Вставить("Тело",ТелоПисьма);
    
    
   ЭлектроннаяПочта.ОтправитьПочтовоеСообщение(УчетнаяЗапись,Параметры);
    КонецЦикла; 
   
   
   Иначе
    Сообщить(ТекстПредупреждения, СтатусСообщения.Важное);
   КонецЕсли;

  КонецЕсли;
КонецПроцедуры

logist

12.07.13, 9:10

Все что идет после Новый Запрос, можно забыть. Потому, что вы ищите не то и не там.
1. Учетная запись в вашем случае это запись от которой отправляется письмо.
2. У справочника Пользователи есть ТЧ КонтактнаяИнфомрация, которая должна хранить там адрес электронной почты этого пользователя (по СтрокаТЧ.Вид = Справочники.ВидыКонтактнойИнформации.EmailПользователя), соответственно что бы сформировать поле Кому - нужно выбирать эту информацию из ТЧ справочника Пользователи.

kosalex

12.07.13, 9:25

УчетнаяЗапись = СистемнаяУчетнаяЗапись - которорая предопределена в справочнике УчетныеЗаписиЭлектроннойПочты. Почему её нельзя использовать?

Кому = ПользовательИсполнитель.АдресЭлектроннойПочты, почему нельзя взять отсюда e-mail пользователя?

Процедура ЗадачаИсполнителяПриЗаписи(Источник, Отказ) ЭКСПОРТ
    Если НЕ Источник.Выполнена  Тогда
            НаборЗаписей = РегистрыСведений.ОповещениеПользователя.СоздатьНаборЗаписей();
            НаборЗаписей.Отбор.Пользователь.Установить(Источник.Исполнитель);
            
            СтрокаНабора                 = НаборЗаписей.Добавить();
            СтрокаНабора.Пользователь     = Источник.Исполнитель;
            
            НаборЗаписей.Записать();
            
        //Отправка эл. письма пользователю-исполнителю при появлении для него задачи.
        ///////////////////////////////////////////////////////////////////////////////////////////////////////////
        ТекстПредупреждения = "В справочнике УчетныеЗаписиЭлектроннойПочты нет такого пользователя " + Источник.Исполнитель; 
        
        ПользовательИсполнитель = СокрЛП(Источник.Исполнитель);
        ПользовательИсполнитель = Справочники.УчетныеЗаписиЭлектроннойПочты.НайтиПоНаименованию(ПользовательИсполнитель); //Получаем пользователя которому будем отправлять эл. сообщение
        
        УчетнаяЗапись = Справочники.УчетныеЗаписиЭлектроннойПочты.СистемнаяУчетнаяЗаписьЭлектроннойПочты
; //Получаем пользователя от которого будем отправлять эл.сообщение
        
        Запрос = Новый Запрос;
        Запрос.Текст = 
         "ВЫБРАТЬ
         |    УчетныеЗаписиЭлектроннойПочты.ИмяПользователя,
         |    УчетныеЗаписиЭлектроннойПочты.Ссылка
         |ИЗ
         |    Справочник.УчетныеЗаписиЭлектроннойПочты КАК УчетныеЗаписиЭлектроннойПочты
         |ГДЕ
         |    УчетныеЗаписиЭлектроннойПочты.ИмяПользователя = &ИмяПользователя";
         
         Запрос.УстановитьПараметр("ИмяПользователя",СокрЛП(Источник.Исполнитель));
         
         РезультатЗапроса = Запрос.Выполнить();
         Если НЕ РезультатЗапроса.Пустой() Тогда   //Если Пользователь-исполнитель найден в справочнике "УчетныеЗаписиЭлектроннойПочты"
             
             ДетальныеЗаписиРезультатЗапроса = РезультатЗапроса.Выгрузить();
             
             Для Каждого ТекСтрока Из ДетальныеЗаписиРезультатЗапроса Цикл 
                 
                 Параметры = Новый Структура;
                 ТелоПисьма = "У Вас есть новая задача";
                 
                 Параметры.Вставить("Кому",ПользовательИсполнитель.АдресЭлектроннойПочты); //Получаем эл. адрес пользователя-исполнителя
                 Параметры.Вставить("Тело",ТелоПисьма);
                 
                 
            ЭлектроннаяПочта.ОтправитьПочтовоеСообщение(УчетнаяЗапись,Параметры);
             КонецЦикла;     
             
             
         Иначе 
             Сообщить(ТекстПредупреждения, СтатусСообщения.Важное);
             Возврат;
         КонецЕсли;
         
         
         
         
     КонецЕсли;
КонецПроцедуры

logist

12.07.13, 9:38

Цитата(kosalex @ 12.07.13, 10:25) необходимо зарегистрироваться для просмотра ссылки

УчетнаяЗапись = СистемнаяУчетнаяЗапись - которорая предопределена в справочнике УчетныеЗаписиЭлектроннойПочты. Почему её нельзя использовать?

Где я сказал что ее нельзя использовать? Я об этом говорил "Справочники.УчетныеЗаписиЭлектроннойПочты.НайтиПоНаименованию(ПользовательИ
сполнитель)".

Цитата(kosalex @ 12.07.13, 10:25) необходимо зарегистрироваться для просмотра ссылки

Кому = ПользовательИсполнитель.АдресЭлектроннойПочты, почему нельзя взять отсюда e-mail пользователя?

Потому что это не не связанный с пользователем справочник, это не логичное использование. А вдруг вы заведете в базу пользователя, а запись о учетной записи почты не создадите, или ошибочно создадите не с таким именем, ведь вы поиск осуществляете по строке. К тому же в вашей конфигурации нет встроенной подсистемы электронной почты, поэтому заводить на каждого пользователя запись в справочнике Учетные записи почты не имеет практического смысла, в отличие от простого ввода адреса электронной почты в справочник Пользователи.

kosalex

12.07.13, 9:44

Подскажите как получить эл. адрес со справочника Пользователи.
Там в форме "ФормаЭлемента" скрыта заакладка "КонтактнаяИнформация" . Как достучаться к значению реквизита АдресЭП табличной части "КонтактнаяИнформация" ??

logist

12.07.13, 9:52

Вам не нужна "закладка" Контактная информация. В режиме предприятия адрес вводится на вкладке "Адреса, телефоны", поле E-mail.
Получить адрес можно запросом, как - я писал выше.

p.s. вы хоть сами как-то ковыряйтесь там, пытайтесь разобраться как работает что-то, а то когда видишь, что человек не пытается сам что-то сделать - пропадает интерес отвечать.

kosalex

12.07.13, 9:55

Цитата(logist @ 12.07.13, 10:52) необходимо зарегистрироваться для просмотра ссылки

можете не поверить, я ковыряюсь!!
Если у меня есть вопрос,я пишу его здесь, а сам продолжаю ковырятся!

logist

12.07.13, 10:01

Цитата(kosalex @ 12.07.13, 10:55) необходимо зарегистрироваться для просмотра ссылки

можете не поверить, я ковыряюсь!!

Плохо ковыряетесь. Получить адрес электронной почты, в Вашем случае, можно так

Кому = УправлениеКонтактнойИнформацией.ПолучитьКонтактнуюИнформацияОбъекта(Источник.Исполнитель, Справочники.ВидыКонтактнойИнформации.EmailПользователя);

И уберите этот запрос который непонятно что делает. Получили системную учетную, получили адрес пользователя, задали текст, и дальше ЭлектроннаяПочта.ОтправитьПочтовоеСообщение

kosalex

12.07.13, 10:11

Цитата(logist @ 12.07.13, 11:01) необходимо зарегистрироваться для просмотра ссылки

Плохо ковыряетесь. Получить адрес электронной почты, в Вашем случае, можно так

Кому = УправлениеКонтактнойИнформацией.ПолучитьКонтактнуюИнформацияОбъекта(Источник.Исполнитель, Справочники.ВидыКонтактнойИнформации.EmailПользователя);

Может не там ковыряю...
Про это "УправлениеКонтактнойИнформацией.ПолучитьКонтактнуюИнформацияОбъекта(Источни
к.Исполнитель, Справочники.ВидыКонтактнойИнформации.EmailПользователя)" первый раз увидел...
Спасибо!!

Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.