Un des balises de métadonnées qui peuvent éventuellement être attachés à des fichiers dans Windows est un numéro de version. Cette valeur fournit un moyen rapide pour différencier les versions plus récentes et plus d'un même fichier . Et depuis VBS a accès aux versions de fichiers, vous pouvez utiliser VBS pour automatiser la réaction d'un système prend aux nouvelles versions de fichiers deviennent disponibles . . Instructions 1 Ouvrez votre éditeur de texte favori 2 collez le script suivant : dim FSO = CreateObject (" Scripting.FileSystemObject " ) dim file1 = " C: \\ file.exe " dim file2 = " C: \\ file2.exe " dim file1version , file2version si ( FSO.FileExists ( file1 ) et FSO.FileExists ( file2 ) puis file1version = FSO.GetFileVersion ( file1 ) file2version = FSO.GetFileVersion ( file2 ) dim résultat = StrComp ( file1version , file2version , vbTextCompare ) si le résultat > 0 alors WScript.StdOut.WriteLine ("File 2 est une version plus récente . " ) ElseIf résultat < 0 alors WScript.StdOut.WriteLine ( "Fichier 1 est une version plus récente . " ) Else WScript.StdOut.WriteLine ( «Les deux versions sont les mêmes. " ) fin si fin si vérifie d'abord que les deux fichiers existent . S'ils le font, il utilise le " StrComp "(pour " Chaîne comparaison " ) la fonction de comparer les deux versions de fichiers. Enfin, il imprime un résultat sur la sortie standard . 3 Enregistrez votre travail . < br > Photos
|