Добрый вечер,

Раньше приведенный ниже код работал без проблем.
Сейчас не могу понять, что изменилось, но при попытке произвести Connect все время выдается ошибка:

Ошибка подключения! Socket Error # 11004

Вроде на сервере mail.ru ничего не изменилось!
Использую Win Vista и Win7.

IdSMTP := TIdSMTP.Create(nil);
 IdMessage := TIdMessage.Create(nil);
 try
   IdSMTP.AuthenticationType:= atLogin;
   IdSMTP.Username := 'name';
   IdSMTP.Password := 'xxx';
   IdSMTP.Host := 'smtp.mail.ru';
   IdSMTP.Port := 25;
   Msg := TIdMessage.Create(nil);
   Msg.Body.Add(Letter);
   Msg.Subject := Theme;         Msg.From.Address := 'asumrl@mail.ru';
   Msg.From.Name := Sender;
   Msg.Recipients.EMailAddresses := Email;
   Msg.IsEncoded := true;
   if FileName <> '' then
      Attach := TIdAttachment.Create(msg.MessageParts, FileName);
   Application.ProcessMessages;
   try
     try
       IdSMTP.Connect;//(1000);
       IdSMTP.Send(Msg);
     except
       on E: Exception do Result := 'ERROR occured during email send: ' + E.Message;
     end;
   finally
     if IdSMTP.Connected then IdSMTP.Disconnect;
   end;
   Application.ProcessMessages;
 finally
   IdSMTP.Free;
   FreeAndNil(Attach);
   IdMessage.Free;
 end;

Socket error 11004 - Valid name, no data record of requested type
найдено имя (сервер) но к нему нет данных запрашиваемого типа (например ip)
кстати попробуй, проверь, вместо имени ip (94.100.177.1 ???) подставить.

> sniknik ©   (27.02.12 18:08) [1]
> Socket error 11004 - Valid name, no data record of requested
> type
> найдено имя (сервер) но к нему нет данных запрашиваемого
> типа (например ip)
> кстати попробуй, проверь, вместо имени ip (94.100.177.1
> ???) подставить.


Попробовал, выдает ошибку 10051 !

Админ говорит, что ничего не блокировал!

Socket error 10051 - Network is unreachable
не "достает" до сервера, не обязательно блокировка админом.
и вообще
http://msdn.microsoft.com/en-us/library/windows/desktop/ms740668%28v=vs.85%29.aspx

> sniknik ©   (27.02.12 19:28) [4]
> Socket error 10051 - Network is unreachable
> не "достает" до сервера, не обязательно блокировка админом.
>
> и вообще
> http://msdn.microsoft.com/en-us/library/windows/desktop/ms740668%28v=vs.
> 85%29.aspx


Пришел домой, подключил интернет через Мегафон, запустил программу и все чудесным образом заработало!
Все таки админ был не прав! Но вопрос что может тогда блокировать порты рабочем на сервере?

> что может тогда блокировать порты рабочем на сервере?


Какие еще "порты" ?
10051 не имеет ни малейшего отношения к "портам".

стоит какой-нибудь прокси?

> IdMessage := TIdMessage.Create(nil);


Зачем здесь  IdMessage, не используется жеж!?

> Cobalt ©   (28.02.12 15:37) [7]
> стоит какой-нибудь прокси?


Да!

> Cobalt ©   (28.02.12 15:37) [7]
> стоит какой-нибудь прокси?


Да!

> Loginov Dmitry ©   (28.02.12 23:48) [8]
>
> > IdMessage := TIdMessage.Create(nil);
>
>
> Зачем здесь  IdMessage, не используется жеж!?


Действительно, упустил из виду, спасибо!

> Cobalt ©   (28.02.12 15:37) [7]
> стоит какой-нибудь прокси?


Разобрался, у меня был не прописан шлюз и dns-сервер!

socket 11004

WSANO_DATA11004
Valid name, no data record of requested type.
The requested name is valid and was found in the database, but it does not have the correct associated data being resolved for. The usual example for this is a host name-to-address translation attempt (using gethostbyname or WSAAsyncGetHostByName) which uses the DNS (Domain Name Server). An MX record is returned but no A record—indicating the host itself exists, but is not directly reachable.

Socket Error # 11004 выдает ошибку постоянно как только подключаю интеренет,что это может быть??