Отправка почты из 1С 8.3 (настройка учетной записи электронной почты)

Как настроить отправку почты из 1С? Как отправлять письма из 1С? Как настроить учетную запись электронной почты 1С? Как отправлять счета на оплату из 1С?

Если вам нужно настроить электронную почту в 1С 8.3, то вы можете воспользоваться инструкцией, представленной на данной странице.

Отправка почты из 1С 8.3 может понадобиться, например, когда нужно отправить счет на оплату клиенту. Для этого нужно настроить учетную запись почты в 1С. Далее, будет расказанно, как это сделать.

Теперь по пунктам распишем, что необходимо предпринять, чтобы отправлять письма из 1С 8.3. Покажем это на примере программы 1С:Бухгалтерия предприятия 3.0, а использоваться будет почта с почтового сервера mail.ru, потому что отправку писем из этого почтового сервиса можно легко настроить в 1С. Имейте в виду, что для настройки отправки писем с других почтовых сервисов (например, gmail.com) могут потребоваться дополнительные действия, которые не описаны в данной статье. Если вам нужно настроить в 1С почту gmail.ru, то перейдите к этой инструкции.

1. Открываем программу 1С. Заходим в Администрирование (1) — Органайзер (2).

2. В разделе Почта выбираем Настройка системной учетной записи.

3. Откроется окно настроек как на картинке ниже. — Вводим адрес электронной почты, который будет использоваться для отправки писем (1); — Вводим пароль от учетной записи этой электронной почты (2); — Выставляем галочку Для отправки почты. Также можно выставить галочку Для получения почты (3); — Выбираем для кого создавать учетную запись: либо Для всех пользователей, либо Только для меня — для текущего пользователя (4); — Указываем имя отправителя, которое будет видно получателям. Это может быть название вашей организации (5); — Ставим переключатель на Настроить параметры подключения вручную, чтобы не пропустить важные моменты процесса настройки (6); — Теперь нажимаем Далее (7).

4. Появится окно настройки отправки писем из 1С. — Проверяем, что правильно заполнено имя пользователя (1); — Вводим пароль от учетной записи почты (2); — В поле Сервер укажем следующий адрес: smtp.mail.ru (3); — В поле Порт укажем следующее число: 465 (4); — Выставим галочку Использовать безопасное соединение (SSL) (5); — Нажимаем Далее (6).

5. Появится похожее на предыдущее окно. Только здесь настраивается получение писем. — Проверим имя пользователя (1); — Проверим пароль (2); — В поле Сервер укажем следующий адрес: pop.mail.ru (3); — В поле выбора Протокол укажем протокол под названием POP (4); — В поле Порт укажем следующее число: 995 (5); — Выставим галочку Использовать безопасное соединение (SSL) (6); — Опять нажимаем Далее (7).

6. В следующем окне можно ничего не менять. Просто жмём Далее.

7. После этого некоторое время будет идти проверка настроек учетной записи. Дождитесь ее окончания.

8. После окончания проверки появится надпись Учетная запись успешно настроена. Нажимаем кнопку Перейти к учетной записи.

9. Удостоверимся, что почта настроена правильно. — Открываем меню Еще (1); — Нажимаем на пункт меню Проверить настройки (2);

10. Если все настроено верно, появится окно с надписью «Проверка параметров учетной записи завершилась успешно». Нажимаем ОК (1). Нажимаем Записать и закрыть (2).

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

11. Перейдем в Главное (1) — Персональные настройки (2).

12. Нажмем на ссылку Настройки электронной почты.

13. Откроется окно настроек. — В поле выбора «Основная четная запись…» выберем учетную запись, которую мы только что создали, в данном случае это «Системная учетная запись» (1); — Вы можете поставить галочку Отправлять копии исходящих писем по адресу и указать на какие адреса будут приходить копии, отправленных Вами писем. — В текстовом поле, вы можете задать, как будет выглядеть подпись к Вашим письмам (2); — После редактирования, нажимайте ОК (3).

14. Нажмаем «Записать и закрыть» в окне персональных настроек.

Итак, настройка почты завершена! Давайте попробуем отправить кому-нибудь счет на оплату…

15. В документе выбираем кнопку-команду с изображением конверта.

16. В списке печатных форм отметим галочками формы, которые мы хотим отправить контрагенту (1). Для выбора в каком формате отправлять печатную форму, вы можете нажать на ссылку Формат вложений (2);

17. Отмечаем галочками нужный формат (1). Если нужно, выставляем флажок Упаковать в архив (.zip) (2). Нажимаем Выбрать.

18. Вернувшись в окно выбора печатных форм, тоже нажимаем Выбрать.

19. Откроется окно отправки сообщения. — В поле выбора Кому выбирайте контактное лицо, которому хотите отправить письмо (1); — В поле Тема указана тема письма. Можно ее отредактировать, как вам нужно. (2); — Если это необходимо, отредактируйте текст письма (3); — Можете прикрепить к нему дополнительные файлы (4); — Наконец, можно нажимать кнопку Отправить (5);

20. Письмо отправлено! Контрагент его получил!

Пример процедуры

&НаСервереПроцедура ОтправитьНаСервере() Email =Новый ИнтернетПочта;             УчетнаяЗапись =Новый ИнтернетПочтовыйПрофиль; УчетнаяЗапись.ВремяОжидания =120;;             УчетнаяЗапись.АдресСервераSMTP ="smtp.mail.ru";       УчетнаяЗапись.АдресСервераPOP3 ="pop.mail.ru"; УчетнаяЗапись.Пользователь ="infofront@bk.ru";       УчетнаяЗапись.ПользовательSMTP ="infofront@bk.ru"; УчетнаяЗапись.Пароль ="ВашПароль";       УчетнаяЗапись.ПарольSMTP ="ВашПароль";       УчетнаяЗапись.ПортSMTP =465; УчетнаяЗапись.ИспользоватьSSLSMTP =Истина; УчетнаяЗапись.ПортPOP3 =995; УчетнаяЗапись.ИспользоватьSSLPOP3 =Истина; УчетнаяЗапись.АутентификацияSMTP = СпособSMTPАутентификации.Login;        Письмо =Новый ИнтернетПочтовоеСообщение;  Письмо.Отправитель.Адрес ="infofront@bk.ru"; Письмо.Отправитель.ОтображаемоеИмя ="Робот";       Письмо.Вложения.Добавить("Адрес вложения, текст","наименование файла вложения"); Письмо.Тема ="Отправка письма, тест";            Получатель = Письмо.Получатели.Добавить("skorpofeoga@gmail.com");Попытка             Email.Подключиться(УчетнаяЗапись);Исключение             Сообщить("Ошибка авторизации, введите правильный логин и пароль"+ ОписаниеОшибки(), СтатусСообщения.Важное);КонецПопытки;             Текст = Письмо.Тексты.Добавить();       Текст.ТипТекста  = ТипТекстаПочтовогоСообщения.ПростойТекст; Текст.Текст ="Текст письма, тест";Попытка             Email.Послать(Письмо);             ЭтаФорма.Доступность =Ложь;         Сообщить("Успех");Исключение             Сообщить("Во время отправки письма возникла ошибка"+ ОписаниеОшибки(), СтатусСообщения.Важное)КонецПопытки;  Email.Отключиться();КонецПроцедуры

Разберем несложный код для отправки email в 1с.

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

Первый способ

В 1с:Предприятия 8.х можно пользоваться типовым функционалом платформы с помощью «Почта = Новый ИнтернетПочта»:

//Создаем профиль либо считываем из справочника Профиль = Новый ИнтернетПочтовыйПрофиль; Профиль.АдресСервераSMTP = Отправитель.АдресСервераSMTP; //"smtp.mail.ru"; Профиль.АдресСервераPOP3 = Отправитель.АдресСервераPOP3; //"pop.mail.ru"; Профиль.ПортPOP3 = Отправитель.ПортPOP3; //110; Профиль.ПортSMTP = Отправитель.ПортSMTP; //587; Профиль.Пользователь = Отправитель.Email; //"test@mail.ru"; Профиль.Пароль = Отправитель.Пароль; //"123456789"; Профиль.ПользовательSMTP = Отправитель.Email; //"test@mail.ru"; Профиль.ПарольSMTP = Отправитель.Пароль; //"123456789"; Профиль.АутентификацияSMTP = СпособSMTPАутентификации.ПоУмолчанию;  //Создаем письмо Почта = Новый ИнтернетПочта; Письмо = Новый ИнтернетПочтовоеСообщение; Текст = Письмо.Тексты.Добавить("Это текст письма."); Текст.ТипТекста = ТипТекстаПочтовогоСообщения.ПростойТекст; Письмо.Тема = "Это тема письма"; Письмо.Отправитель = "Отправитель"; Письмо.ИмяОтправителя = "Имя отправителя"; Письмо.Получатели.Добавить("poluchatel@mail.ru"); Письмо.Вложения.Добавить(Файл); //добавляем вложение если нужно, например "C:Приложение.doc" //Вложений можно добавлять сколько требуется.  //Отправляем письмо Попытка    Почта.Подключиться(Профиль);    Почта.Послать(Письмо); Исключение    Сообщить(ОписаниеОшибки()); КонецПопытки;  //Закрываем письмо Почта.Отключиться(); //Закрываем файл вложения Письмо.Вложения.Очистить();

Второй способ

Это отправка с помощью Microsoft CDO. Его можно использовать как в 8.х так и в 7.7. Так же поддерживает вложения, копии писем на другие емейлы.

ИспользоватьSSL = Истина; iConf = Новый COMОбъект("CDO.Configuration"); iMsg = Новый COMОбъект("CDO.Message"); iMsg.Configuration = iConf; iMsg.from = Отправитель.Наименование; iMsg.to = EMAILПолучателя; iMsg.sender = Отправитель.Наименование; iMsg.Subject = Тема; iMsg.TextBody = ТекстПисьма; iMsg.BodyPart.Charset = "Windows-1251";  iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing").Value = 2; iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver").Value = Отправитель.АдресСервераSMTP; iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport").Value = Отправитель.ПортSMTP; iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate").Value = 1; // 0 - Do not authenticate; 1 - basic (clear-text) authentication; 2 - NTLM iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername").Value = Отправитель.Email; iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword").Value = Отправитель.Пароль;  Если ИспользоватьSSL = Истина Тогда    iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl").Value = 1; КонецЕсли;  iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout").Value = 60; iMsg.AddAttachment(Файл); //вложение письма  Попытка    iConf.Fields.Update(); Исключение    Сообщить(ОписаниеОшибки()); Возврат; КонецПопытки;  Попытка    iMsg.Send(); Исключение    Сообщить(ОписаниеОшибки()); Возврат; КонецПопытки;

В 1с 7.7 все аналогично кроме создания COM объекта:

iConf = CreateObject("CDO.Configuration"); iMsg = CreateObject("CDO.Message"); 
Ссылка на основную публикацию