Outlook appointment bit map

Joined
Jun 22, 2007
Messages
1
Reaction score
0
Hi

I´m trying to program a little bit of code in vb dot net that would make it possible to add a bitmap image to a Outlook Calendar Item via the Attachments.Add code down below. My problem is that this code only attaches the image as a downloadable file - I can see the icon for the image but I can´t see the image itself. Is there any way to do it differently so that I can see the image?

Regards

/Anders

Dim objOutlook As Outlook.Application
Dim objAppointment As Outlook.AppointmentItem
Const olAppointmentItem = 1
objOutlook = CreateObject("Outlook.Application")
objAppointment = objOutlook.CreateItem(olAppointmentItem)
objAppointment.Start = #6/19/2007 11:00:00 AM#
objAppointment.Duration = 270
objAppointment.Subject = "Subject"
objAppointment.Body = "Body"
objAppointment.Location = "Location"
objAppointment.ReminderMinutesBeforeStart = 15
objAppointment.ReminderSet = True
objAppointment.Attachments.Add("c:\tmp\test.bmp")
objAppointment.Save()

 
Back
Top