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
Event subject = task subject
Event Notes = task notes
Event Date = task due date
Code:
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