Or if you are using a version pre VFP6.0 use something like the following:

set library to "FOXTOOLS.FLL" ADDITIVE
dimension fileinfoarray(12)
if getfileversion(pathtofile+"nameoffile.exe",@fileinfoavearray)=0 then
version=alltrim(fileinfoarray(4))
else
version="BETA"
endif
release fileinfoarray

Version VFP6.0 also has:
=AGETFILEVERSION(ArrayName, cFileName)

Hope this help...