VBA:安全通道支持中发生错误

Question

我在 VBA 中有一段代码可以完美运行很长时间。突然它无缘无故停止工作。我这边没有任何改变。

我用它来下载网页并将它们存储在这样的字符串中:

Function something() As String
URL = "www..."
Set XMLHTTP = CreateObject("WinHttp.WinHttpRequest.5.1")
XMLHTTP.Open "GET", URL, False
XMLHTTP.send
something = XMLHTTP.responseText
End Function

在 XMLHTTP.send 我收到以下错误:
运行时错误“-2147012739 (80072f7d)”:安全 channel 支持中出现错误

这个错误的含义是什么，可以做什么？

我尝试阅读它，但它似乎是一个通用错误，可能是很多事情。也许微软改变了一些协议(protocol)或类似的东西？

Answer 1

我有同样的错误:
2018 年 6 月 30 日

我在 Windows 7 上运行 Excel，

在 Mac 上，在 Parallels 上。

这是一个非常简单的修复。

转到控制面板，

单击网络和 Internet，

单击网络和共享中心，
(在左下角单击 Internet 选项)

Internet属性对话框将出现，
单击高级选项卡

滚动到底部并打开“使用 TLS1.2”
(在收到错误之前我的已经设置好了)
单击应用

以下是正确 Windows 操作系统更新文件所需的下载链接:
http://www.catalog.update.microsoft.com/search.aspx?q=kb3140245

我从 Windows 资源管理器(文件管理器)下载并安装了 UpDate
重新启动的 Windows

并运行VBA。
它运行完美

感谢 Srinath Gudimetla，请参阅下面的链接以获取完整详细信息:
https://www.linkedin.com/pulse/working-vba-tls-protocol-srinath-gudimetla