FileVersionInfo.OriginalFilename : FileVersionInfo « System.Diagnostics « VB.Net by API

1. VB.Net by API
2. System.Diagnostics
3. FileVersionInfo

FileVersionInfo.OriginalFilename

  
Imports System
Imports System.IO
Imports System.Data
Imports System.Drawing
Imports System.Diagnostics
Imports System.ComponentModel


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.Comments)
        Console.WriteLine(m_File.CompanyName)
        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

   
    
  

Related examples in the same category