Obtener Fecha y Hora del Servidor Desde un Tarminal

[AlfredoS]

Tengo una aplicacion instalada en un serviror, por medio de las terminalescaptan la fecha y hora de cada terminal pero por lo regular no estansinclonizadas la fecha y la hora.

La Pregunta es: como puedo captar la fecha y hora del servidor ignorando lade las terminales.

Mi aplicacion esta en FW2.6 XhB

[Antonio Linares]

Alfredo,

Prueba con:

WinExec( "NET TIME \\Server" )

http://support.microsoft.com/kb/314090/es

[Antonio Linares]

Otra forma más elegante, sin tener que usar la función WinExec(), es usar la función NetRemoteTOD():

http://msdn2.microsoft.com/en-us/library/aa370612(VS.85).aspx

[Willi Quintana]

Yo le hago asi y actualizas tu terminal con la hora del servidor:

Function SETDATE() // esta funcion debe quitarse en versiones futuras
local vServer

vServer := "COMMAND.COM /C NET TIME \\" + oApp:cPortServ + " /SET /YES"
WaitRun(vServer,0) // ejecutor externo

Return(Nil)

[Willi Quintana]

UPs,,
oApp:cPortServ := "\\server" //
Return(Nil)

[AlfredoS]

Antonio y Willi, muchas gracias por su apoyo,
Probe la opcion de Antonio WinExec y la de Willi WaitRun y me funcionaron muy bien.

No me ha funcionado la otra opcion NetRemoreTOD(), Antonio tendras un ejemplo.

A los dos muchisimas gracias por su apoyo.

No habia escrito porque el forum tenia problemas.

NUEVAMENTE MUCHAS GRACIAS