Setting Color Labels in a Folder

Question

Hey guys! I'm kinda new to AppleScript in general, so please bear with me if this is just a simple request here, but basically i've been wanting to change the background of the finder windows to match the grey background of the iTunes grid view. However, since the font colour of the files and folders in Finder can't be changed, but the only way is to place a border around them (grey seems to match best). Now i've found a script that manages to do this for all the files in the folder and its subfolder based on the filetypes outlined in the script. However, none of the folders themselves have changed to the desired grey colour.Its clearly because the file type for the folder hasn't been added, but im not sure how i do that. As you can see I tried adding "Folders" to the "set fileColorList to greys" line, but its a no go... Is there any way i can just change that whole section of code to just have all the files and folders within the subfolder to go grey? (i.e. greys{"*"} or something) rather than having to individually add the filetypes?.
Here's the code:
tell application "Finder"
set processFolder to (choose folder with prompt "Select a folder to change label colors") as item
my digDeeper(processFolder)
end tell
on digDeeper(myFolder)
tell application "Finder"
my changeColors(myFolder)
set subFolders to every folder in folder myFolder
if (count of items in subFolders) is greater than 0 then
repeat with thisFolder from 1 to count of items in subFolders
set processSubFolder to item thisFolder of subFolders as string
my digDeeper(processSubFolder)
end repeat
end if
end tell
end digDeeper
on changeColors(myFolder)
set fileColorList to {greys:{"Folders", "mpg", "pages", "keynote", "numbers", "mpeg", "bmp", "wma", "c", "cpp", "dmg", "doc", "asf", "jpg", "jpeg", "ram", "h", "hpp", "mpkg", "iso", "bin", "ppt", "pps", "bundle", "mov", "qt", "gif", "aif", "aiff", "htm", "html", "hqx", "tar", "xls", "mp4", "rgb", "rgba", "pcm", "js", "css", "cgi", "pkg", "gz", "z", "tgz", "localized", "pdf", "avi", "tif", "tiff", "mp3", "m", "zip", "eps", "ai", "wmv", "mkv", "m2ts", "mov", "ts", "rar", "png", "wav", "scpt", "tbz", "bz2", "dat", "txt", "prefs", "rm", "ram", "rcproject", "ra", "psd", "pl", "xml", "plist", "sit", "rar", "torrent", "rtf", "rtfd"}}
tell application "Finder"
try
set (label index of every file of item myFolder whose name extension is in greys of fileColorList) to 7
end try
end tell
end changeColors
Thanks for any help!

Answer 1

Your folder action script doesn't work because of one simple error:
set label index of every item of entire contents of processFolder to 7
Nowhere in your script is 'processFolder' defined, so AppleScript has no idea what you're trying to do.
Given that you (correctly) iterate through added_items, the correct format would be:
on adding folder items to this_folder after receiving added_items
  repeat with item_ in added_items
    tell application "Finder"
      set label index of item_ to 7
    end tell
  end repeat
end adding folder items to
In other words, this changes the label index of each item just added.
That should work provided you're dropping files into this folder. If you're dropping folders then this would set the label index of the folder itself, but not necessarily the items within that folder. For that you'd need to add a check to see if item_ was a folder and add code to handle folders.
Also note that this kind of folder action will only work on the folder itself - that is, if you have folder A that contains subfolder B, then dropping a file into subfolder B won't trigger the script and won't change that item's label. To do that you'd have to attach your folder action to subfolder B.