Estimados Colegas,
¿ Como puedo obtener La fecha de mi ejecutable ?
Gracias a Todos.
Fecha de mi aplicacion
Moderator: Rathinagiri
- SALINETAS24
- Posts: 667
- Joined: Tue Feb 27, 2018 3:06 am
- DBs Used: DBF
- Contact:
Re: Fecha de mi aplicacion
Hola Asesomix.
Tienes dos funciones, aDir() y Directory()
Seria algo así.
Tienes dos funciones, aDir() y Directory()
Seria algo así.
Code: Select all
LOCAL aFichero:={}
aFichero:=DIRECTORY("NOMBREAPLIACION.EXE")
msgbox("Nombre",aFichero[1,1])
msgbox("Tamaño",aFichero[1,2])
msgbox("Fecha",aFichero[1,3])
msgbox("Hora",aFichero[1,4])
Como dijo el gran pensador Hommer Simpson..., - En este mundo solo hay 3 tipos de personas, los que saben contar y los que no.
Re: Fecha de mi aplicacion
Es Cierto. Muchas Gracias.
- Pepe Ruano
- Posts: 65
- Joined: Fri Aug 16, 2013 11:31 am
- DBs Used: DBF
- Location: Almansa, Albacete - Spain
- Contact:
Re: Fecha de mi aplicacion
Un poquito más adornado, por si te sirve:
Espero te sea útil
Code: Select all
*-----------------------------------------------------------------------------*
STATIC FUNC InfoPrograma()
*-----------------------------------------------------------------------------*
LOCAL aFichero:={}
aFichero:=DIRECTORY("TUPROGRAMA.EXE")
IF LEN(aFichero) <> 0
MSGINFO("Nombre de la aplicación : "+UPPER(aFichero[1,1])+CHR(13)+CHR(13)+;
"Tamaño del Fichero .....: "+TRANSFORM(STR(aFichero[1,2])," 9999,999")+" Bytes"+CHR(13)+CHR(13)+;
"Fecha de Creación ......: "+DTOC(aFichero[1,3])+CHR(13)+CHR(13)+;
"Hora de Creación .......: "+aFichero[1,4]+CHR(13)+CHR(13)+;
" Vers. 1.0 © Tu nombre Autor 2019 ","Datos de su Programa TUPROGRAMA")
ELSE
MSGINFO("No se ha encontrado Información del Programa")
ENDIF
Retu Nil
- mustafa
- Posts: 1158
- Joined: Fri Mar 20, 2009 11:38 am
- DBs Used: DBF
- Location: Alicante - Spain
- Contact:
Re: Fecha de mi aplicacion
Hola amigo Pepe
Muy Bueno
Saludos
Mustafa
Muy Bueno
Saludos
Mustafa
- Pepe Ruano
- Posts: 65
- Joined: Fri Aug 16, 2013 11:31 am
- DBs Used: DBF
- Location: Almansa, Albacete - Spain
- Contact:
Re: Fecha de mi aplicacion
Hola amigo Mustafa, te sigo en los posts que publicas (como siempre muy buenos) en esta gran comunidad llena de amigos y aprovecho para enviarte un gran saludo y desearte todo lo mejor para este 2019, al igual que a todos los componentes de HMGFORUM.