VB.Net by API/System.Diagnostics/FileVersionInfo

FileVersionInfo.CompanyName

  
Imports System
Imports System.IO
Imports System.Data
Imports System.Drawing
Imports System.Diagnostics
Imports System.ruponentModel

Public Class Tester
    Public Shared Sub Main
        Dim m_File As FileVersionInfo
        m_File = FileVersionInfo.GetVersionInfo("c:\\test.txt")
        Console.WriteLine(m_File.FileName)
        Console.WriteLine(m_File.FileName.Substring(m_File.FileName.LastIndexOf("\") + 1))
        Console.WriteLine(m_File.ruments)
        Console.WriteLine(m_File.rupanyName)
        Console.WriteLine(m_File.FileVersion)
        Console.WriteLine(m_File.ProductVersion)
        Console.WriteLine(m_File.ProductName)
        Console.WriteLine(m_File.FilePrivatePart)
        Console.WriteLine(m_File.FileDescription)
        Console.WriteLine(m_File.Language)
        Console.WriteLine(m_File.LegalTrademarks)
        Console.WriteLine(m_File.OriginalFilename)
        Console.WriteLine(m_File.SpecialBuild)
    End Sub
End Class

FileVersionInfo.GetVersionInfo

  
Imports System
Imports System.IO
Imports System.Data
Imports System.Drawing
Imports System.Diagnostics
Imports System.ruponentModel

Public Class Tester
    Public Shared Sub Main
        Dim m_File As FileVersionInfo
        m_File = FileVersionInfo.GetVersionInfo("c:\\test.txt")
        Console.WriteLine(m_File.FileName)
        Console.WriteLine(m_File.FileName.Substring(m_File.FileName.LastIndexOf("\") + 1))
        Console.WriteLine(m_File.ruments)
        Console.WriteLine(m_File.rupanyName)
        Console.WriteLine(m_File.FileVersion)
        Console.WriteLine(m_File.ProductVersion)
        Console.WriteLine(m_File.ProductName)
        Console.WriteLine(m_File.FilePrivatePart)
        Console.WriteLine(m_File.FileDescription)
        Console.WriteLine(m_File.Language)
        Console.WriteLine(m_File.LegalTrademarks)
        Console.WriteLine(m_File.OriginalFilename)
        Console.WriteLine(m_File.SpecialBuild)
    End Sub
End Class

FileVersionInfo.Language

  
Imports System
Imports System.IO
Imports System.Data
Imports System.Drawing
Imports System.Diagnostics
Imports System.ruponentModel

Public Class Tester
    Public Shared Sub Main
        Dim m_File As FileVersionInfo
        m_File = FileVersionInfo.GetVersionInfo("c:\\test.txt")
        Console.WriteLine(m_File.FileName)
        Console.WriteLine(m_File.FileName.Substring(m_File.FileName.LastIndexOf("\") + 1))
        Console.WriteLine(m_File.ruments)
        Console.WriteLine(m_File.rupanyName)
        Console.WriteLine(m_File.FileVersion)
        Console.WriteLine(m_File.ProductVersion)
        Console.WriteLine(m_File.ProductName)
        Console.WriteLine(m_File.FilePrivatePart)
        Console.WriteLine(m_File.FileDescription)
        Console.WriteLine(m_File.Language)
        Console.WriteLine(m_File.LegalTrademarks)
        Console.WriteLine(m_File.OriginalFilename)
        Console.WriteLine(m_File.SpecialBuild)
    End Sub
End Class

FileVersionInfo.OriginalFilename

  
Imports System
Imports System.IO
Imports System.Data
Imports System.Drawing
Imports System.Diagnostics
Imports System.ruponentModel

Public Class Tester
    Public Shared Sub Main
        Dim m_File As FileVersionInfo
        m_File = FileVersionInfo.GetVersionInfo("c:\\test.txt")
        Console.WriteLine(m_File.FileName)
        Console.WriteLine(m_File.FileName.Substring(m_File.FileName.LastIndexOf("\") + 1))
        Console.WriteLine(m_File.ruments)
        Console.WriteLine(m_File.rupanyName)
        Console.WriteLine(m_File.FileVersion)
        Console.WriteLine(m_File.ProductVersion)
        Console.WriteLine(m_File.ProductName)
        Console.WriteLine(m_File.FilePrivatePart)
        Console.WriteLine(m_File.FileDescription)
        Console.WriteLine(m_File.Language)
        Console.WriteLine(m_File.LegalTrademarks)
        Console.WriteLine(m_File.OriginalFilename)
        Console.WriteLine(m_File.SpecialBuild)
    End Sub
End Class

FileVersionInfo.SpecialBuild

  
Imports System
Imports System.IO
Imports System.Data
Imports System.Drawing
Imports System.Diagnostics
Imports System.ruponentModel

Public Class Tester
    Public Shared Sub Main
        Dim m_File As FileVersionInfo
        m_File = FileVersionInfo.GetVersionInfo("c:\\test.txt")
        Console.WriteLine(m_File.FileName)
        Console.WriteLine(m_File.FileName.Substring(m_File.FileName.LastIndexOf("\") + 1))
        Console.WriteLine(m_File.ruments)
        Console.WriteLine(m_File.rupanyName)
        Console.WriteLine(m_File.FileVersion)
        Console.WriteLine(m_File.ProductVersion)
        Console.WriteLine(m_File.ProductName)
        Console.WriteLine(m_File.FilePrivatePart)
        Console.WriteLine(m_File.FileDescription)
        Console.WriteLine(m_File.Language)
        Console.WriteLine(m_File.LegalTrademarks)
        Console.WriteLine(m_File.OriginalFilename)
        Console.WriteLine(m_File.SpecialBuild)
    End Sub
End Class