PropertyAccessor.BinaryToString, méthode (Outlook)

  • Article

Convertit le tableau d'octets spécifié par Value en données de type String.

Syntaxe

expression. BinaryToString( _Value_ )

Expression Variable qui représente un objet PropertyAccessor .

Parameters

Nom Requis/Facultatif Type de données Description
Valeur Obligatoire Variant Représente le tableau d'octets à convertir.

Valeur renvoyée

Chaîne hexadécimale qui représente la valeur convertie.

Remarques

Pour plus d’informations sur la conversion de type lors de l’utilisation de l’objet PropertyAccessor , consultez Meilleures pratiques pour obtenir et définir des propriétés.

Exemple

Le modèle objet Outlook expose une propriété EntryID d’objets d’éléments pour obtenir l’identificateur d’entrée d’un élément. Cette propriété est une chaîne représentant la valeur de la propriété MAPI, PR_ENTRYID, de cet élément. À part la propriété EntryID, vous pouvez également utiliser la méthode PropertyAccessor.GetProperty pour obtenir la valeur de la propriété PR_ENTRYID d’un élément et la méthode PropertyAccessor.BinaryToString pour convertir cette valeur en chaîne. Cette chaîne doit correspondre à la valeur de la propriété EntryID pour le même élément. L’exemple de code suivant montre l’équivalence de l’ID d’entrée retourné par la méthode PropertyAccessor.GetProperty et de l’ID d’entrée retourné par la propriété EntryID pour chaque élément de la boîte de réception.

Sub TestEntryIDs() 
 Dim oMsg As Object 
 Dim oFolder As Outlook.Folder 
 Dim oItems As Outlook.Items 
 Dim oPA As Outlook.PropertyAccessor 
 Dim EntryID1 As String, EntryID2 As String, EntryIDProperty As String 
 
 'This is the MAPI property PR_ENTRYID referenced with its MAPI proptag namespace 
 EntryIDProperty = "http://schemas.microsoft.com/mapi/proptag/0x0FFF0102" 
 Set oFolder = Application.Session.GetDefaultFolder(olFolderInbox) 
 Set oItems = oFolder.Items 
 For Each oMsg In oItems 
 Set oPA = oMsg.PropertyAccessor 
 'First use the EntryID property of the item 
 EntryID1 = oMsg.EntryID 
 'Then use the PropertyAccessor 
 EntryID2 = oPA.BinaryToString(oPA.GetProperty(EntryIDProperty)) 
 'The string equivalents of the two Entry IDs should be the same 
 If EntryID1 <> EntryID2 Then 
 Debug.Print "Error obtaining EntryID for " & oMsg.Subject 
 End If 
 Next 
End Sub

Voir aussi

PropertyAccessor, objet

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.