Uma das marcas de metadados que podem , opcionalmente, ser anexados a arquivos no Windows é um número de versão . Esse valor oferece uma maneira rápida para diferenciar as versões mais recentes e mais antigas do mesmo arquivo. E desde VBS tem acesso a versões de arquivos , você pode usar VBS para automatizar a reação de um sistema preciso para novas versões de arquivos tornando-se disponível. Instruções
1

Abra seu editor de texto favorito
2

Cole o seguinte script: .

Dim FSO = CreateObject (" Scripting.FileSystemObject " )

dim file1 = " C: \\ file.exe "

fraca arquivo2 = " C: \\ file2.exe "

dim file1version , file2version

se ( FSO.FileExists ( arquivo1 ) E FSO.FileExists ( file2 ) então

file1version = FSO.GetFileVersion ( file1 )

file2version = FSO.GetFileVersion ( arquivo2 )

fraca result = StrComp ( file1version , file2version , vbTextCompare )

se o resultado > 0 então

WScript.StdOut.WriteLine ("File 2 é uma versão mais recente . " )

ElseIf resultado < 0 então

WScript.StdOut.WriteLine ("File 1 é uma versão mais recente . " )

Else

WScript.StdOut.WriteLine (" Ambas as versões são os mesmos. " )

acabam se

acabam se

Este primeiro verifica que existem dois arquivos. Se o fizerem, ele usa o " StrComp "(para" Cordas função de comparação ") para comparar as duas versões de arquivos. Finalmente , ele imprime um resultado para a saída padrão .
3

Salve seu trabalho.
< br >