vb.net WebClient.DownloadString завершается с ошибкой за исключением - PullRequest
Новая
       19

vb.net WebClient.DownloadString завершается с ошибкой за исключением

0 голосов
/ 09 марта 2019

Я работаю над программой в VS 2017, кодирующей в VB.Net. Программа загружает веб-страницы, используя Net.WebClient.DownloadString, а затем анализирует данные. Он работал нормально в течение года или более, но однажды я начал получать исключение при загрузке страниц.

Сообщение ex.Message: «Базовое соединение было закрыто: при отправке произошла непредвиденная ошибка.»

ex.InnerException.Message: «Невозможно записать данные в транспортное соединение: запрос на отправку или получение данных был отклонен, поскольку сокет не подключен и (при отправке на сокете дейтаграммы с использованием вызова sendto) нет адрес был указан.

У меня VS 2017 установлен на 2 других компьютерах в этом месте и на 1 в другом месте. Все они продолжают выполнять код без исключения. Это проблема только на этом ПК.

Код приведен ниже (я изменил веб-адрес, но он не работает для любого действующего URL).

Есть идеи, почему это не работает только на моем основном ПК? 

Public Function DownloadData() As Boolean

    Dim strURL As String = "https://www.google.com/"
    Dim strOutput As String

    Try
        Using WC As New Net.WebClient

            strOutput = WC.DownloadString(strURL)

            If strOutput.Length > 0 Then
                If ParseData(strOutput) = True Then
                    Return True
                End If
            Else
                Return False
            End If
        End Using

    Catch ex As Exception
        MessageBox.Show(ex.InnerException.Message, "Error")

    End Try

End Function
...