0
Oblako486
16.03.21
✎
14:57
|
Если зайти в БП в настройки учетной записи, то тестовое соединение выполняется успешно.
В коде пишу так.
Профиль = Новый ИнтернетПочтовыйПрофиль;
Профиль.АдресСервераSMTP =УчетнаяЗаписьЭлектроннойПочты.СерверИсходящейПочты;
// Профиль.АдресСервераIMAP = УчетнаяЗаписьЭлектроннойПочты.СерверВходящейПочты;
Профиль.АдресСервераPOP3 = УчетнаяЗаписьЭлектроннойПочты.СерверВходящейПочты;
Профиль.ПортPOP3 = УчетнаяЗаписьЭлектроннойПочты.ПортСервераВходящейПочты;
// Профиль.ПортIMAP = УчетнаяЗаписьЭлектроннойПочты.ПортСервераВходящейПочты;
Профиль.ПортSMTP = УчетнаяЗаписьЭлектроннойПочты.ПортСервераИсходящейПочты;
Профиль.Пользователь = УчетнаяЗаписьЭлектроннойПочты.Пользователь;
Профиль.Пароль = ОбщегоНазначения.ПрочитатьДанныеИзБезопасногоХранилища(УчетнаяЗаписьЭлектроннойПочты, "Пароль");
Профиль.ПользовательSMTP = УчетнаяЗаписьЭлектроннойПочты.ПользовательSMTP;
Профиль.ПарольSMTP = ОбщегоНазначения.ПрочитатьДанныеИзБезопасногоХранилища(УчетнаяЗаписьЭлектроннойПочты, "ПарольSMTP");
Профиль.АутентификацияSMTP = СпособSMTPАутентификации.Login;
Профиль.АутентификацияPOP3 = СпособPOP3Аутентификации.Обычная;
Профиль.ИспользоватьSSLPOP3 = УчетнаяЗаписьЭлектроннойПочты.ИспользоватьЗащищенноеСоединениеДляВходящейПочты;
// Профиль.ИспользоватьSSLIMAP = УчетнаяЗаписьЭлектроннойПочты.ИспользоватьЗащищенноеСоединениеДляВходящейПочты;
Профиль.ИспользоватьSSLSMTP = УчетнаяЗаписьЭлектроннойПочты.ИспользоватьЗащищенноеСоединениеДляИсходящейПочты;
|
|
1
Oblako486
16.03.21
✎
15:09
|
хм. в типовом коде идёт разделение на 2 профиля.
Если НастройкиУчетнойЗаписи.ИспользоватьДляОтправки Тогда
ПрофильИсходящейПочты = РаботаСПочтовымиСообщениямиСлужебный.ИнтернетПочтовыйПрофиль(УчетнаяЗапись, Ложь);
КонецЕсли;
Если НастройкиУчетнойЗаписи.ИспользоватьДляПолучения Тогда
ПрофильВходящейПочты = РаботаСПочтовымиСообщениямиСлужебный.ИнтернетПочтовыйПрофиль(УчетнаяЗапись, Истина);
КонецЕсли;
|
|