Verbindungstyp erkennen?

[Valle]

Welchem Zweck soll das dienen? Geht es um Android/iOS oder ist die Frage allgemein (also Windows)?

Falls Android/iOS: In dem Fall kann man sicherlich einfach auslesen, ob man per WLAN oder mobilder Datenverbindung verbunden ist. Eine Googlesuche sollte dort zum Ziel führen.

Falls allgemein: Es gibt Anhaltspunkte, mit denen man vermuten könnte, dass es sich um eine mobile Internetverbindung handelt. Zum Beispiel kann man anhand des IP-Bereichs seiner externen IP auf den Provider schließen. Die dazu nötige Datenbank müsste aber vermutlich erstmal erstellt werden und wäre auch immer nur zu einer gewissen Wahrscheinlichkeit korrekt.

Ich würde dir empfehlen das anders zu lösen. Frag beispielsweise den Anwender.
Hier wäre es für uns vielleicht hilfreich zu wissen, warum du das brauchst.

[hathor]

Seit WIN 2000 gibt es die Funktion InternetGetConnectedState(WinInet).
Ist aber ohne Aussagekraft...
Es gibt USB-Sticks, die als MODEM erkannt werden, andere als LAN.
http://msdn.microsoft.com/en-us/libr...=vs.85%29.aspx

Delphi-Quellcode:

Function IsConnectedToInternet: Boolean;
var
dwConnectionTypes: DWORD;
begin
dwConnectionTypes := 
INTERNET_CONNECTION_MODEM + INTERNET_CONNECTION_LAN +
INTERNET_CONNECTION_PROXY + INTERNET_CONNECTION_MODEM_BUSY;
Result := InternetGetConnectedState(@dwConnectionTypes, 0);
end;
oder:
Function INETconnectionType: String;
var State: DWord; Result1: Boolean;
const
  Type1 = INTERNET_CONNECTION_MODEM;
  Type2 = INTERNET_CONNECTION_LAN;
  Type3 = INTERNET_CONNECTION_PROXY;
  Type4 = INTERNET_CONNECTION_MODEM_BUSY;
begin
Result:='';
  Result1:=InternetGetConnectedState(@State, 0);
  if Result1 then
  begin
    if (State and Type1) = Type1 then Result:= 'Modem ';
    if (State and Type2) = Type2 then Result:= 'LAN';
    if (State and Type3) = Type3 then Result:= 'Proxy';
    if (State and Type4) = Type4 then Result:= 'Modem busy';
  end;
end;