Duplicating public folder items in personal folders

[Doug Glancy]

(I've never cross-posted before, but I'm new to the Outlook newsgroups, and
thought I might get a more complete answer in this group than to my post to
another yesterday)

At my office we are in need of a system to remind individuals of upcoming
deadlines. We want to centralize the input of the deadlines and to be able
to set reminders on different deadliines for different individuals.

We are using Exchange 2003, Outlook 2003 and we use Cached Exchange mode.

Through googling various options, it seems like it's possible to create a
system with these features.

- One public calendar with all the deadlines
- Personal copies of the calendar on multiple individuals' computers
- copying, modifying or deleting items from the public calendar to
individuals' based on events in the public folder
- reminders set based on whether the individuals username is a checked
category

I'd be interested in opinions on whether this is workable, and if so, if
there are any examples of the code needed.

If this is workable, I have a specific problem (first of many, I'm sure). I
wrote ApplicationStartup code to set the items in the public calendar so I
could capture the its events and that's working. I then wrote some simple
Item_Add event code to copy the added event to my personal calendar. It
works if I set a breakpoint and step through. When run without a
breakpoint, the item is copied but then I get an error. My wild guess is
there is some problem with lag time or cached Exchange mode. I also thought
maybe the fact that the code first adds another copy to the public folder
was the problem, but I can't tell. In Excel VBA I would try turning off
events, but I can't find a way to code that in Outlook.

Here's the code:

Private Sub myOlItems_ItemAdd(ByVal Item As Object)
Dim calendar_item As AppointmentItem
' on next line I get the message
' "Method copy of object AppointmentItem Failed
Set calendar_item = Item.Copy
calendar_item.Move
Application.GetNamespace("MAPI").GetDefaultFolder(olFolderCalendar).Folders("schedule
- Doug's test")
Set calendar_item = Nothing
End Sub

Again, the code works, it actually copies the added item from the Public
folder to mine, but then I get the error and message, which makes me think
that it's the 2nd time through. But if I set a breakpoint beforehand, it
only goes through once.

Sorry for being so long-winded.

Doug

 

[Sue Mosher [MVP-Outlook]]

Yes, it's possible, but not a simple application by any means. Tom Howe's Enterprise Calendar sample would be a good starting point; see http://www.slipstick.com/calendar/scheduleall.htm

Whenever you're writing about an error, you ought to at least do your readers the courtesy of explaining *what* error you get.

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003

and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers

 

[Doug Glancy]

Sue,

Thanks, I've looked at your site before and I think I looked at this
example, but will do so again.

Regarding the error, I listed it in the code where it occurs. I find that
when I'm responding to posts, it's always prudent to read them through
carefully, especially if I'm going to *advise* them on posting protocol ; ).

Regards,

Doug

Yes, it's possible, but not a simple application by any means. Tom Howe's
Enterprise Calendar sample would be a good starting point; see
http://www.slipstick.com/calendar/scheduleall.htm

Whenever you're writing about an error, you ought to at least do your
readers the courtesy of explaining *what* error you get.

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003

and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers

 

[Sue Mosher [MVP-Outlook]]

Thanks for pointing out where to look for the error. I've been struggling with a bad eyeglass prescription for 6 weeks now as they try to make one adjustment after another.

You can't use Copy to copy an item unless you have permission to create new items in the same parent folder. THe alternative is to create an entirely new item in the desired target folder and duplicate the property values one by one.

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003

and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers

 

[Doug Glancy]

Thanks Sue,

My sympathies regarding your glasses.

I've got permissions in both folders, so I don't know if that's the problem.
I'll try what you suggested and see if that helps.

I find Outlooks object model even more confusing than Excel's - I think I
need to buy a book.

Doug

Thanks for pointing out where to look for the error. I've been struggling
with a bad eyeglass prescription for 6 weeks now as they try to make one
adjustment after another.

You can't use Copy to copy an item unless you have permission to create new
items in the same parent folder. THe alternative is to create an entirely
new item in the desired target folder and duplicate the property values one
by one.

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003

and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers