Имя: Пароль:
1C
 
8.1 Почтовый клиент
0 Marel9
 
04.08.17
08:03
При вызове метода Почта.Подключиться(Профиль); выдает ошибку :
ОБМЕН: Ошибка при получении писем! Обмен не выполнен! {Обработка.ПочтовыйКлиент(63)}: Ошибка при вызове метода контекста (Выбрать): Время ожидания операции чтения истекло.
Хотя По отладчику смотрю, профиль заполнен. все параметры есть.Подскажите, что может быть не так?


Процедура ПолучитьПочту() Экспорт    
    ЛогФайл = СоздатьЛогФайл();    
    СтрокаЛога = "Начато чтение с почты "+Формат(ТекущаяДата(), "ДЛФ=DDT");
    ВЛог(СтрокаЛога, ЛогФайл);

    Для каждого Ящик Из СписокЯщиков Цикл
        
        ОбработкаПрерыванияПользователя();
        
        
        Если ПустаяСтрока(Ящик.Ящик) Тогда
            Продолжить;
        КонецЕсли;
        
        Почта = новый ИнтернетПочта;
        Профиль = Новый ИнтернетПочтовыйПрофиль;
        Профиль.АдресСервераPOP3 = Ящик.ПочтовыйЯщик.POP3Сервер;
        Профиль.ПортPOP3 = Ящик.ПочтовыйЯщик.ПортPOP3;
        Профиль.Пароль = Ящик.Пароль;
        //Профиль.ПарольSMTP = Ящик.Пароль;
        Профиль.Пользователь = Ящик.Ящик;
        //Профиль.ПользовательSMTP = Ящик.Ящик;
        СтрокаЛога = "Подключение к интернету и чтение почтовых сообщений из "+Ящик.Ящик+" от "+Формат(ТекущаяДата(), "ДЛФ=D");
        СообщитьИЗаписатьВЖурнал(СтрокаЛога, "Автообмен");
        //ЛогФайл.ЗаписатьСтроку(СтрокаЛога);
        ВЛог(СтрокаЛога, ЛогФайл);
        ПодключилисьУдачно = Ложь;
        ПопытокПодключения = 0;
        Попытка
            Почта.Подключиться(Профиль);
        Исключение
            СтрокаЛога = "ОБМЕН: Ошибка при подключении к почтовому профилю! Обмен не выполнен! "+ОписаниеОшибки();
            ВЛог(СтрокаЛога, ЛогФайл);
            //Возврат "Не удалось прочесть почту";
        КонецПопытки;
        Попытка
            ВсеСообщения=Почта.Выбрать(Ложь);
        Исключение
            СтрокаЛога = "ОБМЕН: Ошибка при получении писем! Обмен не выполнен! "+ОписаниеОшибки();
            ВЛог(СтрокаЛога, ЛогФайл);
            Продолжить;
            //Возврат "Не удалось прочесть почту";
        КонецПопытки;
        МассивСообщений=Новый Массив;
        СтрокаЛога = "Загрузка, сортировка сообщений";
        ВЛог(СтрокаЛога, ЛогФайл);