¿Como hacer Ping desde codigo?

[[escafandra]]

No encuentro la forma de hacer un ping desde código C++ a una dirección de Internet. El código en delphi también me puede servir aunque prefiero C++.

Si tenéis alguna sugerencia os lo agradecería mucho.

Saludos.

[[duilioisola]]

En Delphi puedes usar las Indi Clients - TIdIcmpClient.

Código Delphi [-]
procedure TForm1.BtnPingClick(Sender: TObject);
begin
   IdIcmpClient1.Host := '192.168.1.1';
   IdIcmpClient1.Ping;
end;

procedure TFMMain.IdIcmpClient1Reply(ASender: TComponent;
  const AReplyStatus: TReplyStatus);
begin
{TReplyStatus = record  
   BytesReceived: integer;  
   FromIpAddress: string;  
   MsgType: byte;  
   SequenceId: word;  
   MsRoundTripTime: longword;  
   TimeToLive: byte;  
   ReplyStatusType: 
   TReplyStatusTypes;  
end;

TReplyStatusTypes = (rsEcho, rsError, rsTimeOut, rsErrorUnreachable, rsErrorTTLExceeded);
}

end;

[[escafandra]]

Gracias por tu pronta respuesta. No se porque tengo problemas para instalar Indi en mi viejo C++ Builder 5. Lo instalo pero no me funciona bien.

Si sabeis de otros componentes para hacer un ping o como hacerlo directamente por código.....

[dec]

Hola,

Creo que el artículo Implementing PING without using raw sockets, de Zarko Gajic, puede serte de utilidad.

[[escafandra]]

Empezado por dec

Hola,

Creo que el artículo Implementing PING without using raw sockets, de Zarko Gajic, puede serte de utilidad.

Gracias por tu respuesta. Voy a mirar ese artículo.

[[escafandra]]

He mirado el artículo y funciona compilado en delphi, pero no ma funciona con Builder. El problema esta que una vez compilado con Builder C++ y al hacer el linkado, no encuentra las funciones externas que deben estar en icmp.dll y no puede crear el ejecutable.