Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Create Delete folders in Outlook Automation
Message
From
16/04/2010 13:44:29
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Create Delete folders in Outlook Automation
Miscellaneous
Thread ID:
01460596
Message ID:
01460596
Views:
97
I have successfully created a folder called "TempBox". How do i delete this folder after i have finished?

thanks for all the help.
k
Local loOutlook   As Outlook.Application
Local loNameSpace As Outlook.NameSpace
Local loInBox     As Object
Local loMSG      As Outlook.MailItem
Local lnUnRead    As Integer
Local loAttach,llAttach

#Define olFolderInBox      6

loOutlook   = Createobject('Outlook.Application') &&
loNameSpace = loOutlook.GetNamespace("MAPI")
loInBox     = loNameSpace.GetDefaultFolder(olFolderInBox)
lnUnRead    = 0

Local loNewFolder

loNewFolder=loNameSpace.Folders("Personal Folders").Folders.Add('TempBox')  && This creates a folder. 
Next
Reply
Map
View

Click here to load this message in the networking platform