[jshaevitz]

Here is a script (based on sandro@sandro.org's script for creating an entourage mail message) that makes a new Entourage calendar event from an Omnifocus task.

Event subject = task subject
Event Notes = task notes
Event Date = task due date

tell application "OmniFocus"
	
	tell front document
		tell document window 1
			set theSelectedItems to selected trees of content
			if ((count of theSelectedItems) < 1) then
				display alert "You must first select a single task." message "Select a single task before running this script." as warning
				return
			end if
			if ((count of theSelectedItems) > 1) then
				display alert "You must select only one task." message "Select a single task before running this script." as warning
				return
			end if
			
			
		end tell
	end tell
	
	set theDoc to document window 1 of document 1
	
	--	set theSelectedTask to the «class OTva» of item 1 of selected tree of the content of theDoc
	set theSelectedTask to value of item 1 of theSelectedItems
	
	set eventSubject to name of theSelectedTask
	set eventContent to note of theSelectedTask
	set eventDate to due date of theSelectedTask
	
	if (eventSubject = "missing value") then
		set eventSubject to ""
	end if
	
end tell

tell application "Microsoft Entourage"
	activate
	set newCal to make new event at draft window with properties {subject:eventSubject, content:eventContent, all day event:false, start time:eventDate}
	open newCal
end tell