script for moving eps files between folders as they placed in CS3

We are a small newspaper in TN. Each month we create a folder named “Exchange”. Our ads are placed into that folder as .eps files. We open a pagination indesign document and place those eps files within it using the apple-D shortcut. Our problem is once the ads are placed we lose track of what was placed and what wasn’t and ads get omitted from the publication. What we would like is an apple script that can be attached to the pagination document. The script would move the eps files from folder “Exchange” to folder “Used Exchange”. Using this script would make sure that only the unplaced ads are in the “Exchange” folder and all placed ads would be in the “Used Exchange” folder.

I do not know much about scripting and was looking to see if anyone has a similar script I can use as a guide or if anyone knows who I can contact to create a script for me.

Hi

Have a look at this see if you understand it.
It might not do everything you want but its a step in the right direction!

tell application "Adobe InDesign CS3"
	tell document 1--indesign document must be open!!
		set t to name of every link
	end tell
end tell
tell application "Finder"
	set z to (choose folder) --Exchange Folder
	set b to name of every file of z
	if t is in b then
		set t to t as string
		move file t of folder z to (choose folder) --Used Exchange Folder
	end if
end tell

Post back if you have any probs or questions

Hi,

May be you need this.

tell application "Adobe InDesign CS3"
   tell document 1--indesign document must be open!!
       set t to name of every link
   end tell
end tell
tell application "Finder"
   set z to get path of folder "Machintosh:Pooja:Projects:Exchanged:" as string
   set b to name of every file of z
   if t is in b then
       set t to t as string
       move file t of folder z to folder "Machintosh:Pooja:Projects:UsedExchanged:" --Used Exchange Folder
   end if
end tell

I am busy this time, so I didn’t compile this program but it will work sure or please let me know if you are getting any errors.
Thanks
Pooja

Hi pooja

Not sure why you posted my exact same script again!
but this line errors:

set z to get path of folder "Machintosh:Pooja:Projects:Exchanged:" as string