Ben*_*Ben 4 vb6 timeout webrequest
我在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
Run Code Online (Sandbox Code Playgroud)
你应该objWinHTTP.SetTimeouts在之前设定objWinHTTP.Open
以及为objWinHTTP.SetTimeouts设置的四个参数是
Resolve, Connect, Send and Receive
Run Code Online (Sandbox Code Playgroud)
所以每个值都应该根据它来设置.
| 归档时间: |
|
| 查看次数: |
12301 次 |
| 最近记录: |