I’m trying to write new data into the mp3 tags using Monkeybread Taglib class and the “Year” tag is not written.
This is my code:
Dim mp3 As New FolderItem(PadNaarSongLok, FolderItem.PathTypeURL)
if mp3 <> nil then
Var tag As New TagLibFileRefMBS(mp3)
Var dic As Dictionary = tag.Properties
'Break // inspect dictionary
dic.Value("TITLE") = tfTitle.Text
dic.Value("TRACK") = 1
dic.Value("YEAR") = tfyear.Text.ToInteger
dic.Value("ARTIST") = tfArtist.Text
dic.Value("ALBUM") = tfAlbum.Text
dic.Value("COMMENT") = tfOpmerkingen.Text
dic.Value("GENRE") = tfGenre.Text
tag.SetProperties(dic)
If tag.Save Then
MsgBox "Tag saved OK"
Else
MsgBox "Failed to save"
End If
end if