Version: 2004
Operating System: Mac OS X 10.4 (Tiger)
Processor: Power PC
Email Client: pop
I want to start entering friends birthdays and get reminders. Should I get a seperate app for that or can Entourage handle it? If you put in an event - Joes birthday July 2, would that come up year after year?
If you have already entered birthday dates into the address book, simply
select those contacts in the address book (or,m select ALL contacts) and
run this script:
-- Add Birthday Events v1.0 (2009-06-17)
-- an AppleScript by Barry Wainwright <mailto:
[email protected]>
-- Adds an annually recurring event for the Birthday of all
-- selected contacts
-- This script released under a Creative Commons Attribution,
-- NonCommercial, ShareAlike 2.0 England & Wales License.
-- see <
http://creativecommons.org/licenses/by-nc-sa/2.0/uk/>
-- for full details
-- To use this script, copy and paste it into a Script Editor window
-- and save the file in the Entourage Script Menu Items Folder
-- Then, select some contacts in the Address Book in Entourage and
-- run the script by selecting it from the Script Menu in Entourage
-- A new calendar event will be created for each selected contact
-- using the birthday date
-- entered into those contacts.
tell application "Microsoft Entourage"
set selected_contacts to my test_selection(contact)
if selected_contacts is false then
beep 2
return
end if
repeat with this_contact in (selected_contacts)
set birthday_text to birthday of this_contact
set the_birthday to AppleScript's date birthday_text
set month_day to day of the_birthday
set month_number to month of the_birthday as integer
set recurrence_string to ¬
"FREQ=YEARLY;INTERVAL=1;BYMONTHDAY=" & ¬
month_day & ";BYMONTH=" & month_number & ¬
";WKST=SU"
set the_name to first name of this_contact & " " & ¬
last name of this_contact
set event_label to "Birthday - " & the_name
make new event with properties ¬
{subject:event_label, start time:the_birthday, ¬
all day event:true, recurring:true, ¬
recurrence:recurrence_string}
end repeat
end tell
on test_selection(required_type)
tell application "Microsoft Entourage"
try
set the_selection to selection
set the_class to class of the_selection
if the_class is list then set the_class ¬
to class of item 1 of the_selection
if the_class is not required_type then error
on error
return false
end try
return the_election
end tell
end test_selection