Poner en hora el ordenador.

[FiveWiDi]

Hola a todos,

A raiz de un post sobre el cambio de hora del ordenador por parte de personal NO autorizada, le he estado dando vueltas al tema.

¿Estamos inventando la rueda?

Hoy en día en que estar en línea (conectados) es lo normal, no sería más práctico que nuestra aplicación cada cierto tiempo o segun convenga, acceda a alguna web y capture la fecha y hora? A partir de ahí las comprobaciones y acciones que se hagan dependería ya de cada uno.

Alguien sabe de alguna web "oficial" que nos de la fecha y hora?

[Willi Quintana]

Hola.
Si estas en Red,,,, lo que puedes hacer, tomar la fecha y hora del servidor en cada operacion critica.....
//---------------------------------------------------------------------------------------------------
Function SETDATE() //
local vServer

vServer := "COMMAND.COM /C NET TIME \\" + oApp:cPortServ + " /SET /YES"
TRY
WaitRun(vServer,0) // ejecutor externo
CATCH
MsgAlert("No Se Actualizó la Fecha/Hora En Esta PC","Error")
END
Return(Nil)

[acuellar]

Si estas en red, el servidor principal del Active Directory sincroniza la hora cada 10 minutos, colocandole la hora del servidor a todas las PCs.

Saludos,

Adhemar

[FiveWiDi]

Gracias a los dos por la información.

[omarelunico]

Hola.
Otra opción es generar una tarea en el XP para que ejecute un bat cada cierto tiempo, por ejemplo en mi caso yo lo ejecuto 4 veces al día.

rem el archivo es tiempo.bat
net time /setsntp:"0.pool.ntp.org 1.pool.ntp.org 2.pool.ntp.org"
w32tm /resync /rediscover



tienes que agregar una tarea al XP en CMD
at 11:00 /every:D,L,M,Mi,J,V,S D:\miruta\tiempo.BAT
at 13:00 /every:D,L,M,Mi,J,V,S D:\miruta\tiempo.BAT
at 15:00 /every:D,L,M,Mi,J,V,S D:\miruta\tiempo.BAT

[karinha]

Buenos dias, señores porque en Windows 7 esto no funciona?

net time /setsntp:"0.pool.ntp.org 1.pool.ntp.org 2.pool.ntp.org"

Gracias