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...
Précédent
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement