Merge Document with file Name

DEVONthink
1

Please putting not only text contents but also each file name too into the merged document!! :upside_down_face:

2

Thanks for the suggestion! Depending on the documents this might be desirable or not. But at least in version 3 that’s scriptable (the example is for rich texts):

tell application id "DNtp"
	set theSelection to selection
	set theMergedRecord to missing value
	repeat with theRecord in theSelection
		set theName to name of theRecord
		if theMergedRecord is not missing value then
			tell text of theMergedRecord
				make new paragraph at end with data ((return & return & theName & return & return) as string)
				make new paragraph at end with data (text of theRecord)
			end tell
		else
			set theMergedRecord to duplicate record theRecord to (parent 1 of theRecord)
			set name of theMergedRecord to "Merged Docs"
			tell text of theMergedRecord
				make new paragraph at beginning with data ((theName & return & return) as string)
			end tell
		end if
	end repeat
end tell
2 Likes
3

It’s amazing!!
Thanks a lot, I use this everyday my jotting.!!!
:heart_eyes:

4

Sorry, This script doesn’t work after upgrading to beta3, why?
:expressionless:

5

Yeah some of my scripts aren’t working after Beta3 too

6

Just tried this and it seems to work fine. What did you select before executing the script?

7

When merging two RTF files, the document is produced an RTF file and works as expected.
When merging an RTF and a Markdown document, the resulting file is Markdown and this error is produced…

image
image.jpg1624×1634 396 KB

8

See above, it’s only for rich texts.

9

I’m sorry I selected rich text and other format files…:dizzy_face:
It’s everything okay. thanks!