Hello, I have a client who regularly receives automated emails with .ICS attachments.

I'd like to create a rule that automatically takes these .ICS attachments and create a calendar appointment from them, so the user does not have to do it manually.

I've used the script below to create appointments, however I'm not sure how to create a script that will look at the contents or type of attachment and create the appointment from that.

Any help would be greatly appreciated.

 

Const olAppointmentItem = 1

Set objOutlook = CreateObject("Outlook.Application") Set objAppointment = objOutlook.CreateItem(olAppointmentItem)

objAppointment.Start = #01/30/2011 11:00 AM# objAppointment.Duration = 60 objAppointment.Subject = "Automatically created appointment" objAppointment.Body = "Meeting to discuss stuff." objAppointment.Location = "Conference Room #1" objAppointment.ReminderMinutesBeforeStart = 15 objAppointment.ReminderSet = True   objAppointment.Save

 



Software/Hardware used:
Outlook 2007