Applescript: Import Apple Notes to Evernote

import.scpt

tell application "Notes"
	
	set theMessages to every note
	
	repeat with thisMessage in theMessages
		
		# added identification of folder to create notebooks based on existing folder hierarchy
		
		set myFolder to the container of thisMessage
		
		set myFolder to the name of myFolder
		
		set myTitle to the name of thisMessage
		
		set myText to the body of thisMessage
		
		set myCreateDate to the creation date of thisMessage
		
		set myModDate to the modification date of thisMessage
		
		tell application "Evernote"
			
			set myNote to create note with text myTitle title myTitle notebook myFolder tags ["Imported from Notes"]
			
			set the HTML content of myNote to myText
			
			set the creation date of myNote to myCreateDate
			
			set the modification date of myNote to myModDate
			
		end tell
		
	end repeat
	
end tell