Convert iCloud Notes to Evernote using Apple Script

NotesToEvernote.applescript

tell application "Notes"
	
	set theMessages to every note
	
	repeat with thisMessage in theMessages
		
		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 "Apple Notes" tags ["Apple 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