Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Create Delete folders in Outlook Automation
Message
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
01460596
Message ID:
01460618
Vues:
31
>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
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform