usmanazizgroupdocs
9/20/2016 - 8:56 AM

RuntimeFormatDetection.vb

' For complete examples and data files, please go to https://github.com/groupdocs-metadata/GroupDocs.Metadata-for-.NET
'string directoryPath = @"C:\\download files";
Dim files As String() = Directory.GetFiles(directoryPath)

For Each path__1 As String In files
    Dim metadata As Global.GroupDocs.Metadata.Metadata = MetadataUtility.ExtractSpecificMetadata(path__1, MetadataType.Document)
    ' check if file has document format
    If metadata Is Nothing Then
        Continue For
    End If

    Console.WriteLine("File: {0}" & vbLf, Path.GetFileName(path__1))

    Dim values As IEnumerable(Of KeyValuePair(Of [String], PropertyValue)) = DirectCast(metadata, IEnumerable(Of KeyValuePair(Of [String], PropertyValue)))

    For Each keyValuePair As KeyValuePair(Of String, PropertyValue) In values
        Console.WriteLine("Metadata: {0}, value: {1}", keyValuePair.Key, keyValuePair.Value)
    Next
    Console.WriteLine(vbLf & "**************************************************" & vbLf)
Next