PDA

View Full Version : Saving Calendar Item as mail attachment



aalrr
04-21-2009, 08:25 AM
I have used the following code to create a mail message attachment:

Set objAttach = Application.CreateItem(olAppointmentItem)
With objAttach
.Start = xStart
.End = xEnd
.Subject = xConfName & " Conference Call Instructions"
.ReminderMinutesBeforeStart = 15
.AllDayEvent = False
.Body = xMsg
.Save
End With
Set objAttachment = objItem.Attachments.Add(objAttach, olByVal, , "Conference Call ")
However, the Calendar item saves to the calendar of the person generating the email too. I want it to save as an attachment to the outgoing email only.

Thank you.

aalrr
04-22-2009, 12:47 PM
Just used a MyItem.delete