In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Hora y fecha servidor

Foro público de Xailer en español
Responder
pacoelche
Mensajes: 141
Registrado: Mar Jul 11, 2006 10:32 am

Hora y fecha servidor

Mensaje por pacoelche »

En una red de ordenadores, ¿hay alguna función para saber, desde un
terminal, la hora y fecha del servidor?
Gracias
Francisco Martínez
joselalinf
Mensajes: 291
Registrado: Jue Ene 31, 2013 1:10 pm

Hora y fecha servidor

Mensaje por joselalinf »

Francisco,
hace tiempo puse en el foro una librerí­a para hacerlo. Busca "NetRemoteTOD"
o ServerInfo en el foro.
Intentaré subir esta noche una versión actualizada.
Saludos,
José Lalí­n
joselalinf
Mensajes: 291
Registrado: Jue Ene 31, 2013 1:10 pm

Hora y fecha servidor

Mensaje por joselalinf »

Francisco,
aquí­ tienes el módulo actualizado. Añádelo a tu proyecto.
WITH OBJECT TServerInfo():New()
:cServer := "NombreDelServidor"
IF :Refresh()
MsgInfo( :cDate )
MsgInfo( :cTime )
ENDIF
END
Saludos,
José Lalí­n
--
joselalinf
Mensajes: 291
Registrado: Jue Ene 31, 2013 1:10 pm

Hora y fecha servidor

Mensaje por joselalinf »

Hola,
olvidé decir que no hace falta enlazar ninguna librerí­a para usar el módulo.
Si alguien usaba una versión antigua y quiere cambiar a esta puede quitar
libnetapi32.a de la lista de librerí­as del proyecto puesto que ya no es
necesaria.
Saludos,
José Lalí­n
pacoelche
Mensajes: 141
Registrado: Mar Jul 11, 2006 10:32 am

Hora y fecha servidor

Mensaje por pacoelche »

José, perdona mi ignorancia pero no me aclaro.
El fichero que me adjuntas ¿Hay que enlazarlo de alguna forma en concreto?, te lo digo porque me lanza error al compilar el código que me has enviado.
Si te vale de algo utilizo una versión de xailer un poco antigua: 1.9
Un saludo y mil gracias por tu colaboración
Francisco Martí­nez
"José Lalí­n" <joselalinf@gmail.com> escribió en el mensaje news:5187ee0e$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Francisco,
aquí­ tienes el módulo actualizado. Añádelo a tu proyecto.
WITH OBJECT TServerInfo():New()
:cServer := "NombreDelServidor"
IF :Refresh()
MsgInfo( :cDate )
MsgInfo( :cTime )
ENDIF
END
Saludos,
José Lalí­n
--
joselalinf
Mensajes: 291
Registrado: Jue Ene 31, 2013 1:10 pm

Hora y fecha servidor

Mensaje por joselalinf »

Francisco,
es para Xailer 3/MinGW y la versión que tienes de Xailer usa Borland C++
para compilar.
Saludos,
José Lalí­n
pacoelche
Mensajes: 141
Registrado: Mar Jul 11, 2006 10:32 am

Hora y fecha servidor

Mensaje por pacoelche »

Muchas gracias.
Próximamente quiero comprar la última versión de xailer.
Ya te pediré nueva ayuda si sigo teniendo problemas.
De todas formas he visto unas instrucciones en modo consola que parece que hacen lo que quiero: NET TIME servidor /SET /YES. Voy a probar.
De nuevo te agradezco tu colaboración.
Un saludo
Francisco Martí­nez
"José Lalí­n" <joselalinf@gmail.com> escribió en el mensaje news:518a27a9$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Francisco,
es para Xailer 3/MinGW y la versión que tienes de Xailer usa Borland C++
para compilar.
Saludos,
José Lalí­n
--
Responder