Небольшая доработка УТ 10.3 для отправки почты с помощью Outlook.
В УТ встроена удобная функция отправки табличных форм документов. Но работает она только со встроенным почтовым клиентом. Но ни всем он подходит. Небольшая доработка общего модуля "УправлениеОтчетами" исправляет эту проблему.
Необходимо исправить процедуру "ОтправитьДокументПоЭлектроннойПочте". Добавленный код выделен комментариями.
Процедура ОтправитьДокументПоЭлектроннойПочте(Документ, ИмяФайлаВложения = "") Экспорт
Если НЕ Константы.ИспользованиеВстроенногоПочтовогоКлиента.Получить() Тогда
//ОбщегоНазначения.СообщитьОбОшибке("Отправлять документы по электронной почте можно только из встроенного почтового клиента.
// |В настоящее время в настройках параметров учета установлено использование основного почтового клиента операционной системы.");
// Предупреждение("Операция не выполнена");
// Возврат;
//КонецЕсли;
//*************Начало изменений
Outlook=Новый COMОбъект("Outlook.Application");
{Код процедуры в файле}
Related Posts
Получение логина и пароля техподдержки 1С из базы
Класс для вывода отчета в Excel
Счет-фактура для УПП
Библиотека классов для создания внешней компоненты 1С на C#- Акт об оказании услуг (со скидками) — внешняя печатная форма для Управление торговлей 11.1.10.86
Прайс-лист с артикулом в отдельной колонке
Если отправлять через Аутлук вечно спрашивает подтверждение…
В данном случае создается только письмо и прицепляется вложение. Уже в Outlook задаем получателя и отправляем.
» Документ.Записать(ФайлаВложения,ТипФайла);
Письмо.Attachments.Add(ФайлаВложения);»
А откуда взялась переменная «Документ»?
Процедура ОтправитьДокументПоЭлектроннойПочте(Документ, <<==
Всё работает, проверено. спасиб
Как раз сейчас занимаюсь реализацие подобной задачки. Чтоб Outlook не выдавал предупреждений — есть внешняя компонента, которая обходит защиту Outlooka. А как посылать письма через другие почтовые клиенты? The Bat! например. странно, что в настройка параметра учёта. на вкладке электронная почта. можно указать использование стронних почтовых клиентов. Но из описанного выше модуля явно видно, что 1с явно отрубает эту возможность. по идее, должно работать так: отследить через реестр почтовый клиент по умолчанию, и отправить письмо через него. Вот только отследить не получается(Outlook всегда прописан по умолчанию), и как отправить через другие клиенты — пока не понятно. The Bat! неплохо отрабатывает «mailto:», а в Outlook передать его не получается. Может кто что подскажет по этому поводу?
«Бат» отлично понимает командную стоку, вот пример отправки письма:
«C:Program FilesThe Bat! hebat.exe» /MAILTO=sklad@mail.ru;S=OBMEN_MAYK;NOLOGO;MINIMIZE;SEND;ATTACH=\SERVER1C_BasesMAYKCPD30.zip
Ребят, для себя настраиваю 1с.
подскажите по пунктам как это организовать?
1С:Предприятие 8.2 (8.2.17.157); Управление торговлей версия 10.3
Заранее благодарю.