4D Doc Center : NET

4D Internet Commands v14

NET_Time


NET_Time ( nomServidor ; fecha ; tiempo ; offset ) -> resultado

Parámetro	Tipo	Descripción
nomServidor	Cadena	Nombre o dirección IP del servidor
fecha	Fecha	Fecha
tiempo	Entero largo	Hora, expresada en segundos a partir de la media noche
offset	Entero	Horas de desplazamiento
resultado	Entero	Código de error

Descripción

El comando NET_Time permite recuperar la fecha y la hora actual de la máquina y aplicar el offset necesario para la conversión a la hora local del usuario.

Nota: este comando no afecta el reloj interno del ordenador.

nomServidor es el nombre o la dirección IP de un servidor NTP (Network Time Protocol).

fecha devuelve la fecha (en formato 4D), después de aplicado el offset.

hora devuelve la hora después de aplicado el offset. Este valor representa los segundos desde la medianoche en la fecha. Ver el ejemplo a continuación de un método de conversión de este valor a una variable hora 4D.

offset es el número de horas a sumar o restar de los valores recibidos. Los servidores de tiempo de Internet expresan sus valores en hora universal (Greenwich Mean Time). Incluso si el servidor de tiempo está en su región geográfica, es probable que deba suministrar un valor de offset para compensar la diferencia entre su hora local y la hora universal.

Ejemplo

El siguiente ejemplo recupera la fecha y la hora del servidor de tiempo en el sitio "apple.com". El comando luego resta las siete horas especificadas en el Offset y devuelve la fecha y la hora resultantes (la hora se expresa como un valor entero largo, que puede convertirse utilizando el comando 4D Time string, como se ve a continuación).

 C_DATE(vNetDate)

 C_LONGINT(vNetTime)

 C_TIME(vTime)

 C_INTEGER(vOffset)

 If(ERRCHECK("NET_Time";NET_Time("www.apple.com";vNetDate;vNetTime;-7)))

    vTime:=Time(Time string(vNetTime)) `Convierte la hora enterlo largo en hora 4D

 End if