Auf Netzwerk-Verbindung prüfen (VB.NET) Dieser Tipp zeigt eine einfache Lösung, wie man unter VB.NET prüfen kann, ob eine Netzwerk-Verbindung besteht.
Autor:   Dieter Otter	Bewertung:     [ Jetzt bewerten ]	Views:  30.076
www.tools4vb.de	System:  WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Geben Sie hier Ihre persönliche Bewertung ab! Anzahl Bewertungen bisher: 11 Bewertung insgesamt: gut Durchschnittliche Bewertung: 3.7 von 5 Sternen

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

Mit nachfolgender Funktion lässt sich unter VB.NET sehr einfach ermitteln, ob eine Netzwerk-Verbindung besteht. Hierzu werden die Host-Informationen des Logon-Servers ausgelesen. Führt dies zu einem Fehler gibt es keine Netzwerk-Verbindung.

Function CheckForNetworkConnectivity() As Boolean
  Dim oHostEntry As System.Net.IPHostEntry
 
  ' Fehlerbehandlung aktivieren
  Try
    ' Logon-Server aus den Umgebungsvariablen auslesen
    Dim sServer As String = Environment.GetEnvironmentVariable("LOGONSERVER")
 
    ' Host-Informationen ermitteln
    oHostEntry = System.Net.Dns.GetHostByName(sServer.Substring(2))
    Return True
  Catch
    ' Fehler!
    Return False
  End Try
End Function