0

我有这个从docuwiki检索数据的代码:)。但他们开始使用 tls1.3,我的代码不再工作了。有什么我能做的吗?我有 win 7,我正在使用 excel 2007 运行 vba 脚本时出现的错误是“安全通道支持中发生错误”

Sub test1()

Dim Http2 As New WinHttpRequest

    'open the docuwiki url
    Http2.Open "GET", "https://9gag.com/", False
    Http2.setRequestHeader "User-Agent", "Mozilla/5.0 (Windows NT 6.1; rv:25.0) Gecko/20100101 Firefox/25.0"

    'send request
    Http2.send

    'get response
    a = lcase(Http2.responseText)
    MsgBox a
End Sub

如果这是一个愚蠢或不完整的问题,我深表歉意。

4

0 回答 0