Hi, could just test with CS3 at the moment, but guess it should work. --has to be set by user property myLowres : "yourLowRes" property myHighres : "yourHighRes" tell application "Adobe InDesign CS3" set myDocs to every document repeat with i from 1 to count of myDocs try set myDoc to (item i of myDocs) set filePath to file path of myDoc set fileName to name of myDoc set {lrFilePath, hrFilePath} to my getTargetPaths(filePath, fileName) export myDoc format PDF type to lrFilePath using PDF export preset myLowres without showing options export myDoc format PDF type to hrFilePath using PDF export preset myHighres without showing options on error e display dialog e giving up after 5 end try end repeat end tell on getTargetPaths(fileObject, nameString) set folderPath to fileObject as text set AppleScript's text item delimiters to {"."} if (count of text items of nameString) is 1 then set {lr, hr} to {folderPath & nameString & "_lr.pdf", folderPath & nameString & "_lr.pdf"} else set {lr, hr} to {folderPath & (text items 1 thru -2 of nameString) & "_lr.pdf", folderPath & (text items 1 thru -2 of nameString) & "_hr.pdf"} end if return {lr, hr} set AppleScript's text item delimiters to {""} end getTargetPaths Hope it'll work Happy weekend! Hans-Gerd Claßen
... View more