Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Accessing MS Exchange folders from VFP
Message
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Miscellaneous
Thread ID:
00846696
Message ID:
00846708
Views:
22
I am using similar to this to find the box I need:
iMA=0
with outlook.GetNamespace("MAPI")
	for ia=1 to .Folders.Count
		if "RUBINOV"$upper(.Folders(ia).Name)
			iMA=ia		
			EXIT
		endif
	endfor
endwith
if iMA#0
     with outlook.GetNamespace("MAPI").Folders(iMA)
.....
>I am trying to create a synchronization program that will work with both Outlook personal folders and exchange folders. Working with personal folders is no problem using getdefaultfolder() method, but I can't find a folder that relates to my exchange folders. I can use the pickfolder() method to find the folder I want, which will give me an ID, but I want something that could be more easily transferred to other servers (which would likely have other ID's for the same folders). Here's the code I'm using so far:
>
>
>l_outapp = CREATEOBJECT("Outlook.Application")
>l_outns = l_outapp.GetNamespace("MAPI")
>
>* following opens the default contacts folder in personal folders
>lt = l_outns.GetDefaultFolder(10)
>
>
>The fullpath of the above code returns //Personal Folders/Contacts
>
>If I use the pickfolder() method (which pops up a modal dialog to pick the folder, like fileopen()), then the path returned is //Mailbox - Steve Howie/Contacts
>This is correct.
>
>How do I open the exchange mailbox without having a modal dialog popup?
>
>Thanks in advance
Previous
Reply
Map
View

Click here to load this message in the networking platform