Hallo,
ich möchte mit der Ping-Funktion prüfen, ob eine bestimmte Domain erreichbar ist:
Doch es erschint immer eine Fehlermeldung: Während der Pinganforderung ist eine Ausnahme aufgetreten.
Jemand eine Idee woran es liegt?
mfg funnysunny
ich möchte mit der Ping-Funktion prüfen, ob eine bestimmte Domain erreichbar ist:
VB.NET-Quellcode
- Public Sub CheckInternetConnection()
- Try
- My.Computer.Network.Ping("http://www.google.de/") 'Ist nicht die Domain, die ich prüfen will, ist nur ein Beispiel
- Catch ex As Exception
- Dim Result As DialogResult = MessageBox.Show("Verbindung konnte nicht hergestellt werden!" & vbNewLine & vbNewLine & "Die Fehlermeldung: " & ex.Message, "Server nicht erreichbar!", MessageBoxButtons.RetryCancel, MessageBoxIcon.Error, MessageBoxDefaultButton.Button1)
- If Result = Windows.Forms.DialogResult.Retry Then
- CheckInternetConnection()
- ElseIf Result = Windows.Forms.DialogResult.Cancel Then
- Application.Exit()
- End If
- End Try
- End Sub
Doch es erschint immer eine Fehlermeldung: Während der Pinganforderung ist eine Ausnahme aufgetreten.
Jemand eine Idee woran es liegt?
mfg funnysunny