Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Error with Agetfileversion
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows 7
Divers
Thread ID:
01487359
Message ID:
01487365
Vues:
40
when i say fail, i mean the "IF" statement is failing and the messagebox fires.

>Are you getting an error? If yes, what is the error?
>
>>workstation have Windows 7 Professional and all are able to retrieve the version number of exe file except 1
>>
>>Code is
>>----------------------------------------------
>>
>>lcExeFileName = SYS(5)+SYS(2003)+'\path\programname.exe'
>>
>>If Agetfileversion(aCver,lcExeFileName) > 0 && we have version
>> this.Caption = ALLTRIM(this.Caption) + ' ...........ver('+ALLTRIM(aCver(4))+')'
>> this.p_version = '..ver('+ALLTRIM(aCver(4))+')'
>>ELSE
>> MESSAGEBOX('Could not get version',0+4096,'Missing Version',1500)
>> this.p_version = 'unknown'
>>ENDIF
>>
>>---------------------------------------------
>>
>>the same path and exactly the same programname.exe
>>
>>However, one workstation fails
>>
>>any suggestions on what to look for?
>>
>>thanks in advance
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform