facebookで公開済み
#InDesign CS5
#開いているブックに開いているドキュメントを全て追加
tell application "Adobe InDesign CS5"
set {a1, a2} to {books, documents}
set a5 to full name of book contents of a1's item 1
repeat with a3 in a2
try
set a4 to full name of a3
if a4 is not in a5 then make new book content of a1's item 1 with properties {full name:a4}
end try
end repeat
end tell
