Нужно организовать отправку сообщения при проведении документа.Где и как мне это сделать?Я так полагая это нужно делать в модуле объекта в Процедура ОбработкаПроведения?

(0) лучше это не делать при проведении

(0) в подписке на событие

(2) И там тоже лучше не делать.

Я имею ввиду как провелся документ то данные документа сразу высылаются на указанную почту.

(4) Рекомендую сделать легкоотключаемый механизм, ибо получателю это уже на 2-ю неделю надоест.

(5) угу
при первом же тайм-ауте по 25 порту это надоест отправителю

ну надоест. И что они, напишут заявления?

(6) Если сделать, как (0) и (2) хотят, то вообще всем надоест.

(8) конечно
посему почта должна отправляться асинхронно и пакетно

(8,9) от телепаты... мож там одна накладная в день и то - событие

(9) Ну, мы на это и пытаемся намекнуть, а ты всю интригу испортил :)

мне уже надоело

А вообще в Процедура ОбработкаПроведения я там могу же организовать отправку(глПослать) чтобы отправлялось сообщение с информацией со строкой таблицы документа.То есть документ провелся и тут же отправилось.

(13) Ну, делай. Как знать, может все хорошо закончится - тебя за это уволят и мы тебя больше не увидим.

(13) и при каждом перепроведении документов и восстановлении последовательности полетит письмо

(13) Можешь, потом все услышишь:)

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

(16)Ну а где мне это писать?Объяните вообще как мне все это дело организовать?Просто есть док ЗаказКлиента нужно чтобы как только заполнится документ и проведется  происходила отправка строк табличного поля на ящик?

(18) А ящик для всех один на который слать? Или он в данных о клиенте храниться?

(19)ОДин

(20) Это замечательно что один адрес!)
Если тебе сказали делать при проведении, делай там - в модуле объекта в Процедура ОбработкаПроведения.

Там вызывай функцию что-то типа такого:

Функция ОтправкаПоПочте(ТемаПисьма, ТекстПисьма) Экспорт
       АдресСервераSMTP="mail.***.ru";
       ПортSMTP=25;
       ПользовательSMTP="***"; //учетка с которой будешь отправлять
       ПарольSMTP="***";
       УведомитьОДоставке= Ложь;
       ИПП=Новый ИнтернетПочтовыйПрофиль;
       ИПП.АдресСервераSMTP=АдресСервераSMTP;
       ИПП.ПортSMTP=ПортSMTP;
       ИПП.ПользовательSMTP=ПользовательSMTP;
       ИПП.ПарольSMTP=ПарольSMTP;
       Письмо=Новый ИнтернетПочтовоеСообщение;
       Письмо.Получатели.Добавить("***@***.ru"); //адрес получателя
       Письмо.Тема= ТемаПисьма;
       Письмо.Отправитель = "***@***.ru";
       Письмо.Тексты.Добавить(ТекстПисьма);
       Письмо.УведомитьОДоставке=УведомитьОДоставке;
       Почта=Новый ИнтернетПочта;
       Почта.Подключиться(ИПП);
       Почта.Послать(Письмо);
       Почта.Отключиться();    
КонецФункции

ТекстПисьма - это строка. Поэтому твои строки нужно поочередно добавлять.

ТекстПисьма = ТекстПисьма + ТабличнаяЧасть.ТОвары ... + Символы.ПС;

Как-то вот так...

(21) При отправке скорее всего понадобится:
ПочтовыйПрофиль.АутентификацияSMTP = СпособSMTPАутентификации.Login;

ну и:
ПочтовыйПрофиль.ВремяОжидания = ВремяОжидания;

(22) У меня работает (21)

Только лучше при отправке сделай так:

Попытка
  Почта.Послать(Письмо);
Исключение
  Сообщить("Бла бла бла");
КонецПопытки;

А лучше бы действительно сначало бы формировал какой нибудь список для отправки а потом в задании в 23 часа бы отправил бы все махом.

+(24) И лучше в файл формировать это все дело: в XML или в Excel

(25) В XML, потом ZIP.

(21)Это все хорошо.Но нужно сделать по анлогии с ЗакрытиеЗАявки.Только тут отправляется сообщение и клиенту и ЭлАдрес = "hfnhf@vnsj.ru".Не могу понять как это сделать?


Для Каждого строкатаблицы из Услуги Цикл
        Если строкатаблицы.Уведомить Тогда
            Если Не ПустаяСтрока( строкатаблицы.СообщениеКлиенту ) Тогда
                СК = "Здравствуйте, уважаемый пользователь компании "+TrimAll(Контрагент.Наименование)+".
                |<br>По Вашему вопросу от "+строкатаблицы.ДатаПостановки+": <br><b>"+ строкатаблицы.Содержание+"</b>
                |<br>Сделано следующее: <br><b>"+строкаТаблицы.СообщениеКлиенту+"
                |</b><br>С уважением, коллектив F1Pro"+"
                |<br><b>73734634</b>";
                ОтборРегистра        = ПолучитьОтборДляАдресаОтправкиПисем(Контрагент);
                Ресурсы = РегистрыСведений.КонтактнаяИнформация.Получить(ОтборРегистра);
                ЭлАдрес = Ресурсы.Представление;
                Если НЕ ЗначениеЗаполнено(ЭлАдрес) Тогда
                    Предупреждение("У контрагента не обнаружен электронный адрес для обмена документами! Выгрузка невозможна!");
                    Возврат;
                КонецЕсли;
                строкатаблицы.Уведомлен = глПослать(TrimAll(Контрагент.Наименование)+": "+TrimAll(строкатаблицы.Работа.Наименование),СК,ЭлАдрес);
                Если строкатаблицы.Уведомлен Тогда
                     строкатаблицы.Уведомить = Ложь;
                КонецЕсли;
            Иначе
                сообщить("Не указано сообщение клиенту в строке "+строкатаблицы.НомерСтроки+"!!!");
                Отказ = Истина;
                возврат;
            КонецЕсли;
        Иначе
             СК = "Здравствуйте, уважаемый пользователь компании "+TrimAll(Контрагент.Наименование)+".
                |<br>По Вашему вопросу от "+строкатаблицы.ДатаПостановки+": <br><b>"+ строкатаблицы.Содержание+"</b>
                |<br>Сделано следующее: <br><b>"+строкаТаблицы.СообщениеКлиенту+"
                |</b><br>С уважением, коллектив F1Pro"+"
                |<br><b>73734634</b>";
                ОтборРегистра        = ПолучитьОтборДляАдресаОтправкиПисем(Контрагент);
                Ресурсы = РегистрыСведений.КонтактнаяИнформация.Получить(ОтборРегистра);
                ЭлАдрес = "hfnhf@vnsj.ru";
                //Если НЕ ЗначениеЗаполнено(ЭлАдрес) Тогда
               //     Предупреждение("У контрагента не обнаружен электронный адрес для обмена документами! Выгрузка невозможна!");
               //     Возврат;
                //КонецЕсли;
                строкатаблицы.Уведомлен = глПослать(TrimAll(Контрагент.Наименование)+": "+TrimAll(строкатаблицы.Работа.Наименование),СК,ЭлАдрес);
                //Если строкатаблицы.Уведомлен Тогда
               //      строкатаблицы.Уведомить = Ложь;
                //КонецЕсли;

        КонецЕсли;
    КонецЦикла;