Script: Split RTF(D) records (preserving images and attachments)

The string: tell application "Finder" to set theList to every file in ((POSIX file thePath) as alias) will give you all content files of RTFD at the path thePath: RTF and all the attachments. Do what you want with them.