If this is your first visit, be sure to check out the FAQ by clicking the link above.
You may have to register before you can post: click the register link above to proceed.
To start viewing messages, select the forum that you want to visit from the selection below.
on open theDocuments
repeat with aDocument in theDocuments
tell application "Pages"
open aDocument
set thePath to the path of the front document
set theWordPath to thePath & ".doc"
save the front document as {"doc", "SLDocumentTypeMSWord"} in theWordPath
close the front document saving no
end tell
end repeat
end open
Save as program. Drop Pages documents onto it. Make backups beforehand.