无法在服务器XMLHTTP请求中设置自定义超时

Question

我在 vba 中编写了一个脚本，用于在提出代理请求后从网站上抓取第一篇文章。我在 vba 脚本中发出 http 请求时使用了代理(代理列表之外(，以便查看帖子总数的长度。成功发送请求后，脚本应解析第一个帖子和正在使用的代理并退出循环。

有时脚本以正确的方式工作，但大多数情况下，即使我在发送请求之前定义了timeout，脚本也需要很长时间才能完成操作。在这一点上，我非常怀疑我是否可以以正确的方式填写timeout参数。我期望的是脚本将等待到那个时间以获得任何响应，否则它将抛出timeout错误并执行下一个请求。

到目前为止，我已经写过：

Sub HandleTimeOut()
    Dim Http As New ServerXMLHTTP60, Html As New HTMLDocument
    Dim elem As Object, proxyList As Variant, oProxy As Variant
    proxyList = [{"50.246.120.125:8080","198.204.253.115:3128","98.172.142.99:8080","207.188.231.141:8080"}]
    For Each oProxy In proxyList
        With Http
            .Open "GET", "https://stackoverflow.com/questions/tagged/web-scraping", True
            .setRequestHeader "User-Agent", "Mozilla/5.0"
            .setProxy 2, oProxy
            .setTimeouts 600000, 600000, 15000, 15000
            On Error Resume Next
            .send
            While .readyState < 4: DoEvents: Wend
            Html.body.innerHTML = .responseText
            Set elem = Html.querySelectorAll(".summary .question-hyperlink")
            On Error GoTo 0
        End With
        If elem.Length > 0 Then
            [A1] = oProxy
            [B1] = elem(0).innerText
            Exit For
        End If
    Next oProxy
End Sub

将timeout设置为五秒钟的正确方法是什么？

Answer 1

.Open "GET", "https://stackoverflow.com/questions/tagged/web-scraping", True

应该是

.Open "GET", "https://stackoverflow.com/questions/tagged/web-scraping", False

如何使用ASP设置HTTP超时？