View Single Post
  #2  
Old March 14th 06, 04:43 PM posted to microsoft.public.outlook.program_vba
Ken Slovak - [MVP - Outlook]
external usenet poster
 
Posts: 5,848
Default Appointments and Fields

Using the Outlook object model you get Outlook items. Using RDOSession you
get an RDOMail object. It represents the same object but with different
properties, methods and events. Many things are exposed in an RDOMail object
that you can't get to in an Outlook item.

You don't really have spaces between the object and its properties in your
code do you?

Have you run in debug mode and verified the .Class of the item you created?

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Absolute Beginner's Guide to Microsoft Office Outlook 2003
Reminder Manager, Extended Reminders, Attachment Options
http://www.slovaktech.com/products.htm


"Ian Mackenzie" wrote in message
...
Hi guys

I am trying to create a new appointment, but it seems I am creatinh a new
mailitem each time because I can't assign things like location, startand
end to the appointment. My code is below. Does anyone have an idea about
how to go about it.

I have the same problem with the same fields when I try to fetch
appointments too...

const
olAppointmentItem = $00000001;
var
AppItem : OLEVariant;
begin

AppItem := CurrentFolder.Items.Add(olAppointmentItem);

---------------------------------------------------------
**CurrentFolder = NameSpace.GetDefaultFolder(9)
**Whats the difference between using NameSpace and RDOSession with
Redemption?
**Do you still get the same folder?
---------------------------------------------------------

AppItem .AllDayEvent := AllDayEvent; *ERROR*
AppItem .Body := Body;
AppItem .Categories := Categories;
AppItem .Duration := Duration; *ERROR*
AppItem .Start := Now() + 0.05; *ERROR*
AppItem .End := Now() + 10; *ERROR*
AppItem .Location := Location; *ERROR*
AppItem .ReminderTime := ReminderTime;
AppItem .ReminderSet := ReminderSet;
AppItem .Subject := Subject;

AppItem .Display;

AppItem := Unassigned;
end;



Ads