Мастера DELPHI, Delphi programming community Рейтинг@Mail.ru Титульная страница Поиск, карта сайта Написать письмо 
| Новости |
Новости сайта
Поиск |
Поиск по лучшим сайтам о Delphi
FAQ |
Огромная база часто задаваемых вопросов и, конечно же, ответы к ним ;)
Статьи |
Подборка статей на самые разные темы. Все о DELPHI
Книги |
Новинки книжного рынка
Новости VCL
Обзор свежих компонент со всего мира, по-русски!
|
| Форумы
Здесь вы можете задать свой вопрос и наверняка получите ответ
| ЧАТ |
Место для общения :)
Орешник |
Коллекция курьезных вопросов из форумов
KOL и MCK |
KOL и MCK - Компактные программы на Delphi
Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / rsdn.org

 
Чтобы не потерять эту дискуссию, сделайте закладку « предыдущая ветвь | форум | следующая ветвь »

Использование МХ-записи с ИНДИ


Pcrepair ©   (27.06.17 22:09

Добрый день.
Есть код определяющий имена СМТП-серверов в МХ-записи (типа mx.kubsu.ru)
Есть код, на основе ИНДИ, отсылки письма в том числе по 465 порту
через СМТП-сервер типа гугл, яндекс, мылору. все работает

НО, если вставить вместо имени смтп-сервера имя смтп-сервера из МХ-записи (типа mx.kubsu.ru)
(как это советуют корефаны типа Remy Lebeau Jul 9 '14 at 19:50)

for I := 0 to IdDNSResolver1.QueryResult.Count-1 do
 begin
   if IdDNSResolver1.QueryResult[I] is TMXRecord then
   begin
     IdSMTP1.Host := TMXRecord(IdDNSResolver1.QueryResult[I]).ExchangeServer;  //вот тут mx.kubsu.ru
     try
       IdSMTP1.Connect;
       try
         IdSMTP1.Verify(user);
         Result := True;
         Exit;
       finally
         IdSMTP1.Disconnect;
       end;
     except
       // тут ловим исключение Socket Error # 10060 Connection timed out
     end;
   end;
 end;


то возвращается ошибка Socket Error # 10060 Connection timed out.
вознающая после попытки SMTP.Connect;

Вопрос : что все это значит?
1. закончились времена когда можно было дергать сервера и проверять есть ли там указанный аккаунт?
2. надо проверять по 25 порту (хотя пример выше проверялся и по 25 и по 465, результат один и тот же)
3. возможно надо что то еще(типа старый старый TClientSocket или ICS), позабористее, но что канкретно?


megavoid ©   (29.06.17 10:31[1]


> 1. закончились времена когда можно было дергать сервера и проверять есть ли там указанный аккаунт?

Лет 10 тому назад


версия для печати

Написать ответ

Ваше имя (регистрация  E-mail 







Разрешается использование тегов форматирования текста:
<b>жирный</b> <i>наклонный</i> <u>подчеркнутый</u>,
а для выделения текста программ, используйте <code> ... </code>
и не забывайте закрывать теги! </b></i></u></code> :)


Наверх

  Рейтинг@Mail.ru     Титульная страница Поиск, карта сайта Написать письмо