Имя: Пароль:
1C
1С v8
Произошла ошибка при работе с POP3. Код ошибки: 5
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 профиля.

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