Имя: Пароль:
1C
1С v8
Почта на серверах office365.com
0 MaxPansky
 
26.07.15
15:06
Платформа : 1С:Предприятие 8.3 (8.3.6.2076)

Код :
Профиль = Новый ИнтернетПочтовыйПрофиль;
    Профиль.АдресСервераPOP3 = "outlook.office365.com";
    Профиль.АдресСервераSMTP = "smtp.office365.com";
    Профиль.ПортPOP3 = "995";
    Профиль.ПортSMTP = "587";
    Профиль.Пользователь = АдресОтправки;
    Профиль.ПользовательSMTP = АдресОтправки;
    Профиль.ПарольSMTP = Пароль;
    Профиль.Пароль = Пароль;
    
    Профиль.ИспользоватьSSLPOP3 = Истина ;
    Профиль.ИспользоватьSSLSMTP = Истина ;
    Профиль.АутентификацияSMTP = СпособSMTPАутентификации.ПоУмолчанию ;
    Профиль.АутентификацияPOP3 = СпособPOP3Аутентификации.Обычная;
    Профиль.ТолькоЗащищеннаяАутентификацияSMTP = Истина;

Пишет вот такую ошибку :
TLS/SSL failure for smtp.office365.com: Invalid token, probably not an SSL server

Тут вот какой вопрос : Microsoft пишет , что шифрование у них для SMTP протокола TLS , и меня терзают смутные сомнения , в платформе точно реализован TLS  шифрование ? Потому , что точно такой же код на gmail.com ( только порт 465 и шифрование точно SSL ) отрабатывает на ура.
1 Demasiado
 
26.07.15
17:41
Видел конфигурацию, которая работает с этими серверами. Платформа 8.3.6.20хх
2 MaxPansky
 
26.07.15
18:36
А код видели ? Я нашел , что 1с божится , что сделала Start TLS для соединения с серверами , но к сожалению не могу понять где поправить , чтобы это заработало. Ведь по большому счеты у ИнтернетПочтовыйПрофиль свойств в этом направлении с гулькин нос и мне кажется я их всех перепробовал. Может люди сумели добиться у Microsoft в настройках самого Exchang переключиться на SSL шифрование ??
3 Demasiado
 
26.07.15
19:51
&НаСервере
// По переданной ссылке на учетную запись формирует профиль почтового соединения
//
// Параметры
// УчетнаяЗапись - СправочникСсылка.УчетнаяЗаписьЭлектроннойПочты -
//                 параметры профиля в виде соответствия
//
// Возвращаемое значение
// Почтовый профиль (тип ИнтернетПочтовыйПрофиль)
//
Функция СформироватьИнтернетПрофильДляЭлектроннойПочты(знач УчетнаяЗапись)
    
    Профиль = Новый ИнтернетПочтовыйПрофиль;
    
    Профиль.Пользователь = УчетнаяЗапись.Пользователь;
    
    Профиль.ВремяОжидания = УчетнаяЗапись.ВремяОжидания;
    
    Профиль.Пароль = УчетнаяЗапись.Пароль;
    
    Профиль.АдресСервераSMTP = УчетнаяЗапись.SMTPСервер;
    Профиль.ПортSMTP         = УчетнаяЗапись.ПортSMTP;
    
    Если      УчетнаяЗапись.SMTPАутентификация = Перечисления.itilprofВариантыSMTPАутентификации.АналогичноPOP3 Тогда
        Профиль.АутентификацияSMTP = СпособSMTPАутентификации.ПоУмолчанию;
        Профиль.ПользовательSMTP   = УчетнаяЗапись.Пользователь;
        Профиль.ПарольSMTP         = УчетнаяЗапись.Пароль;
    ИначеЕсли УчетнаяЗапись.SMTPАутентификация = Перечисления.itilprofВариантыSMTPАутентификации.ЗадаетсяПараметрами Тогда
        
        Если      УчетнаяЗапись.СпособSMTPАутентификации = Перечисления.itilprofСпособыSMTPАутентификации.CramMD5 Тогда
            Профиль.АутентификацияSMTP = СпособSMTPАутентификации.CramMD5;
        ИначеЕсли УчетнаяЗапись.СпособSMTPАутентификации = Перечисления.itilprofСпособыSMTPАутентификации.Login Тогда
            Профиль.АутентификацияSMTP = СпособSMTPАутентификации.Login;
        ИначеЕсли УчетнаяЗапись.СпособSMTPАутентификации = Перечисления.itilprofСпособыSMTPАутентификации.Plain Тогда
            Профиль.АутентификацияSMTP = СпособSMTPАутентификации.Plain;
        ИначеЕсли УчетнаяЗапись.СпособSMTPАутентификации = Перечисления.itilprofСпособыSMTPАутентификации.БезАутентификации Тогда
            Профиль.АутентификацияSMTP = СпособSMTPАутентификации.БезАутентификации;
        Иначе
            Профиль.АутентификацияSMTP = СпособSMTPАутентификации.ПоУмолчанию;
        КонецЕсли;
        
        Профиль.ПользовательSMTP = УчетнаяЗапись.ПользовательSMTP;
        Профиль.ПарольSMTP       = УчетнаяЗапись.ПарольSMTP;
        
    ИначеЕсли УчетнаяЗапись.SMTPАутентификация = Перечисления.itilprofВариантыSMTPАутентификации.POP3ПередSMTP Тогда
        Профиль.АутентификацияSMTP = СпособSMTPАутентификации.БезАутентификации;
        Профиль.POP3ПередSMTP = Истина;
    Иначе
        Профиль.АутентификацияSMTP = СпособSMTPАутентификации.БезАутентификации;
    КонецЕсли;
    
    Профиль.АдресСервераPOP3 = УчетнаяЗапись.POP3Сервер;
    Профиль.ПортPOP3         = УчетнаяЗапись.ПортPOP3;
    
    Если      УчетнаяЗапись.СпособPOP3Аутентификации = Перечисления.itilprofСпособыPOP3Аутентификации.APOP Тогда
        Профиль.АутентификацияPOP3 = СпособPOP3Аутентификации.APOP;
    ИначеЕсли УчетнаяЗапись.СпособPOP3Аутентификации = Перечисления.itilprofСпособыPOP3Аутентификации.CramMD5 Тогда
        Профиль.АутентификацияPOP3 = СпособPOP3Аутентификации.CramMD5;
    Иначе
        Профиль.АутентификацияPOP3 = СпособPOP3Аутентификации.Обычная;
    КонецЕсли;
    
    Профиль.АдресСервераIMAP = УчетнаяЗапись.IMAPСервер;
    Если УчетнаяЗапись.ДобавитьКАдресуСервераIMAP тогда
        Профиль.АдресСервераIMAP = Профиль.АдресСервераIMAP+"/novalidate-cert";
    КонецЕсли;

    Профиль.ИспользоватьSSLIMAP = УчетнаяЗапись.ИспользоватьSSLIMAP;
    Профиль.ПарольIMAP            = УчетнаяЗапись.ПарольIMAP;
    Профиль.ПользовательIMAP    = УчетнаяЗапись.ПользовательIMAP;
    Профиль.ПортIMAP            = УчетнаяЗапись.ПортIMAP;

    // Rarus-spb byse {
    //Попытка
    //    Профиль.ИспользоватьSSLPOP3 = УчетнаяЗапись.ИспользоватьSSLIMAP;
    //    Профиль.c = УчетнаяЗапись.ИспользоватьSSLIMAP;
    //Исключение КонецПопытки;
    ///SunByte --
    //Профиль.ИспользоватьSSLPOP3 = УчетнаяЗапись.рсИспользоватьSSLPOP3;
    //Профиль.ИспользоватьSSLSMTP = УчетнаяЗапись.рсИспользоватьSSLSMTP;
    
    // Rarus-spb byse }
    
    ///SunByte ++
    Профиль.ИспользоватьSSLPOP3 = УчетнаяЗапись.ИспользоватьSSLPOP3;
    Профиль.ИспользоватьSSLSMTP = УчетнаяЗапись.ИспользоватьSSLSMTP;
        
    Возврат Профиль;

КонецФункции
4 Demasiado
 
26.07.15
19:55
5 Demasiado
 
26.07.15
19:56
+(4) настройка SMTP сервера, рабочая
6 MaxPansky
 
27.07.15
10:52
(4) У вас в настройках не используется SSL ( ну во всяком случае по картинке ). И аутентификация по паролю. У меня же жесткий TLS . Подписка "Office 365 для малого бизнеса".
Привлекла внимание данная строчка

Профиль.АдресСервераIMAP+"/novalidate-cert"

Вы не подскажете , что это за сертификат такой и где вы его брали.
7 Demasiado
 
27.07.15
22:55
(6) совершенно верно, ssl не используется. Это типовой код недопрограммистов из Раруса, который к тому же пришлось исправлять. Откуда они берут сертификат - я не знаю, хотя я думаю что это команда "не проверять сертификат" или что то в этом духе