September 19

iTunes – List Dead Tracks – To File

this script will list all dead tracks in your iTunes library in a file called “DeadTracks.txt”

/* by Calen Fretts */ var ITTrackKindFile = 1; var iTunesApp = WScript.CreateObject("iTunes.Application"); var tracks = iTunesApp.LibraryPlaylist.Tracks; var numTracks = tracks.Count; var matchTracks = 0; var fso = new ActiveXObject("Scripting.FileSystemObject"); var FILE_NAME = "DeadTracks.txt"; var myFile = fso.CreateTextFile(FILE_NAME); WScript.Echo("Finding dead tracks..."); while (numTracks != 0) { var currTrack = tracks.Item(numTracks); // is this a track? if (currTrack.Kind == ITTrackKindFile) { if (currTrack.Location == "") { myFile.WriteLine("" + currTrack.Artist + " - " + currTrack.Album + " - " + currTrack.TrackNumber + " - " + currTrack.Name + ""); matchTracks++; } } numTracks--; } myFile.Close(); if (matchTracks == 0) { WScript.Echo("No dead tracks."); myFile = fso.GetFile(FILE_NAME); myFile.Delete(); } else { WScript.Echo("Found " + matchTracks + " dead tracks - see the following file: " + FILE_NAME); }

copy the code into a new text file, and rename its extension to “.js”. if you post this code anywhere else, please be sure to give me credit by linking back to this site. got questions or improvements? leave a comment!

Category: geek, iTunes | Comments Off on iTunes – List Dead Tracks – To File
September 12

iTunes – No Artwork To Playlist

over the years, I’ve written a few custom scripts to do my electronic dirty work. some of these are iTunes scripts, and I think others will find them useful as well. copy the following code into a new text file, and rename its extension to “.js”

/* by Calen Fretts */ var ITTrackKindFile = 1; var iTunesApp = WScript.CreateObject("iTunes.Application"); var tracks = iTunesApp.LibraryPlaylist.Tracks; var numTracks = tracks.Count; var matchTracks = 0; var myNewPlaylistName = "---------NO ARTWORK"; var myNewPlaylist = iTunesApp.CreatePlaylist(myNewPlaylistName); WScript.Echo("Finding tracks with no artwork..."); while (numTracks != 0) { var currTrack = tracks.Item(numTracks); // is this a track? if (currTrack.Kind == ITTrackKindFile) { if (currTrack.Artwork.Count == 0) { var bSuccess = myNewPlaylist.AddTrack(currTrack); matchTracks++; } } numTracks--; } if (matchTracks == 0) { myNewPlaylist.Delete(); WScript.Echo("No tracks found."); } else { WScript.Echo("Found " + matchTracks + " tracks. Added to playlist '" + myNewPlaylistName + "'."); }

if you post this code anywhere else, please be sure to give me credit by linking back to this site. got improvements? leave a comment!

Category: geek, iTunes | Comments Off on iTunes – No Artwork To Playlist