Convert all RTF and RTFD files to Word DOCX via AppleScript

convert_all_rtf_and_rtfd_to_docx.scpt

# We do this with Pages because it's the only thing that can correctly convert rtfd.
# textutil works on rtf files with no text in them but not on rtfd.
set my_paths to {"/path/to/first/file.rtfd", "/path/to/second/file.rtfd"}

repeat with my_path in my_paths
	tell application "Pages"
		set my_file to (my_path as POSIX file)
		set my_name to name of (info for my_file)
		set doc to open my_file
		export doc as Microsoft Word to alias (my_path & ".docx" as POSIX file)
		close doc
		tell application "Finder" to delete my_file
	end tell
end repeat

I GOT IT!!!! WOOOHOOO! So Stoked!

set folderChoice to POSIX path of (choose folder)
tell application "System Events"
	set allVisibleFiles to POSIX path of disk items of folder folderChoice whose visible is true
end tell
repeat with my_path in allVisibleFiles
	tell application "Pages"
		set my_file to (my_path as POSIX file)
		set my_name to name of (info for my_file)
		set doc to open my_file
		export doc as formatted text to alias (my_path & ".rtfd" as POSIX file)
		close doc
	end tell
end repeat

Thank you David for your valuable input! Doing cartwheels in my living room LOL!!!

Congrats! Nice hacking!