Läuft ein bestimmter Dienst im Netzwerk

[Jackie1983]

hi,

wie kann ich raus bekommen ob auf der ip 192.168.0.132 ein http server oder ftp server läuft?
Irgend wie so ping 192.168.0.132:80?

[marabu]

Hallo Jackie,

wenn du es von der Shell aus testen willst, dann ist telnet das Mittel der Wahl. Aus deinem Programm heraus wäre das hier ein Ansatz:

Delphi-Quellcode:

function CanConnect(const aHost: string; aPort: Word): Boolean;
begin
  with TIdTCPClient.Create(nil) do
  try
    Host := aHost;
    Port := aPort;
    try
      Connect;
      Result := True;
      Disconnect;
    except
      Result := False;
    end;
  finally
    Free;
  end;
end;

Dabei wird der Grund im Fehlerfall verschleiert, der Test ist ein reiner Positivtest, keine Diagnosehilfe.

Grüße vom marabu

[Jackie1983]

danke