Вход | Регистрация
 
1С:Предприятие :: 1С:Предприятие 8 общая

Произошла ошибка при работе с POP3. Код ошибки: 5

Произошла ошибка при работе с POP3. Код ошибки: 5
Я
   Oblako486
 
16.03.21 - 14:57
Если зайти в БП в настройки учетной записи, то тестовое соединение выполняется успешно.
В коде пишу так.
Профиль = Новый ИнтернетПочтовыйПрофиль;
        Профиль.АдресСервераSMTP =УчетнаяЗаписьЭлектроннойПочты.СерверИсходящейПочты;
      // Профиль.АдресСервераIMAP = УчетнаяЗаписьЭлектроннойПочты.СерверВходящейПочты;

        Профиль.АдресСервераPOP3 = УчетнаяЗаписьЭлектроннойПочты.СерверВходящейПочты;

        
        Профиль.ПортPOP3 = УчетнаяЗаписьЭлектроннойПочты.ПортСервераВходящейПочты;
      // Профиль.ПортIMAP = УчетнаяЗаписьЭлектроннойПочты.ПортСервераВходящейПочты;

        Профиль.ПортSMTP = УчетнаяЗаписьЭлектроннойПочты.ПортСервераИсходящейПочты;

        Профиль.Пользователь = УчетнаяЗаписьЭлектроннойПочты.Пользователь;

        Профиль.Пароль = ОбщегоНазначения.ПрочитатьДанныеИзБезопасногоХранилища(УчетнаяЗаписьЭлектроннойПочты, "Пароль");
        Профиль.ПользовательSMTP = УчетнаяЗаписьЭлектроннойПочты.ПользовательSMTP;

        Профиль.ПарольSMTP = ОбщегоНазначения.ПрочитатьДанныеИзБезопасногоХранилища(УчетнаяЗаписьЭлектроннойПочты, "ПарольSMTP");
        Профиль.АутентификацияSMTP = СпособSMTPАутентификации.Login;
    Профиль.АутентификацияPOP3 = СпособPOP3Аутентификации.Обычная;
        Профиль.ИспользоватьSSLPOP3 = УчетнаяЗаписьЭлектроннойПочты.ИспользоватьЗащищенноеСоединениеДляВходящейПочты;
      // Профиль.ИспользоватьSSLIMAP = УчетнаяЗаписьЭлектроннойПочты.ИспользоватьЗащищенноеСоединениеДляВходящейПочты;

        Профиль.ИспользоватьSSLSMTP = УчетнаяЗаписьЭлектроннойПочты.ИспользоватьЗащищенноеСоединениеДляИсходящейПочты;

   Oblako486
 
1 - 16.03.21 - 15:09
хм. в типовом коде идёт разделение на 2 профиля.
Если НастройкиУчетнойЗаписи.ИспользоватьДляОтправки Тогда
        ПрофильИсходящейПочты = РаботаСПочтовымиСообщениямиСлужебный.ИнтернетПочтовыйПрофиль(УчетнаяЗапись, Ложь);
    КонецЕсли;
    Если НастройкиУчетнойЗаписи.ИспользоватьДляПолучения Тогда
        ПрофильВходящейПочты = РаботаСПочтовымиСообщениямиСлужебный.ИнтернетПочтовыйПрофиль(УчетнаяЗапись, Истина);
    КонецЕсли;


Список тем форума
Рекламное место пустует  Рекламное место пустует
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.