Voici un exemple pour trouver la version du bloc-notes :
Dim fso, logiciel_name, file_version
Set fso = CreateObject("Scripting.FileSystemObject" )
logiciel_name = "C:\Windows\System32\notepad.exe"
file_version = fso.GetFileVersion(logiciel_name)
WScript.Echo "Version = " & file_version & "."
|
Il faut copier ces lignes dans un fichier texte qu'on appellera, par exemple GetVer1.vbs.
Ensuite, on double clique dessus pour l'exécuter.
Il affiche "Version = 6.1.7600.16385." chez moi.
Je vais voir le fichier exécutable pour vérifier.
Je clique droit sur notepad.exe. Je choisis l'option "Propriétés", puis l'onglet "Détails", et je vois bien cette valeur pour la version.
Ensuite, il faudra extraire le début de la version, le convertir en numérique, et le comparer avec "1.1"
Puis il faudra faire l'installation par :
Set objShell = Wscript.CreateObject("Wscript.Shell" )
objShell.Run "cmd /c prg_instal.exe param1 param2 >" & logfile, 0, True |
Message édité par olivthill le 06-11-2013 à 00:35:09