VB.Net - Audio Files Album Arts

Basically I'm despaired.

I've tried everything I've seen on every Google result concerning this problem.

I have a program that is very similar to WMP. It's using axWMP control to play songs and etc.

I've got many types of audio files, mp3, m4a, wma, etc. I've successfully coded something to get the tags: track#, title, album, artist, year. The only thing I can't seem to get correctly done is the album art.

The code I'm using only works for some mp3 files. Of course it's because I'm using UltraID3 and that would only work for mp3.

Here's the code:

                Dim MP3Tag As New UltraID3

            albumArt = Nothing

            Try
                MP3Tag.Read(path)
                Try
                    Dim pics = MP3Tag.ID3v2Tag.Frames.GetFrames(CommonMultipleInstanceID3v2FrameTypes.Picture)
                    albumArt = CType(pics(0), ID3v2PictureFrame).Picture
                Catch ex As Exception
                    'albumArt = FetchAlbumImage(j, path)
                End Try
            Catch ex As Exception
            End Try

But then I tried fetching the album art through the WMP control itself, just like I did for the rest of the tags :

    Function FetchAlbumArt(index As Integer, filePath As String) As Image

    FetchAlbumArt = Nothing

    Dim pic As WMPLib.IWMPMetadataPicture = Nothing

    Dim tWMP As New WindowsMediaPlayer

    tWMP.currentMedia = Me.WMP.currentPlaylist.Item(index)

    For i = 0 To tWMP.currentMedia.getAttributeCountByType("WM/Picture", "")
        Try
            pic = tWMP.currentMedia.getItemInfoByType("WM/Picture", "", i)
            Exit For
        Catch ex As Exception
            Debug.Print(Err.Description)
        End Try
    Next

    If Not IsNothing(pic) Then

        Dim path As String = Environment.GetFolderPath(Environment.SpecialFolder.InternetCache)
        Dim fInfo, fInfos() As IO.FileInfo
        Dim dInfo As IO.DirectoryInfo

        dInfo = New IO.DirectoryInfo(path)
        fInfos = dInfo.GetFiles("*" & FindStringBeforeLastIndexOfChar(FindStringAfterLastIndexOfChar(pic.URL, "/"), ".", False) & "*", IO.SearchOption.AllDirectories)

        For Each fInfo In fInfos
            If fInfo.Name Like "*" & FindStringBeforeLastIndexOfChar(FindStringAfterLastIndexOfChar(pic.URL, "/"), ".", False) & "*" Then
                System.IO.File.Copy(fInfo.FullName, dbFolderPath & "\temp.jpg", True)
            End If
        Next

        Dim albumArt As Image
        albumArt = Bitmap.FromFile(dbFolderPath & "\temp.jpg")

        FetchAlbumArt = albumArt

    End If

End Function

This function goes into the internet explorer temp folder and copy the image outside in order to use it. It works, but then again only for the same mp3 files.

I've read about the Apple Quick Time control I could use for m4a files, but I couldn't get anything out of it.

One thing that really bothers me is that it works for mp3 but not all of them.

The only clue I have to why it's not working is this : "Index was out of range. Must be non-negative and less than the size of the collection. Parameter name: index" on line MP3Tag.Read(path) above.

I know it's not impossible as WMP 12 itself displays the album arts for any file just fine.

Thanks for helping me out.