在xmlhttp查询中获取错误，但在IE查询中正常工作

Question

Sub Test(URL As Range)
    For Each cell In URL
        If InStr(1, cell.Value, "https://www.kimptonhotels", vbTextCompare) Then
           Dim xml_obj As New XMLHTTP
           xml_obj.Open "GET", cell, False
           xml_obj.send

           Dim htmldoc As New HTMLDocument
           htmldoc.body.innerHTML = xml_obj.responseText   ' I am trying to get some data from [this link][1] by VBA in Excel

在此行中收到错误：

xml_obj.send

通过创建IE对象方法，我得到了所需的数据。

我试图通过xmlhttp方法获取，但我在xml_obj.send

上收到错误

  

错误2146697211（800c005）系统找不到指定的资源

我尝试搜索谷歌但找不到类似的东西。

我只是出于好奇而问这个问题，问题是什么以及为什么我会收到错误？

xmlhttp代码与我检查的其他一些https网站一起运行正常。

谢谢