Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
I need the date of the .exe that is running
Message
 
To
09/05/2002 11:31:16
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00654413
Message ID:
00654625
Views:
11
Exactly what I needed. I don't know why it never dawned on me to use ADIR (Duh...)

Thanks...
Tommy

>Tommy,
>
>>Is there a way to get the date of the exe that is running? I need to show the version, build number and the date it was created. I have the first 2 but am having difficulty getting the date.
>
>Please try this sequence:
>
> Dimension aExeVer [1], aExeAtr [1]
>
> cFullProgName = Sys    (16, 0)
> cExecProgName = Substr (cFullProgName, At (" ", cFullProgName, 2) + 1)
>
> aDir            (aExeAtr, cExecProgName)
> aGetFileVersion (aExeVer, cExecProgName)
>
> MessageBox ("  Version: "    +       aExeVer [4]  + ;
>             "  Build Date: " + DtoC (aExeAtr [3]) + ;
>             "  Build Time: " +       aExeAtr [4])
>
>Hope it helps,
>
>Fernando
Previous
Reply
Map
View

Click here to load this message in the networking platform