Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 05.03.2014, 21:42
Rudy_Wade Rudy_Wade вне форума
Прохожий
 
Регистрация: 05.03.2014
Сообщения: 2
Версия Delphi: Delphi XE4
Репутация: 10
По умолчанию Ошибка Indy: Host not found

Итак, есть у меня на форме компоненты IdSMTP1, IdMessage1 и Button.На кнопке вот такой код:
Код:
with idSmtp1 do begin
idsmtp1.Host:='smtp.mail.ru';
idsmtp1.Port:=25;
idsmtp1.Username:='Lolik@mail.ru';
idsmtp1.Password:='password';
idmessage1.CharSet:='windows-1251';// кодировка (русские символы)
idMessage1.From.Text:='Lolik@mail.ru';   //откуда
idMessage1.Recipients.EMailAddresses:='Lolik@mail.ru';   //куда
idMessage1.Body.Text:=info_memo.text;
idMessage1.MessageParts.Clear;
TIdAttachmentfile.Create(idmessage1.MessageParts, 'Report.user.txt');
Connect();
 if Connected then begin
  Send(IdMessage1);
  Disconnect;
  end;
 end;
При проверке все работает отлично, файл отправлен и я доволен.НО на других компьютерах после нажатия кнопки выскакивает такая ошибка:"Socket error # 10011: Host Not Found".Программа отсылает мне на почту данные о работе приложения, естественно по соглашению самого пользователя!Он сам выбирает буду ли я получать отчет о работе моего приложения на его компьютере, или же оставить все в секрете(хотя в теле письма описаны только значения переменных)

Последний раз редактировалось Rudy_Wade, 05.03.2014 в 21:45.
Ответить с цитированием
  #2  
Старый 05.03.2014, 22:29
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от Rudy_Wade
Итак, есть у меня на форме компоненты IdSMTP1, IdMessage1 и Button.На кнопке вот такой код:
.....
При проверке все работает отлично, файл отправлен и я доволен.НО на других компьютерах после нажатия кнопки выскакивает такая ошибка:"Socket error # 10011: Host Not Found".
Вижу здесь два варианта - программу блокирует бранмауэр/фаервол или же те компьютеры подключены к интернету через прокси, а не напрямую.
Ответить с цитированием
  #3  
Старый 07.03.2014, 19:37
Rudy_Wade Rudy_Wade вне форума
Прохожий
 
Регистрация: 05.03.2014
Сообщения: 2
Версия Delphi: Delphi XE4
Репутация: 10
По умолчанию

Цитата:
Сообщение от poli-smen
Вижу здесь два варианта - программу блокирует бранмауэр/фаервол или же те компьютеры подключены к интернету через прокси, а не напрямую.
Нужно как - то программно это решить, чтобы не причинить неудобств пользователю.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 01:20.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter