Controles fecha/hora

[ermendalenda]

Empezado por novatico

Bueno, primero he de recordar algo que ya he comentado en este foro. No uso Delphi, pero estoy por aquí porque es un foro muy activo.
Si tecleas esa dirección "http://date.jsontest.com" en el navegador, ya vas a ver los datos que devuelve.

Para hacer programáticamente, yo hago un "httpRequest" con orden "GET" y me devuelve el mismo texto que ves en el navegador.
Sólo hay que tomar la información y manejarla, y la respuesta es muy rápida.
Al principio usaba la dirección "http://worldtimeapi.org/api/timezone/Europe/Madrid", pero, aunque es más completa, falla en muchas ocasiones.

Os pego el trozo de mi código por si os ayuda:


lcURL = "http://date.jsontest.com"
loHTTP = Createobject("WinHttp.WinHttpRequest.5.1")
loHTTP.Open("GET", lcURL, .F.)
loHTTP.Send()

En lcURL va la dirección de más arriba.

Me olvidaba, la respuesta va en:

cResp = loHTTP.ResponseText

Gracias
Ese lo tengo
Me refiero al de la armada