kgmmurugesh Ответов: 1

Как проверить, что подключение к интернету доступно в VB.NET

Я хочу проверить, доступно ли подключение к интернету с помощью vb.net код

Что я уже пробовал:

Public Function isInternetConnected(Optional pUrl As String = "http://www.google.com") As Boolean

    Try
        Using client = New WebClient()
            Using stream = client.OpenRead(pUrl)
                Return True
            End Using
        End Using
        Return IsConnectedToInternet(pUrl)
    Catch ex As Exception
        Return IsConnectedToInternet(pUrl)

    End Try
End Function


Этот код иногда возвращает false при наличии подключения к интернету.

CHill60

Вы не поделились кодом, который на самом деле выполняет проверку - то есть IsConnectedToInternet

1 Ответов

Рейтинг:
8

Maciej Los

Для этого нет 100% рабочего решения, но вы можете попробовать:

'reference to System.Net and System.Net.NetworkInformation is required!
Function IsInternetConnected() AS Boolean

	Return New Ping().Send("www.google.com").Status = IPStatus.Success

ENd Function


В большинстве случаев он работает правильно.