Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Create Delete folders in Outlook Automation
Message
 
 
To
16/04/2010 13:44:29
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
01460596
Message ID:
01460618
Views:
32
>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. 
>
>
Sorry, try

loNameSpace.Folders("Personal Folders").Folders.Remove('TempBox')
If it's not broken, fix it until it is.


My Blog
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform