La Web del Programador: Comunidad de Programadores
 
    Pregunta:  63536 - SACAR LA FECHA DESDE EL SERVIDOR
Autor:  Omar Figueroa
Estoy construyendo una aplicacion para servicio tecnico, pero me piden que las fechas que maneje el sistema se cargen desde el servidor y no del pc, para que no las cambien.

en otras palabras el date, pero no del pc sino del servidor o la base de datos.

he intentado encontrar algo pero nada como lo que necesito.

agradecere sus comentarios.

  Respuesta:  Arturo Fdez-Pacheco Conesa
Yo utilizo los siguiente para obtener la fecha del servidor donde estan los datos.

Utilizo una conexion ADODB a un servidor externo con base de datos MySql y ejecuto lo siguiente:

Dim conexion as ADODB.Connection
Dim rs AS ADODB.Recordset
Dim fecha_servidor as String

Set rs = conexion.Execute("SELECT NOW()")

fecha_servidor = Format(rs(0), "dd/mm/yyyy")

rs.Close
Set rs=Nothing

  Respuesta:  Omar Figueroa
Sres., no pude encontrar una solucion para hacer esto, pero por si les sirve lo que se implemento finalmente fue mas simple :

pcs con xp y cuentas limitadas las cuales no tienen acceso a cambiar el ambiente de trabajo.

Gracias de todas maneras.

Atte.,

Omar Figueroa M.