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:	Views:  30.105
www.tools4vb.de	System:  WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

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

Copyright ©2000-2024 vb@rchiv Dieter OtterAlle Rechte vorbehalten.

Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.