Méthode Conversation.StopAlwaysDelete (Outlook)
Interrompt l’action de déplacement systématique des éléments de conversation de la banque spécifiée dans le dossier Éléments supprimés de cette banque.
Syntaxe
expression. StopAlwaysDelete( _Store_ )
Expression Variable qui représente un objet « Conversation ».
Parameters
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| Store | Requis | Boutique | Spécifie la banque dans laquelle l’arrêt de la suppression systématique doit être appliqué. |
Remarques
Si l’action d’arrêt de la suppression systématique n’a pas été activée, StopAlwaysDelete n’exécute aucune action.
Si l’action toujours supprimer a été activée (en appelant la méthode SetAlwaysDelete , StopAlwaysDelete déplace les éléments de conversation existants dans le dossier Éléments supprimés vers la boîte de réception.
Après l’appel de la méthode StopAlwaysDelete pour une conversation dans une banque, l’appel de la méthode GetAlwaysDelete pour cette combinaison banque-conversation renvoie la constante olDoNotDelete.
Si le magasin spécifié par le paramètre Store représente un magasin de non-remise, tel qu’un magasin .pst d’archivage, l’action stop-always-delete est appliquée aux éléments de conversation dans le magasin de remise par défaut.
L’appel de cette méthode sur une conversation qui se trouve déjà dans le dossier Éléments supprimés dans le magasin spécifié retourne une erreur.
Exemple
L’exemple de code Visual Basic pour Application (VBA) suivant démontre comment arrêter l’action de suppression systématique pour la conversation d’un élément de courrier spécifique. L’exemple de code, DemoStopAlwaysDelete, choisit le premier élément de courrier affiché dans le volet de lecture comme élément de courrier spécifique. DemoStopAlwaysDelete Vérifie que les conversations sont activées sur le magasin pour l’élément de courrier, obtient la conversation qui implique cet élément de courrier s’il existe une conversation et utilise SetAlwaysDelete pour arrêter l’action toujours supprimer de cette conversation sur ce magasin.
Sub DemoStopAlwaysDelete()
Dim oMail As Outlook.MailItem
Dim oConv As Outlook.Conversation
Dim oStore As Outlook.Store
' Get the item displayed in the Reading Pane.
Set oMail = ActiveExplorer.Selection(1)
Set oStore = oMail.Parent.Store
If oStore.IsConversationEnabled Then
Set oConv = oMail.GetConversation
If Not (oConv Is Nothing) Then
oConv.StopAlwaysDelete oStore
End If
End If
End Sub
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.