Mark,
I had to change the final command to
set file path of goto anchor behaviors of thisButton to NewPath
I changed the script a little bit because I noticed that "to items 1 thru 4" didn't work on all the files
this is the new script:
tell application "Adobe InDesign CS5"
tell active document
set listOfButtons to every button
repeat with thisButton in listOfButtons
tell thisButton
set FilePath to file path of goto anchor behaviors
set ASTID to AppleScript's text item delimiters -- Store settings
set ButtonPath to (item 1 of FilePath) as string
set AppleScript's text item delimiters to ":" -- Everything splits at this character
set PathBits to text items of ButtonPath -- Slice it…
repeat with i from 1 to count PathBits
considering case
if item i of PathBits is "NL" then
set item i of PathBits to "FR"
end if
end considering
end repeat
set TempPath to items 1 thru i of PathBits as string
set AppleScript's text item delimiters to "_" -- Now everything splits at this character
set DocBits to text items of TempPath
repeat with j from 1 to count DocBits
considering case
if item j of DocBits is "nl" then
set item j of DocBits to "fr"
end if
end considering
end repeat
set NewPath to items 1 thru j of DocBits as string
set file path of goto anchor behaviors of thisButton to NewPath
end tell
end repeat
end tell
end tell
Now I just have to make it possible to do this for all the buttons in a document. First I want to make it possible to choose the original path and doc...
This is what I've got at this moment:
tell application "Adobe InDesign CS5"
tell active document
--choose path
set PathOrigArray to {"BE", "FR", "NL", "EX", "DE"}
set PathOrigID to choose from list PathOrigArray with prompt "Selecteer de map met originele bestanden." OK button name "Update book" without multiple selections allowed
set PathNewArray to {"FR", "NL", "EX", "DE"}
set PathNewID to choose from list PathNewArray with prompt "Selecteer de map met nieuwe bestanden." OK button name "Update book" without multiple selections allowed
--choose doc
set DocOrigArray to {"be", "fr", "nl", "ex", "de"}
set DocOrigID to choose from list DocOrigArray with prompt "Selecteer de suffix van de originele bestanden." OK button name "Update book" without multiple selections allowed
set DocNewArray to {"fr", "nl", "ex", "de"}
set DocNewID to choose from list DocNewArray with prompt "Selecteer de suffix van de nieuwe bestanden." OK button name "Update book" without multiple selections allowed
set listOfButtons to every button
repeat with thisButton in listOfButtons
tell thisButton
set FilePath to file path of goto anchor behaviors
set ASTID to AppleScript's text item delimiters -- Store settings
set ButtonPath to (item 1 of FilePath) as string
set AppleScript's text item delimiters to ":" -- Everything splits at this character
set PathBits to text items of ButtonPath -- Slice it…
repeat with i from 1 to count PathBits
considering case
if item i of PathBits is PathOrigID then
set item i of PathBits to PathNewID
end if
end considering
end repeat
set TempPath to items 1 thru i of PathBits as string
set AppleScript's text item delimiters to "_" -- Now everything splits at this character
set DocBits to text items of TempPath
repeat with j from 1 to count DocBits
considering case
if item j of DocBits is DocOrigID then
set item j of DocBits to DocNewID
end if
end considering
end repeat
set NewPath to items 1 thru j of DocBits as string
set file path of goto anchor behaviors of thisButton to NewPath
end tell
end repeat
end tell
end tell
The problem is that he doesn't change the items... what I am doing wrong?
)
