The following code runs successfully on multiple tracks but only the last track in SelectedSongList receives the artwork. Artwork in all tracks before the last track remain unchanged.
Code: Select all
Set tracklist = SDB.SelectedSongList
For i = 0 To tracklist.Count - 1
Set NewArt = tracklist.Item(i).AlbumArt.AddNew
NewArt.ItemStorage = 1
NewArt.PicturePath = "C:\testart.jpg"
Next 'i
tracklist.UpdateAll
Code: Select all
Set tracklist = SDB.SelectedSongList
For i = 0 To tracklist.Count - 1
Set NewArt = tracklist.Item(i).AlbumArt.AddNew
NewArt.ItemStorage = 1
NewArt.PicturePath = "C:\testart.jpg"
tracklist.Item(i).UpdateDB
Next 'i
This is a very simplified version of the code. In the full code every track should receive a unique artwork instead of all receiving the same file, but the result is the same. Is there something that I'm doing wrong?
MMW 1821 running on Windows 10.