FoxPro/Visual FoxPro - usar fecha y hora del servidor que no sea cambiada

 
Vista:

usar fecha y hora del servidor que no sea cambiada

Publicado por Ricardo Morales (31 intervenciones) el 30/03/2004 01:48:33
Hola , mi consulta es como hacer que mi aplicacion use solamente la fecha y hora del servidor ya esta dando problemas que los usuarios me cambia la hora y fecha de las transacciones en cada equipo se atraza o simplemente ponen la que quieren necesito tapar esto como puedo hacer.

Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:usar fecha y hora del servidor que no sea cambi

Publicado por Jaime CArdona (32 intervenciones) el 30/03/2004 02:44:48
Hay un truco muy sencillo, crear un archivo en el server y con ese archivo le checas las propiedades y ya sabes la hora del server

******************************************************************
* ---- Server DateTime ----- Fecha y Hora del Servidor
* ---- Espartaco Palma Martinez esparta@NO_SPAMportalfox.com
* ---- FUNCTION: ServerTime
* ---- RETURNS: Server DateTime, NULL if cannot get DateTime
* ---- RETORNA: Fecha y Hora Server, NULL si no puede obtenerlo
* ---- PARAMETERS: tcPath - TYPE: Character
* ---- Basandose en las recomendaciones de Alex Feldstein (MS MVP)
* ---- sobre como obtener la fecha y hora del servidor.
* ---- DATE: 03/DIC/2002 For Use in Visual FoxPro.
* ---- Sample:
* ---- ltFecha = FechaHora("F:/")
* ---- ltFecha = FechaHora("//SERVER/VALUACION/")
* ---- NOTE: If you are using minor versions of VFP7, use FoxTools
* ---- NOTA: Si esta usando versiones menores a VFP7, use FoxTools
******************************************************************
FUNCTION ServerTime (tcPath)
LOCAL ltFileTime
tcPath = IIF(TYPE('tcPath') # 'C', SPACE(0),ADDBS(tcPath))
lcFile = tcPath+SUBSTR(SYS(2015), 4) +".tmp"
IF STRTOFILE("Getting Hour/Obteniendo la Hora",lcFile) > 0
ltFileTime = FDATE(lcFile,1)
ERASE (lcFile)
RETURN ltFileTime
ENDIF
RETURN NULL

*!* pc_serv="Servidor" habria que poner:

*!* pc_serv="**Servidor" (cambiar los asteriscos por barras invertidas,
*!* ya que no se como ponerlas aqui en la web)

*!* y si ponemos asi:

*!* run /n7 NET TIME &pc_serv /SET /YES

Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar