VB. net Принять самоподписанный сертификат SSL

Я ищу способ проверить (или обойти проверку) самоподписанные сертификаты SSL с помощью VB .Net. Я нашел код для этого на C # и попытался преобразовать его в код VB, но мне не повезло.

Вот код C #.

Вот что я пробовал:

Imports System
Imports System.Net
Imports System.Security.Cryptography.X509Certificates

Public Class clsSSL
    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
End Class

Тогда перед Webrequest у меня есть эта строка кода, которая выдает ошибку.

ServicePointManager.ServerCertificateValidationCallback = New System.Net.Security.RemoteCertificateValidationCallback(AcceptAllCertifications)

Сообщение об ошибке:

Delegate 'System.Net.Security.RemoteCertificateValidationCallback' requires an 'AddressOf' expression or lambda expression as the only argument to its constructor.

20
задан Community 23 May 2017 в 10:30
поделиться