Label Links in Finder

[Guest]

Hey there,

is there a Indesign Script to mark all Indesign Links colorful in the Finder or do i need a AppleScript for this issue?

Thanks a lot!

[AS Scripter · Accepted solution]

--This works in CS6 and OS X 10.9 Mavericks:

tell application "Adobe InDesign CS6"

  tell document 1

  set l to every link --gets all link references

  set fp_list to {}

  repeat with theLink in l -- make a list of all file paths

  set fp_list to (fp_list & file path of theLink)

  end repeat

  end tell

end tell

tell application "Finder"

  repeat with fp in fp_list -- set each file's label

  set label index of file fp to 6 -- Green -- 1=Orange, Red, Yellow, Blue, Purple, Green, 7=Gray

  end repeat

end tell

[Guest]

Thanks a lot!