Como saber la fecha y la hora del ejecutable

[JoseGS]

Hola amigos del foro
Necesito saber que funcion debo utilizar para saber la fecha y la hora del ejecutable. He intentado utilizar filetime() y filedate() pero el compilador me envia un mensaje como que no existen...

Alguna idea

Gracias

[acuellar]

Asi:

Code: Select all

ExeOn:="C:\PROGRAMA.EXE"
HoraOn:=FILETIME(ExeOn)
FecExeOn:=dToS(FILEDATE(ExeOn))+Left(HoraOn,2)+Subs(HoraOn,4,2)+Right(HoraOn,2)
 

Saludos

Adhemar

[FiveWiDi]

Hola amigos del foro
Necesito saber que funcion debo utilizar para saber la fecha y la hora del ejecutable. He intentado utilizar filetime() y filedate() pero el compilador me envia un mensaje como que no existen...

Alguna idea

Gracias

/* *************************** */
Function dDateExe()
Local cFile := ""
Local aDir := {}
Local dEXE := Date()
cFILE := GetModuleFileName( GetInstance() )
aDIR := DIRECTORY( cFILE )
dEXE := aDIR[1] [3]
Return dEXE
/* *************************** */
/* *************************** */
Function cTimeExe()
Local cFile := ""
Local aDir := {}
Local tEXE := Time()
cFILE := GetModuleFileName( GetInstance() )
aDIR := DIRECTORY( cFILE )
tEXE := aDIR[1] [4]
Return tEXE
/* *************************** */

Saludos
Carlos G.

[JoseGS]

Gracias amigos lo voy a probar...