Art der Internetverbinung ermitteln

[Mathias Weichert]

Hallo,

ich möchte feststellen, auf welche Art der Client mit dem Internet verbunden ist.

1. Über Modem
2. Über Netzwerk

Hat jemand einen Tip ?

Gruß Mathias

[T K]

Du könntest unter NT (unter Windows hab ich das noch nicht gefunden)
unter:

HKLM\System\CurrentControlset\Services\Tcpip\Param eters

nach dem Schlüssel "Transient" suchen.
Wenn er existiert, dann existiert eine RAS-Verbindun

[Mathias Weichert]

Danke, falls ich noch etwas anders finden sollte, melde ich mich

[Garwin Hartwig]

function Online(var Modem, LAN, Proxy, Busy : boolean) : boolean;
//Testet: Internet connection vorhanden +Art ?
//uses wininet;
var flags : dword;
begin
Result := InternetGetConnectedState(@flags, 0);
if Result then begin
if (flags and INTERNET_CONNECTION_MODEM) = INTERNET_CONNECTION_MODEM then begin
Modem := True;
end;
if (flags and INTERNET_CONNECTION_LAN) = INTERNET_CONNECTION_LAN then begin
LAN := True;
end;
if (flags and INTERNET_CONNECTION_PROXY) = INTERNET_CONNECTION_PROXY then begin
Proxy := True;
end;
if (flags and INTERNET_CONNECTION_MODEM_BUSY)=INTERNET_CONNECTIO N_MODEM_BUSY then begin
Busy := True;
end;
end;
end