powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / отправка почты через cdo
17 сообщений из 17, страница 1 из 1
отправка почты через cdo
    #39310950
Volodya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Добрый день!
имеется приложение на VB6.0, в котором работает стандартный код для отправки почты:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
  Const CDO_Cnf = "http://schemas.microsoft.com/cdo/configuration/"
Dim oCDOCnf As Object, oCDOMsg As Object
...
 Set oCDOCnf = CreateObject("CDO.Configuration")
    With oCDOCnf.Fields
        .Item(CDO_Cnf & "sendusing") = 2
        .Item(CDO_Cnf & "smtpauthenticate") = 1
        .Item(CDO_Cnf & "smtpserver") = "smtp.inbox.ru"
        .Item(CDO_Cnf & "smtpserverport") = 25
        .Item(CDO_Cnf & "smtpusessl") = True
        .Item(CDO_Cnf & "sendusername") = sUsername
        .Item(CDO_Cnf & "sendpassword") = sPass
        .Update
    End With

Set oCDOMsg = CreateObject("CDO.Message")
    With oCDOMsg
        Set .Configuration = oCDOCnf
        .From = sFrom
        .To = sTo
        .Subject = sSubject
        .Send
    End With



Код стандартный, параметры для mail.ru известные, все работало без проблем на протяжении последних пары лет.
со вторника 13 сентября ))) код падает с ошибкой Транспорту не удалось подключиться к почтовому серверу.
причем эта ошибка появляется как на боевом сервере (Win Server 2008 R2), так и на компе разработчика (Win XP), использующих для доступа в интернет разных провайдеров в разных городах.

антивирусов на компах нет
менять порт с 25 на 465 я пробовал
из командной строки telnet smtp.inbox.ru 25 и telnet smtp.inbox.ru 465 проходят успешно

посоветуйте, пожалуйста, что еще можно проверить для обнаружения причины ошибки.
...
Рейтинг: 0 / 0
отправка почты через cdo
    #39310978
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Volodya,

Судя по переменным - код, вероятно, был взят отсюда: Как отправить письмо из Excel?
там в комментариях есть такие строки:
Код: vbnet
1.
2.
3.
'если необходимо указать SSL
'.Item(CDO_Cnf & "smtpserverport") = 465 'для Яндекса и Gmail 465
'.Item(CDO_Cnf & "smtpusessl") = True


почти все почтовики примерно год-полтора назад сделали обязательным шифрование. Попробуйте добавить эти строки в свой код.
...
Рейтинг: 0 / 0
отправка почты через cdo
    #39311138
Volodya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
эта строка в коде есть:
Код: vbnet
1.
.Item(CDO_Cnf & "smtpusessl") = True



раньше работало по ssl по порту 25. сейчас порт 465 я также попробовал.

в том то и прелесть ситуации, что непонятно что идет не так (
как можно дополнительно проверить ?
...
Рейтинг: 0 / 0
отправка почты через cdo
    #39311185
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Volodya,
а ошибки какие-то есть? Не пробовали выводить Err.Number после отправки? Может дело реально в сервере.
...
Рейтинг: 0 / 0
отправка почты через cdo
    #39311207
Volodya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
код падает с ошибкой Транспорту не удалось подключиться к почтовому серверу.
номер ошибки -2147220973
...
Рейтинг: 0 / 0
отправка почты через cdo
    #39311240
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Volodya,

номер ошибки гласит, что интернет скорее всего недоступен. Ищите в настройках, что мешает отправить запросы в интернет программно. Может в настройках IE что-то не то.
...
Рейтинг: 0 / 0
отправка почты через cdo
    #39311296
Volodya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
коллеги, кто разбирается в библиотеке CDO, подскажите вариант узнать более точную причину ошибки
Код: html
1.
 № -2147220973 Транспорту не удалось подключиться к почтовому серверу.
...
Рейтинг: 0 / 0
отправка почты через cdo
    #39311347
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Volodya,

ну ошибка-то сама за себя говорит. Какие еще пояснения? Вы не через прокси, случаем, подключаетесь?
Код: vbnet
1.
2.
.Item(CDO_Cnf & "urlproxyserver") = проксисервер
.Item(CDO_Cnf & "proxyserverport") = порт проксисервера
...
Рейтинг: 0 / 0
отправка почты через cdo
    #39311359
Volodya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
не может эта ошибка быть истинной причиной, так как
Код: html
1.
telnet smtp.inbox.ru 25 и telnet smtp.inbox.ru 465 проходят успешно



если бы не было интернет-соединения, то телнет не подключился бы (((
...
Рейтинг: 0 / 0
отправка почты через cdo
    #39311386
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
VolodyaТранспорту не удалось подключиться к почтовому серверуВам же это пишут? Значит CDO не может подключиться к серверу. Прокси попробовали?
...
Рейтинг: 0 / 0
отправка почты через cdo
    #39311389
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
и еще вопрос попутный: падает прямо сразу? Не пробовали Вы до этого со своего ящика рассылку множества писем отправлять? Многие серверы ставят ограничения по массовой отправке писем и как следствие, Ваш ящик мог просто попасть в черный список...
...
Рейтинг: 0 / 0
отправка почты через cdo
    #39311398
Volodya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
вроде дело сдвинулось )
я попробовал отправку почты с другого компа в этой сети - прошло успешно.

итого: не идет отправка с WinXP и WinServer 2003 R2
идет отправка с Win 7

в первом случае IE 6, на Win 7 - IE 11

как вы думаете возможна проблема из-за древности IE ?
...
Рейтинг: 0 / 0
отправка почты через cdo
    #39311453
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Volodyaвозможна проблема из-за древности IE ?
еще днем Вам написал:
The_PristИщите в настройках, что мешает отправить запросы в интернет программно. Может в настройках IE что-то не то
проблемы могут быть какие угодно. Кто его знает что у Вас там внезапно поменялось...
...
Рейтинг: 0 / 0
отправка почты через cdo
    #39311464
Volodya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо за помощь!

Коллеги, у кого есть свободное время и комп с установленным IE 8, проверьте, пожалуйста работу скрипта из ссылки выше.
эта информация поможет мне принять решение об обновлении IE с 6 на 8 версию.
...
Рейтинг: 0 / 0
отправка почты через cdo
    #39311487
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Volodya,

и так скажу: версия ни при чем. У меня этот код работает фиг знает с какой версии IE без проблем. Ищите в настройках IE, а не в версиях. Но это опять же не факт - только одно из предположений.
...
Рейтинг: 0 / 0
отправка почты через cdo
    #39311557
Дмитрий77
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Могу подкинуть идею.
Для любого SSL сервера, будь то https, smtp, pop3 и т.п. требуется сертификат (valid SSL certificate), иногда его нет. Для https это когда вы видите предупреждение в браузере: типа сервер не имеет сертификата, продолжить? не продолжить?
Я с этим хорошо покопался год назад.
В Net.Mail ошибку сертификата можно обойти.
В CDO -никак, мне во всяком случае не удалось. CDO -он давно писался, тогда это все (SSL) не шибко актуально еще было.

Изучай:
SSL:Удаленный сертификат недействителен согласно результатам проверки подлинности.

А ошибку CDO в случае "поганого сертификата" выдает аккурат как у тебя.
17681426

Некий коммент. На mail.ru(он же inbox.ru, он же bk.ru) валидный сертификат типа есть. Но кухня эта иногда подглючивает. Т.е. люди жалуются что при отправке из Outlook Office например иногда возникает предупреждение (зависит хз от чего, м.б. от конкретного компа). Лечится вроде как установкой этого ("невалидного") сертификата себе на комп и запихиванием его в доверенные, но это ты уж сам гугли.
Идею куда копать я дал, причем на 99% уверен что попал в точку.
...
Рейтинг: 0 / 0
отправка почты через cdo
    #39322340
Дмитрий2221
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Volodya, в googlе нужно поставить галку Ненадежные приложения разрешены
...
Рейтинг: 0 / 0
17 сообщений из 17, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / отправка почты через cdo
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]