0
Кремень
22.01.16
✎
09:04
|
Утро доброе, есть функция отправки почты(ИнтернетПочта) на адреса Вася@сервер.ру отправляется, а на группу не отправляет, и никаких ошибок не выдает, и если указать в адресах один адрес и группу, то письмо придет на адрес и в списке адресов будет указана группа рассылки, но этой группе ничего не отправляется. Подскажите почему так?
Функция ОтправитьПисьмоПочтой(АдресаЭлПочты, Тема, СодержаниеПисьма, ПолноеИмяФайла = "", Важность = "") Экспорт
Если АдресаЭлПочты.Количество() = 0 Тогда
Возврат Ложь;
КонецЕсли;
Письмо = Новый ИнтернетПочтовоеСообщение;
Для Каждого Адрес Из АдресаЭлПочты Цикл
Письмо.Получатели.Добавить(Адрес.Адрес);
КонецЦикла;
Если ЗначениеЗаполнено(Важность) Тогда
Письмо.Важность = Важность;
Иначе
Письмо.Важность = ВажностьИнтернетПочтовогоСообщения.Обычная;
КонецЕсли;
Письмо.Тема = Тема;
Текст = Письмо.Тексты.Добавить(СодержаниеПисьма);
Текст.ТипТекста = ТипТекстаПочтовогоСообщения.ПростойТекст;
Если ПолноеИмяФайла <> "" Тогда
ИмяКаталога = "";
ИмяФайла = "";
ИмяФайлаБезРасширения = "";
РаботаСФайлами.ПолучитьКаталогИИмяФайла(ПолноеИмяФайла, ИмяКаталога, ИмяФайла);
ПолноеИмяФайла = РаботаСФайлами.ПолучитьИмяФайла(ИмяКаталога, РаботаСФайлами.УдалитьЗапрещенныеСимволыИмени(ИмяФайла));
Вложение = Письмо.Вложения.Добавить(ПолноеИмяФайла);
КонецЕсли;
Почта = Новый ИнтернетПочта;
Попытка
Почта.Подключиться(СформироватьИнтернетПрофиль());
Исключение
Сообщить(ОписаниеОшибки());
Возврат Ложь;
КонецПопытки;
Почта.Послать(Письмо);
Почта.Отключиться();
Возврат Истина;
КонецФункции
Функция СформироватьИнтернетПрофиль() Экспорт
ПрофильУведомления = Новый ИнтернетПочтовыйПрофиль;
ПрофильУведомления.АдресСервераSMTP = СервераSMTP;
ПрофильУведомления.ПортSMTP = ПортSMTP;
ПрофильУведомления.Пользователь = Пользователь;
ПрофильУведомления.Пароль = Пароль;
ПрофильУведомления.ПользовательSMTP = Пользователь;
ПрофильУведомления.ПарольSMTP = Пароль;
Возврат ПрофильУведомления;
КонецФункции
|
|
2
Heckfy
22.01.16
✎
09:24
|
Телепатирую:
У учетной записи, от имени которой происходит отправка, стоит ограничение на количество абонентов в одной рассылки.
Например 5, а в группу входит over 5 абонентов.
|
|