Получить API JSON (https) с VB.NET (ОШИБКА: отменен запрос: невозможно создать безопасный канал SSL / TLS)

Question

Я пытаюсь запросить API из моего кода vb.net, но во время выполнения «GetResponse» выдает ошибку « Отменен запрос: не удается создать безопасный канал SSL / TLS"

Я изменил многие вещи кода, пытаясь решить мою проблему, но ничего не получается ...

Я прилагаю код, который мне нужно посмотреть, если кто-то может это исправить

    Dim request As HttpWebRequest = HttpWebRequest.Create("https://api.flightstats.com/flex/schedules/rest/v1/json/flight/AA/1917/departing/2018/11/19?appId=583f892b&appKey=e960901ec7dcb40321306743b7a364d0")
    request.Proxy = Nothing
    request.UserAgent = "Test"

    ServicePointManager.ServerCertificateValidationCallback = AddressOf AcceptAllCertifications

    Dim response As HttpWebResponse = request.GetResponse
    Dim response_stream As System.IO.Stream = response.GetResponseStream

    Dim stream_reader As New System.IO.StreamReader(response_stream)
    Dim Data As String = stream_reader.ReadToEnd
    stream_reader.Close()

    MsgBox(Data)

_

Public Function AcceptAllCertifications(ByVal sender As Object, ByVal certification As System.Security.Cryptography.X509Certificates.X509Certificate, ByVal chain As System.Security.Cryptography.X509Certificates.X509Chain, ByVal sslPolicyErrors As System.Net.Security.SslPolicyErrors) As Boolean
    Return True
End Function

В коде у вас есть адрес аппликации, так как я хочу с ним ознакомиться

Answer 1

Добавьте это перед вашим запросом:

ServicePointManager.SecurityProtocol = SecurityProtocolType.Tls12