Information générale
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
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
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