DIMENSION aFiles[1] AGETFILEVERSION(aFiles,"VFP9.EXE") ? EVAL("0x"+LEFT(aFiles[15],4)) ** Returns 1033 for US version>The array is one-dimentional
>GTBversion = aFiles[4]
>
>>Thanks Tore. Your lead led me to write this . . . which works for what I need.>>Private GTBversion >>DIMENSION aFiles[1] >>AGETFILEVERSION(aFiles,"GTB.EXE") >>GTBversion = aFiles(15,4) >>>>
>>>>Object.VersionNumber[ = cBuildNumber] >>>>>>>>With no success so far.
>>>=AGETFILEVERSION(temp,'yourfile.exe') >>>thisform.AddProperty('version',temp(4)) && Thisform.version= version number >>>