Сервер smtp.yandex.ru
Проблема только на Win XP, началась буквально 2 недели назад.
"CDO.Message.1: Транспорту не удалось подключиться к серверу".

настройки такие
loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.yandex.ru"
loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465
loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "mymail@mydomain.ru"
loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "mypassword"
loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60

Пробовал: включать пароли приложений, устанавливать цепочку сертификатов, устанавливал корневой сертификат.
Win7 и выше пока работают.

Параллельно отправил запрос админам на обновление до win7, но у них какие-то сложности с оборудованием.
---
Настроил через stunnel, на компе который не выключается.
---
Добрый день!

Укажите from, Вы пытаетесь авторизоваться не указав логин.
---
Рабочий пример:

send_email(Text, CC="")
{
   ComObjError(false)
   pmsg := ComObjCreate("CDO.Message")
   pmsg.From := "from@gmail.com"
   pmsg.To := "to@sms.lmt.lv"
   pmsg.CC := CC
   pmsg.Subject := "subject"
   pmsg.TextBody := Text
   fields := Object()
   fields.smtpserver := "smtp.gmail.com" ; specify your SMTP server
   fields.smtpserverport := 465
   fields.smtpusessl := True ; False
   fields.sendusing := 2 ; cdoSendUsingPort
   fields.smtpauthenticate := 1 ; cdoBasic
   fields.sendusername := "from@gmail.com"
   fields.sendpassword := "password"
   fields.smtpconnectiontimeout := 60
   schema := "http://schemas.microsoft.com/cdo/configuration/"
   pfld := pmsg.Configuration.Fields
   For field,value in fields
      pfld.Item(schema . field) := value
   pfld.Update()
   pmsg.Send()
   return
}
---
нет, это все есть. я все тело не приложил

ВесьКод
```1c
    Set loConfig = CreateObject("CDO.Configuration")
    Set loCdoMessage = CreateObject("CDO.Message")
    loCdoMessage.BodyPart.Charset = "windows-1251"
    loCdoMessage.Configuration = loConfig
    loCdoMessage.From = "noreply@mydomain"
    loCdoMessage.To = "toAddr@mydomain.ru"
    loCdoMessage.Subject = "Title"
    loCdoMessage.textbody = "Body";
    loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
    loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.yandex.ru"
    loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465
    loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
    loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "mymail@mydomain.ru"
    loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "mypassword"
    loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
    loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
    loConfig.Fields.Update
    loCdoMessage.Send
```

Код работал до мая 100%, у меня закралось мнение что-то с сертификатом на клиентском компьютере. Может быть можно включить отладку на CDO
---
а при чем здесь сертификат на клиентском ПК?
---
Имел ввиду корневой сертификат. Потому что на win7 все по прежнему работает.
---
Настроил через stunnel, на компе который не выключается.