Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Does each outlook item have an item#? how do i get it?
Message
From
05/08/2006 11:28:38
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Title:
Does each outlook item have an item#? how do i get it?
Environment versions
Visual FoxPro:
VFP 8 SP1
OS:
Windows XP SP2
Network:
SAMBA Server
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01143223
Message ID:
01143223
Views:
56
hi everyone:

busy saturday for me here. i have a second question.

i input calendar items in outlook 2000 from within foxpro. it is done through what i would imagine is a normal automation process.

what i'm wondering is - once this is done, does outlook asign some kind of key/number to the calendar item? if so, how do i get it from within foxpro?

i often need to change the calendar item afterwards and end up putting a lot of items in the subject field of the calendar so that i can search for it later. otherwise, i would have similar calendar items being found.

i've posted a portion of my code below. it has some variables that are not explained but still will hopefully give some idea of what i've been doing. Thanks.

Paul

oOutlookObj = CREATEOBJECT("Outlook.Application")
oNamespace = oOutlookObj.GetNamespace("MAPI")
fldFAE_old = oNamespace.folders("Personal Folders").folders("Calendar").folders("jon")

oappt_delete = fldFAE_old.Items.Find("[subject] = " + Chr(34) ; + alltrim(t_outlook_temp_fae.c_body_old) + Chr(34))

do while not isnull (oappt_delete)
oappt_delete.delete()
oappt_delete = fldFAE_old.Items.Find("[subject] = " + Chr(34) + alltrim(c_body_old) + ; Chr(34))
enddo

objappt = fldFAE_new.items.add
objappt.subject = alltrim(t_outlook_temp_fae.c_body_new)
objappt.location = alltrim(cursor_loc_temp.location)
objappt.start = t_outlook_temp_fae.dt_start
objappt.body = alltrim(t_outlook_temp_fae.c_body_new)
objappt.save() &&saves appointment
Next
Reply
Map
View

Click here to load this message in the networking platform