WDForge.org - Forums

[WD75] Récupérer la version d'une DLL à l'aide des API

Sujet: [WD75] Récupérer la version d'une DLL à l'aide des API
par aja sur 16/8/2004 19:42:17

Bonjour!

Je modifie WDSETUP afin d'ajouter l'installation d'une autre application celle-ci écrite en VB. Je dois installer des DLL, celles-ci ne doivent pas écraser celles qui sont sur le PC si elles sont moins récentes. J'essais donc de récupérer la version des DLL mais je n'y arrive pas. Je récupère toujours la même valeur et ce n'est pas normal.

Voici le code que j'utilise :

li_ret is int

sBuffer est un tableau dynamique
lDummy is int
lBufferLen is int
lVerPointer is int
lVerbufferLen is int

lBufferLen = API("Version.dll","GetFileVersionInfoSizeA","c:\windows\system32\CMDLGFR.DLL", lDummy)
IF lBufferLen < 1 THEN
// Pas de version disponible
END

sBuffer = allouer un tableau dynamique lBufferLen int
li_ret = AppelDLL32("version.dll", "GetFileVersionInfoA", "c:\windows\system32\CMDLGFR.DLL",0,lBufferLen,sBuffer[1])
li_ret = AppelDLL32("version.dll", "VerQueryValueA", sBuffer[1], "\", lVerPointer, lVerbufferLen)

Si quelqu'un peut m'aider

Merci beaucoup!
Annie