Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
XML times out
Message
General information
Forum:
Visual FoxPro
Category:
XML, XSD
Title:
Miscellaneous
Thread ID:
01541972
Message ID:
01542001
Views:
46
>>>I am trying to retrieve data from Citylink Couriers web site - most of the time the information is returned quickly but every now and then the objHTTP.Send() times out with an error
>>>
>>>Any idea of the best way to give the system more time or to force a repeat search on the error
>>>
>>>select logix
>>>scan
>>>partaa=ALLTRIM(logix.cityref)
>>>parta="http://www.city-link.co.uk/pod/xmltracking.php?jobno="
>>>partb="&custno=318951&x1=AAA11AAA07KRFAHWS7654321AAAAAAAAAAAA="
>>>url=parta+partaa+partb
>>>
>>>url=STRTRAN(url,'"',"")
>>>url=ALLTRIM(url)
>>>
>>>objHTTP = CreateObject("MSXML2.XMLHTTP.4.0")
>>>objHTTP.Open("GET", url,.f.)
>>>objHTTP.Send()
>>>Insert into WebPage (myMails) VALUES (objHTTP.ResponseText)
>>>objHTTP = null
>>>RELEASE objHTTP
>>>etc
>>>
>>>endscan
>>
>>Is this the same object : http://msdn.microsoft.com/en-us/library/ms760403 ?
>
>Very interesting but I think I would have to rewrite my code - next time

Not exactly a huge re-write. This works for me:
objHTTP =  CreateObject("MSXML2.ServerXMLHTTP.6.0")
objHTTP.SetTimeOuts(1000,1000,1000,1000)
objHTTP.Open("GET","http://google.com",.F.)
objHTTP.Send()
s = objHTTP.ResponseText
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform