How to get rid of album rating?

Here:

This kinda shows that your script didn't work as supposed.

The are all the tracks that are problematic for me.

I think that I'm able to clear the track ratings in the iPod though, they show there and it lets me change them.

By doing so, the album rating should go away.

I just realized what your code did to my tracks ratings, have a look:

The good news is, I know how to fix this. Since your code didn't clear the album ratings, I want to go back to what it

was, I will use my own script for that.

iTunes doesn't let me set a rating to 0 neither!!

Dim iTunesApp 
Dim playlist 
Dim FullPath 
Dim tracks 
Dim track 

Set iTunesApp = CreateObject("iTunes.Application.1") 
Set FSO = CreateObject("Scripting.FileSystemObject") 

Set playlist = iTunesApp.LibrarySource.Playlists.ItemByName("AAA_Fix_rate_01") 
If playlist is Nothing Then 
   iTunesApp.CreatePlaylist("AAA_Fix_rate_01") 
   Set playlist = iTunesApp.LibrarySource.Playlists.ItemByName("AAA_Fix_rate_01") 
Else 
   playlist.delete 
   iTunesApp.CreatePlaylist("AAA_Fix_rate_01") 
   Set playlist = iTunesApp.LibrarySource.Playlists.ItemByName("AAA_Fix_rate_01") 
End If 


On error resume next 
count_Artist = 0 
count_Name = 0 
count_AlbumArtist = 0 
count_Album = 0 
count_Genre = 0 
count_Year = 0 
count_Rating = 0 
count_PlayedCount = 0 
count_SkippedCount = 0 
Obs = 0 
Miss = 0 


If FSO.FileExists("D:\iTunes\..\MP3\A\Ah Cama-Sotz - Isfahan (2015 Version).mp3") Then
Obs = Obs+1 
playlist.AddFile("D:\iTunes\..\MP3\A\Ah Cama-Sotz - Isfahan (2015 Version).mp3")
WScript.Echo "Track " & Obs & " - " & "D:\iTunes\..\MP3\A\Ah Cama-Sotz - Isfahan (2015 Version).mp3"
Set track = playlist.Tracks.Item(Obs)
Has_Art = False 

If (True) and track.Rating<>"0" Then
   WScript.Echo "Changing Rating" 
   track.Rating = 0
   count_Rating = count_Rating+1 
   WScript.Echo "Rating " & track.Rating
Else 
   WScript.Echo "Not changing Rating" 
End If 


WScript.Echo 
Else 
    miss = miss + 1
    Wscript.Echo "File not found!"
End If 


Wscript.Echo "Artist: " & count_Artist & " tags modified"
Wscript.Echo "Name: " & count_Name & " tags modified"
Wscript.Echo "AlbumArtist: " & count_AlbumArtist & " tags modified"
Wscript.Echo "Album: " & count_Album & " tags modified"
Wscript.Echo "Genre: " & count_Genre & " tags modified"
Wscript.Echo "Year: " & count_Year & " tags modified"
Wscript.Echo "Rating: " & count_Rating & " tags modified"
Wscript.Echo "PlayedCount: " & count_PlayedCount & " tags modified"
Wscript.Echo "SkippedCount: " & count_SkippedCount & " tags modified"
Wscript.Echo "Missing files: " & miss

Wscript.StdOut.Write vbNewLine & "Press ENTER to continue" 
Do While Not WScript.StdIn.AtEndOfLine 
   Input = WScript.StdIn.Read(1) 
Loop 

The output

But I don't want to get rid of tracks rating, just album ratings.

So, you're saying that it's not possible to set all album ratings to blank?

In former versions it was possible, did they do away with this other feature?, like the many others that

disappeared from iTunes new versions?

Actually, it is the grey stars that I'm talking about, how do I remove them?

Ok, I understand the script now, it's running on the selected playlist.

Question, how come it's not resetting some tracks? I can still see a lot of greyed out tracks

after it ran on a playlist?

Is it because it needs to be run on the full library first?

It's giving me a message that some tracks didn't need clearing.

Too late, I already ran on the whole library. This should be what I need.

I hate that iTunes forces these stupid auto-ratings on me.

But, not a big deal if it destroys my data, as I have backup of track ratings under the genre tag.

Last question, your script sets the album rating to 1%.

Is it possible to make it 0% or blank?

It still didn't finish.

Reason why I want to clear album rating is cause I have an automatic playlist that shows tracks that have favorite in the genre, but don't have 3 stars. That means I need to review them and set their stars to 3 (to me 3 stars means a favorite.)

Or vice-versa, tracks that have 3 starts I will add favorite to the genre.

Now, if they are automatically rated by album, this defeats my automatic playlist, it's showing tracks that are not my favorites, and I can't make them go away.

I see, so you're saying that setting them to 0% makes iTunes re-rate them automatically again. That's bad.

iTunes is a bit poorly designed. I mean, it has great features, but so many things broke along the way. I don't think they planned it very carefully leading to a lot of frustration among users.

At least I love the capability to use vbscript with iTunes, I create lots and lots of scripts to organize my music. For example, I created a script that checks if the image for tracks that belong to the same album is identical, if it's not, then I pick the best image and attach as cover in the tracks where the image is not exactly the same.

I also do the opposite process, if two tracks have the same artwork, I check if the album tag is really the same.

That and a whole lot of other things. It's very tiring to clean up tags, standardize them, when your library is so large, and mp3 tagging is not an exact science, so many tags may not be right, covers may not be right, year may not be right.

The amount of mp3 files put out there by the world creates a lot of chaos and misinformation when it comes to tags.

Not at all, I don't to clear the tracks that I manually rated at 3 starts, that would be a disaster.

Your code didn't work as supposed, what I want is to clear album ratings, not any tracks rating.

But I think I now understand this issue. There are some tracks that appear with 3 stars rating ,

that I never set to 3 stars. Their album rating is probably based on these track ratings.

So, question for you, so I can undo what your script did, now that I know how to fix this.

How can I undo what your script did, is it possible to go back without destroying anything?