🚀 go-pugleaf

On Dec 1, 2003, at 1:38 PM, Ben Roche wrote:

> I have a lot of single page Indesign documents (all different sizes). 
> I would like to run a script to open them and exports them to a PDF 
> with their file name and using a PDF style I've setup.

Assuming you mean InDesign CS, something like this:

on open fileList
	tell application "InDesign CS"
		set user interaction level to never interact
	end tell
	repeat with aFile in fileList
		set thePath to (aFile as Unicode text)
		if thePath ends with ".indd" then
			set thePath to (text 1 thru -6 of thePath) & ".pdf"
		else
			set thePath to thePath & ".pdf"
		end if
		tell application "InDesign CS"
			open aFile
			export document 1 format PDF type to thePath using PDF export preset 
"Name of preset" without showing options
			close document 1 saving no
		end tell
	end repeat
	tell application "InDesign CS"
		set user interaction level to interact with all
	end tell
	beep
	activate
	display dialog "Finished."
end open

Save it as an application, then drag-and-drop your files over it.

--
Shane Stanley <sstanley@myriad-com.com.au>