ProductVersion
ProductVersion returns the product version property of a file if this information exists.
Syntax
ProductVersion
Returns
String.
Example
Displays the product version of the 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.ProductVersion
echo("Your Calc.exe Product version is : " & ver)
textfile.Close
End If
End Function