Méthode Folder.GetStorage (Outlook)
Obtient un objet StorageItem sur le dossier parent pour stocker les données d’une solution Outlook.
Syntaxe
expression. GetStorage( _StorageIdentifier_ , _StorageIdentifierType_ )
expression Variable qui représente un objet Folder.
Parameters
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| StorageIdentifier | Requis | String | Identificateur de l'objet StorageItem ; selon le type de l'identificateur, la valeur peut représenter un identificateur d'entrée (Entry ID), une classe de message ou un objet (Subject). |
| StorageIdentifierType | Requis | OlStorageIdentifierType | Spécifie le type d'identificateur de l'objet StorageItem. |
Valeur renvoyée
Objet StorageItem utilisé pour stocker les données d'une solution.
Remarques
La méthode GetStorage obtient un objet StorageItem sur un objet Folder à l’aide de l’identificateur spécifié par StorageIdentifier et a le type d’identificateur spécifié par StorageIdentifierType. L'objet StorageItem est un élément masqué dans l'objet Folder, qui se déplace avec le compte et est disponible en ligne et hors connexion.
Si vous spécifiez l’EntryID pour l’objet StorageItem à l’aide de la valeur olIdentifyByEntryID pour StorageIdentifierType , la méthode GetStorage retourne l’objet StorageItem avec la valeur EntryID spécifiée. Si aucun objet StorageItem n’est renvoyé avec l’EntryID ou si l’objet StorageItem n’existe pas, la méthode GetStorage génère une erreur.
Si vous spécifiez la classe de message pour l’objet StorageItem à l’aide de la valeur olIdentifyByMessageClass pour StorageIdentifierType , la méthode GetStorage retourne l’objet StorageItem avec la classe de message spécifiée. S'il existe plusieurs éléments avec la même classe de message, la méthode GetStorage renvoie l'élément dont la valeur PR_LAST_MODIFICATION_TIME est la plus récente. S'il n'existe aucun objet StorageItem avec la classe de message spécifiée, la méthode GetStorage crée un nouvel objet StorageItem avec la classe de message spécifiée par StorageIdentifier.
Si vous spécifiez l’objet de l’élément StorageItem, la méthode GetStorage renvoie l’objet StorageItem avec l’objet spécifié dans l’appel GetStorage. S’il existe plusieurs éléments avec la même valeur de propriété Subject, la méthode GetStorage renvoie l’élément dont la valeur PR_LAST_MODIFICATION_TIME est la plus récente. S’il n’existe aucun objet StorageItem avec l’objet spécifié, la méthode GetStorage crée un objet StorageItem avec l’objet spécifié par StorageIdentifier.
GetStorage renvoie une erreur si le type de banque du dossier n’est pas pris en charge. Les banques suivantes renvoient une erreur lorsque la méthode GetStorage est appelée :
banques Hotmail ;
banques IMAP (Internet Message Access Protocol) ;
Magasins délégués
banques de dossiers publics.
La taille d’un objet StorageItem nouvellement créé est égale à zéro (0) jusqu’à ce que vous effectuez un appel explicite sur la méthode Save de l’élément.
Pour plus d’informations sur le stockage des données d’une solution, voir Stockage des données de solutions.
Exemple
L'exemple de code Visual Basic pour Applications suivant montre comment utiliser l'objet StorageItem pour enregistrer les données de solution privées. Il montre comment enregistrer les données dans une propriété personnalisée d'un objet StorageItem du dossier Boîte de réception. Voici la procédure :
L’exemple de code appelle GetStorage pour obtenir un objet StorageItem existant dont l’objet est « Mon stockage privé » dans la boîte de réception. Si aucun objet StorageItem n’existe déjà, GetStorage crée un objet StorageItem avec cet objet.
Si l'objet StorageItem vient d'être créé, l'exemple de code crée une propriété « Order Number » pour cet objet. Notez qu'il s'agit d'une propriété d'un élément masqué de la Boîte de réception.
L’exemple de code affecte ensuite une valeur à « Numéro de commande » et enregistre l’objet StorageItem .
Sub AssignStorageData()
Dim oInbox As Outlook.Folder
Dim myStorage As Outlook.StorageItem
Set oInbox = Application.Session.GetDefaultFolder(olFolderInbox)
' Get an existing instance of StorageItem, or create new if it doesn't exist
Set myStorage = oInbox.GetStorage("My Private Storage", olIdentifyBySubject)
' If StorageItem is new, add a custom property for Order Number
If myStorage.Size = 0 Then
myStorage.UserProperties.Add "Order Number", olNumber
End If
' Assign a value to the custom property
myStorage.UserProperties("Order Number").Value = 100
myStorage.Save
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.