Expiration du délai pour une requête HTTP

Question

Existe-t-il un autre ProgID au lieu de "MSXML2.XMLHTTP" qui vous permet de définir un délai d'expiration dans VBScript? OnReadyStateChange ou similaire doit également fonctionner dans VBScript.

Set oHTTP = CreateObject("MSXML2.XMLHTTP") 
oHTTP.timeout = 10000 'Throws an error 
oHTTP.Open "GET", "http://www.google.com", True 

oHTTP.OnReadyStateChange = GetRef("oHTTP_OnReadyStateChange") 

Sub oHTTP_OnReadyStateChange 
    ' do something 
End sub 

oHTTP.Send 

Answer 1

Vous pouvez utiliser ServerXmlHttp with setTimeouts, ou tout simplement utiliser windows.XMLHttpRequest à la place.