Outlook appointments

[keri]

Hi everyone,

After numerous failed attempts at this I am now trying again to solve
this problem. I really would appreciate ANY help as I have been
stumped with this for weeks and weeks!

I have a form (frmappointments) through which I create an appointment
item in my outlook calendar, (and save the appointment to
tblappointments in my database). The appid in my table is set to match
the entryid of the outlook appointment item, using this code;

APPID = objAppt.EntryID

So each of the appointments stored in my database table has a unique
id that matches the unique id of the corresponding appointment in
outlook.

If my user needs to edit an appointment stored in the db (and outlook)
I want them to be able to do this via the db (not to go to outlook
directly and open and edit the appointment as this will cause
complications in editing the db record of the appointment).

I think the way to do this is;

1.
Select the appointment in the db to be edited (eg by clicking an edit
button)
This would start a search of the outlook appointments to find the one
with the matching ID
When the matching appointment in outlook is found it is deleted
Then the appointment form in my db is opened and appointment is
displayed and can be edited
After editing the user can resend the appointment to the outlook
calendar
The old appointment APPID would be updated to match the new ID created
by outlook

If you understand any of this waffle please help, specifically I have
no idea where to start with the code for the search of the outlook
appointment.

[Tom van Stiphout]

On 23 Mar 2007 13:57:22 -0700, "keri" <ke********@hotmail.comwrote:

There is no need to tell people not to edit appointments in Outlook,
because your app can listen in on events occurring in Outlook, thanks
to the power of COM and WithEvents in particular.
I wrote my code in a class module in VB6.
'Class module globals.
Public WithEvents m_olapp As Outlook.Application
Public WithEvents m_olAppointmentItems As Outlook.Items
Public m_olNameSpace As Outlook.NameSpace

Public Sub Initialize_handler()
Set m_olapp = CreateObject("Outlook.Application")
m_olapp.GetNamespace("MAPI").Logon "Microsoft Outlook"
Set m_olNameSpace = m_olapp.GetNamespace("MAPI")
'this allows us to capture an appointment item change event
Set m_olAppointmentItems =
m_olNameSpace.GetDefaultFolder(olFolderCalendar).I tems
etc.

You will now see m_olAppointmentItems as a "control", and you can
program the ItemChange event that would occur when for example someone
drags the appointment to another part of the calendar.
Private Sub m_olAppointmentItems_ItemChange(ByVal Item As Object)
'Do your thing
End Sub

This kind of coding requires a fairly high understanding of the
Outlook object model. You get that by reading a lot and studying
samples. Also note that each version of Outlook is different. For
example snoozing a reminder generates an ItemChange event in Outlook
2000, whereas Outlook 2003 has a separate Snooze event.

-Tom.

>Hi everyone,

After numerous failed attempts at this I am now trying again to solve
this problem. I really would appreciate ANY help as I have been
stumped with this for weeks and weeks!

I have a form (frmappointments) through which I create an appointment
item in my outlook calendar, (and save the appointment to
tblappointments in my database). The appid in my table is set to match
the entryid of the outlook appointment item, using this code;

APPID = objAppt.EntryID

So each of the appointments stored in my database table has a unique
id that matches the unique id of the corresponding appointment in
outlook.

If my user needs to edit an appointment stored in the db (and outlook)
I want them to be able to do this via the db (not to go to outlook
directly and open and edit the appointment as this will cause
complications in editing the db record of the appointment).

I think the way to do this is;

1.
Select the appointment in the db to be edited (eg by clicking an edit
button)
This would start a search of the outlook appointments to find the one
with the matching ID
When the matching appointment in outlook is found it is deleted
Then the appointment form in my db is opened and appointment is
displayed and can be edited
After editing the user can resend the appointment to the outlook
calendar
The old appointment APPID would be updated to match the new ID created
by outlook

If you understand any of this waffle please help, specifically I have
no idea where to start with the code for the search of the outlook
appointment.