Necesito saber fecha y hora de creacion de EXE

[Gelsen]

AMIGOS; Por motivos de actualizacion, necesito saber la hora y fecha de creacion de mi aplicaciones EXE, para poder al momento de compilar nuevo exe, ejecutar algunos comando de modificacion de dbfs y/o archivos dll... Agradesco su amable respuesta.

[Walter R. Ojeda Valiente]

Utiliza la función ADIR() con el nombre completo de tu .EXE

Saludos.

Walter.

---

Date: Tue, 3 Jul 2012 14:34:53 -0700
From: gel...@hotmail.com
To: publice...@googlegroups.com
Subject: [vfp] Necesito saber fecha y hora de creacion de EXE

[Daniel Sánchez]

Puedes usar esta función:

FUNCTION InfoFile

PARAMETERS cNameFile as Character, oVar as Object 

lok=.f.

ovar.addproperty("NameFile","")

ovar.addproperty("Size",0)

ovar.addproperty("DateLastModified",CTOD("//"))

ovar.addproperty("DateCreated",CTOD("//"))

ovar.addproperty("DateLastAccessed",CTOD("//"))

ovar.addproperty("Drive",0)

ovar.addproperty("ParentFolder","")

ovar.addproperty("Path","")

ovar.addproperty("ShortName","")

ovar.addproperty("ShortPath","")

ovar.addproperty("Type","")

oFileSystem=Createobject("Scripting.FileSystemObject")

If oFileSystem.FileExists(cNameFile)

     ofile=oFileSystem.GetFile(cNameFile)

     ovar.nameFile=ofile.name

     ovar.datelastaccessed=ofile.datelastaccessed

     ovar.datecreated=ofile.datecreated

     ovar.dateLastModified=ofile.DateLastModified

     ovar.size=ofile.size

     ovar.drive=ofile.drive

     ovar.parentfolder=ofile.parentfolder

     ovar.path=ofile.path

     ovar.shortname=ofile.shortname

     ovar.shortpath=ofile.shortpath

     ovar.type=ofile.type

     lok=.t.

Endif

RETURN lok

que puedes invocar así

oMyfile=createobject("custom")

lok=infofile("inicio.prg",oMyfile)

? oMyfile.namefile

? oMyfile.datecreated 

? oMyfile.dateLastModified 

? oMyfile.datelastaccessed 

? oMyfile.size 

Saludos

--
Daniel Sánchez Escobar
Investigación y Desarrollo
Reset Software & Sistemas
Móvil +051-949398047
Trujillo - Perú

[edgar suarez kummers]

Se le arrima la flechita del mouse al ícono del EXE y en en cuadro amarillo pálido se ven la fecha y hora de la última modificación.

ESK 

--

please CLICK here

edgar suarez kummers

[Walter R. Ojeda Valiente]

También haciendo click sobre la opción "Propiedades" del menú contextual que aparece cuando haces click sobre el objeto con el botón derecho, pero eso no era lo que preguntó.

Saludos.

Walter.

---

Date: Wed, 4 Jul 2012 00:26:06 +0200
Subject: Re: [vfp] Necesito saber fecha y hora de creacion de EXE
From: edgark...@gmail.com
To: publice...@googlegroups.com

[edgar suarez kummers]

ok, ok, ok ,...., Walter, esa respuesta se parece a la acusación a Assange por parte de la sueca que dice que hubo violación porque aunque ella dijo sí, sí, sí, me abrumas ... el australiano no se puso el condón ...

saludos

ESK

[Walter R. Ojeda Valiente]

No Edgar, no entendiste. Lo que se preguntó es como saber la fecha y la hora "programáticamente", para poder actualizar el .EXE en caso de ser necesario, pero sin intervención humana o sea automáticamente.

Fíjate que muchos programas hacen eso, te avisan "Hay una nueva versión disponible ¿deseas descargarla?". Y te puedo asegurar que no hay un tipo del otro lado moviendo la flechita del mouse en el escritorio de tu computadora sobre el icono del programa y viendo los datos en el cuadrito amarillo pálido.

Saludos.

Walter.

---

Date: Wed, 4 Jul 2012 00:34:21 +0200

[edgar suarez kummers]

ok, ok, ok .............. entendido ... programáticamente ...

ESK

[Daniel Sánchez]

Edgar no confundir programáticamente con problemáticamente. Y para cualquiera de los casos hacerlo en Visual FoxPro.

[edgar suarez kummers]

ok, ok, ok ... programáticamente  y con Visual FoxPro ... clarísimo ...

ESK

[Gelsen]

Muchas gracias por todas las respuestas, la solucion me dio Walter ... gracias y vamos el zorro no debe morir...

[Hugo]

AGETFILEVERSION()

[Alex Vargas]

Te habría quedado mejor decir, Visual FoxPro no debe morir.

Saludos

Alex A. Vargas

[car0566]

El martes, 3 de julio de 2012, 15:34:53 (UTC-6), Gelsen escribió:

AMIGOS; Por motivos de actualizacion, necesito saber la hora y fecha de creacion de mi aplicaciones EXE, para poder al momento de compilar nuevo exe, ejecutar algunos comando de modificacion de dbfs y/o archivos dll... Agradesco su amable respuesta.

 

arreglo1 =ADIR(fm, 'miejecutable.exe' ,"S",1)

mfecvers =dtoc(fm(1,3))+" "+fm(1,4)

Y eso es todo. Ya esta probado y funciona

 

?mfecvers

 

[Ricardo Pina]

Car0566

No quiero desilusionarte, pero acabas de responder una pregunta del 03/07/2012, seg{un algunos ya se termino el mundo ..

Saludos

--

            

                   Ricardo Pina

Desarrollo y Servicios Informáticos

                  Profesionales
               www.dsip.com.ar

 

 

[Fidel Charny]

Y da una respuesta que estaba en el hilo desde el princio.