Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Get local time in other countries
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Versions des environnements
Visual FoxPro:
VFP 6 SP5
OS:
Windows 2000 SP4
Network:
Windows 2000 Server
Database:
Visual FoxPro
Divers
Thread ID:
01134752
Message ID:
01135413
Vues:
29
Tracy

Thanks for that - but even using your code exactly I still got the same result

But with the following code it works

CREATE CURSOR WebPage (myMails m)
set century on
url="http://www.timeanddate.com/worldclock/full.html"
objHTTP = CreateObject("MSXML2.XMLHTTP.4.0")
objHTTP.Open("GET", url,.f.)
objHTTP.Send()
Insert into WebPage (myMails) VALUES (objHTTP.ResponseText)
objHTTP = null
RELEASE objHTTP

The object release appears to be the key

Thanks

Colin



>I ran into the same problem until I added the .setRequestHeader:
>
>CREATE CURSOR WebPage (myMails m)
>url="http://www.timeanddate.com/worldclock/full.html"
>objHTTP = CreateObject("MSXML2.XMLHTTP.4.0")
>objHTTP.Open("GET", url)
>objHTTP.setRequestHeader("Content-type", "text/xml")
>objHTTP.Send()
>lncount = 0
>DO WHILE objHTTP.readystate <> 4 .and. lncount < 1000
>	lncount = lncount + 1
>ENDDO
>IF objHttp.status==200 .and. objHTTP.readystate = 4
>	Insert into WebPage (myMails) VALUES (objHTTP.ResponseText)
>ENDIF
>objHTTP = null
>RELEASE objHTTP
>sele webpage
>browse
>USE IN webpage
>
Specialist in Advertising, Marketing, especially Direct Marketing

I run courses in Business Management and Marketing
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform