9/20/2016 - 8:56 AM


' For complete examples and data files, please go to
Dim jpegFormat As New JpegFormat(Common.MapSourceFilePath(filePath))

' get EXIF data
Dim exifInfo As ExifInfo = jpegFormat.GetExifInfo()
If exifInfo IsNot Nothing Then
    ' get specific tag using indexer
    Dim artist As TiffAsciiTag = DirectCast(exifInfo(TiffTagIdEnum.Artist), TiffAsciiTag)
    If artist IsNot Nothing Then
        Console.WriteLine("Artist: {0}", artist.Value)
    End If
End If