FileVersion

FileVersion devuelve la versión de un archivo si tiene asignadas las propiedades necesarias.

Sintaxis

FileVersion (cadena)

Devolución

Versión del archivo, si existe dicha información (devuelve una cadena).

Ejemplo

Muestra la versión de archivo de calc.exe:

Function Main

Dim textfile As Object

Dim ver As String

Set textfile = File.Connect("127.0.0.1")

If textfile.Open("c:\windows\system32\calc.exe", GENERIC_READ, Open_Existing) Then

ver = Textfile.FileVersion

echo("Su versión de archivo Calc.exe es : " & ver)

textfile.Close

End If

End Function