Лиза
03.12.2015, 11:41
Добрый день всем!
Возникла сложность с подключением к почтовому серверу gmail.
в 1с 8.2 Комплексная автоматизация необходимо программно подключиться к почтовому серверу и отправить письмо.
Компания.ru - это домен на gmail.com
Имею код:
Письмо = Новый ИнтернетПочтовоеСообщение ;
Письмо.ИмяОтправителя = "Компания";
письмо.Отправитель = "заказ@Компания.ru";
Получатель = Письмо.Получатели.Добавить ();
Получатель.Адрес = "конкретный@mail.ru";
Письмо.Тема = "Заказ №"+Строка(Номер);
Текст = Строка(Контрагент)+", добрый день!";
Письмо.Тексты.Добавить(Тек� �т);
ПрофильОтправки = Новый ИнтернетПочтовыйПрофиль;
ПрофильОтправки.АдресСерв� �раSMTP = "smtp.gmail.com";//"ip";
ПрофильОтправки.Аутентифи� �ацияSMTP = СпособSMTPАутентификации.Login ;
ПрофильОтправки.Пользоват� �льSMTP = "заказ@Компания.ru";
ПрофильОтправки.ПарольSMTP = "Пароль";
ПрофильОтправки.ПортSMTP = "25";
ПрофильОтправки.Пользоват� �ль = "заказ";
ПрофильОтправки.Пароль = "Пароль";
Почта = Новый ИнтернетПочта;
Попытка
Почта.Подключиться(Профиль Отправки);
Исключение
Сообщить("Электронное сообщение не отправлено: "+ОписаниеОшибки());
Возврат;
КонецПопытки;
Попытка
Почта.Послать(Письмо);
Исключение
Сообщить("Электронное сообщение не отправлено: "+ОписаниеОшибки());
Возврат;
КонецПопытки;
Почта.Отключиться();
Пробовала АдресСервераSMTP задать ip-шником все равно не подключается и порт меняла. Может есть какие-то тонкости и нюансыИ Или надо делать по-другому... Прошу помощи!
Возникла сложность с подключением к почтовому серверу gmail.
в 1с 8.2 Комплексная автоматизация необходимо программно подключиться к почтовому серверу и отправить письмо.
Компания.ru - это домен на gmail.com
Имею код:
Письмо = Новый ИнтернетПочтовоеСообщение ;
Письмо.ИмяОтправителя = "Компания";
письмо.Отправитель = "заказ@Компания.ru";
Получатель = Письмо.Получатели.Добавить ();
Получатель.Адрес = "конкретный@mail.ru";
Письмо.Тема = "Заказ №"+Строка(Номер);
Текст = Строка(Контрагент)+", добрый день!";
Письмо.Тексты.Добавить(Тек� �т);
ПрофильОтправки = Новый ИнтернетПочтовыйПрофиль;
ПрофильОтправки.АдресСерв� �раSMTP = "smtp.gmail.com";//"ip";
ПрофильОтправки.Аутентифи� �ацияSMTP = СпособSMTPАутентификации.Login ;
ПрофильОтправки.Пользоват� �льSMTP = "заказ@Компания.ru";
ПрофильОтправки.ПарольSMTP = "Пароль";
ПрофильОтправки.ПортSMTP = "25";
ПрофильОтправки.Пользоват� �ль = "заказ";
ПрофильОтправки.Пароль = "Пароль";
Почта = Новый ИнтернетПочта;
Попытка
Почта.Подключиться(Профиль Отправки);
Исключение
Сообщить("Электронное сообщение не отправлено: "+ОписаниеОшибки());
Возврат;
КонецПопытки;
Попытка
Почта.Послать(Письмо);
Исключение
Сообщить("Электронное сообщение не отправлено: "+ОписаниеОшибки());
Возврат;
КонецПопытки;
Почта.Отключиться();
Пробовала АдресСервераSMTP задать ip-шником все равно не подключается и порт меняла. Может есть какие-то тонкости и нюансыИ Или надо делать по-другому... Прошу помощи!