VB6 - WinHttpRequest超时问题

Question

我在VB6中使用WebRequest，并将超时设置为"5000“(5秒)，但即使在5秒后它也不会超时，任何帮助都将不胜感激。

x:
Dim objWinHTTP
Set objWinHTTP = CreateObject("WinHttp.WinHttpRequest.5.1")


    objWinHTTP.Open "POST", "http://twitter.com/" & TwitterUSERNAME
    objWinHTTP.SetTimeouts 5000, 5000, 5000, 5000


    Call objWinHTTP.Send(psData)
    MsgBox (objWinHTTP.Status)
    If objWinHTTP.Status <> 200 Then
    Timer.Enabled = False
    MsgBox ("D:")
    GoTo x
    End If

Answer 1

您应该在objWinHTTP.Open之前设置objWinHTTP.SetTimeouts

您为objWinHTTP.SetTimeouts设置的四个参数是

Resolve, Connect, Send and Receive

因此，每个值都应该根据该值进行设置。