GroupDocsGists
10/19/2017 - 11:37 AM

FormatRecognizer.vb

'For complete examples and data files, please go to https://github.com/groupdocsmetadata/GroupDocs_Metadata_NET
''' <summary>
''' Gets directory name and recognizes format of files in that directory
''' </summary>
''' <param name="directorPath">Directory path</param>
Public Shared Sub GetFileFormats(directorPath As String)
    Try
        ' path to the document
        directorPath = Common.MapSourceFilePath(directorPath)

        ' get array of files inside directory
        Dim files As String() = Directory.GetFiles(directorPath)

        For Each path__1 As String In files
            ' recognize file by it's signature
             Dim format As FormatBase = FormatFactory.RecognizeFormat(path__1)

            If format IsNot Nothing Then
                Console.WriteLine("File: {0}, type: {1}", Path.GetFileName(path__1), format.Type)
            End If
        Next
    Catch exp As Exception
        Console.WriteLine(exp.Message)
    End Try
End Sub