Scripting Entourage shared exchange calendar

Question

How do I go about adding events to a shared exchange calendar?
I'm able to add events via applescript when I am using the account to which the calendar belongs but when trying to script it via another user account which has access privaledges is a problem. I can't seem to get the calendar id of the shared calendar so I can refer to it.
With an exchange calendar which is not being shared I just refer to it by calendar id which I can obtain by using
set theCals to every calendar of Exchange account "account name"
But how do I refer to a shared calendar which shows up as a calendar beneath a second Exchange Account icon inside of my Entourage exchange account underneath the calendar tab?
Thanks.
Pedro

Answer 1

Let me ask it another way--how do you get the calendar id of a selected event?
The script below returns the event id of an event on the shared exchange account calendar for which I am trying to find the calendar id.
tell application "Microsoft Entourage"
try
(*get the currently selected event(s)
(in calendar or custom view) *)
set theEvents to (get selection)
if theEvents = {} or class of (item 1 of theEvents) is not event then error number -128
on error
(*if there are no events selected, or the first item selected
is not a calendar event, warn the user and then quit*)
beep 2
display dialog "First select an event in the calendar or" & "a custom view. Then try again" buttons {"Cancel"} default button 1 with icon 0
end try
return calendar ID
end tell
Thanks.
Pedro