MetadataExtractor - 未找到类型'List(Of Directory)'上的公共成员'OfType'

时间:2017-12-17 23:13:25

标签: .net vb.net metadata-extractor

此代码

svc 1

在某些页面上运行正常但在

处与其他页面冲突
Dim vImageFlag As Integer = 0
If System.IO.File.Exists(Row("Image")) Then
    vImageFlag = 1
    Dim vDirectories = MetadataExtractor.ImageMetadataReader.ReadMetadata(Row("Image"))
    Dim vSub = vDirectories.OfType(Of MetadataExtractor.Formats.Exif.ExifIfd0Directory)().FirstOrDefault
    If Not vSub Is Nothing Then
        Dim vOrientationObj = vSub.GetObject(MetadataExtractor.Formats.Exif.ExifDirectoryBase.TagOrientation)
        If Not vOrientationObj Is Nothing Then
            If Not vOrientationObj.Equals(DBNull.Value) Then
                vOrientationNumber = Convert.ToInt16(vOrientationObj)
                vOrientationFlag = 1
            End If
        End If
    End If

    For Each vDirectory In vDirectories
        vEXIF += vDirectory.Name & vbCr
        For Each vTag In vDirectory.Tags
            vEXIF += vbTab & " " & vTag.Name & " " & vTag.Description & vbCr
            IsEXIF = 1
        Next
    Next

End If

在任何时候路径都有一个图像 Debug

真的难倒这个 - 但它可能正盯着我的脸: - )

谢谢

Error point

堆栈跟踪

Dim vSub = vDirectories.OfType(Of MetadataExtractor.Formats.Exif.ExifIfd0Directory)().FirstOrDefault

0 个答案:

没有答案