PropertyAccessor.BinaryToString-Methode (Outlook)
Konvertiert das by Value angegebene Bytearray in eine Zeichenfolge.
Syntax
Ausdruck.
BinaryToString( _Value_ )
Ausdruck Eine Variable, die ein PropertyAccessor-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| Wert | Erforderlich | Variant | Stellt das zu konvertierende Bytearray dar. |
Rückgabewert
Eine hexadezimale String, die den konvertierten Wert darstellt.
Hinweise
Weitere Informationen zur Typkonvertierung bei Verwendung des PropertyAccessor-Objekts finden Sie unter Bewährte Methoden zum Abrufen und Festlegen von Eigenschaften.
Beispiel
Outlook-Objektmodell macht eine EntryID -Eigenschaft für Elementobjekte die Eintrags-ID eines Elements abrufen. Diese Eigenschaft ist eine Zeichenfolge, die den Wert der MAPI-Eigenschaft PR_ENTRYID des betreffenden Elements darstellt. Neben dem EntryID -Eigenschaft können Sie auch die PropertyAccessor.GetProperty -Methode zum Abrufen des Wertes des PR_ENTRYID für ein Element verwenden und PropertyAccessor.BinaryToString verwenden, um diesen Wert in eine Zeichenfolge zu konvertieren. Diese Zeichenfolge sollte den Wert der EntryID -Eigenschaft für das gleiche Element übereinstimmen. Das folgende Codebeispiel zeigt die Gleichwertigkeit die Eintrags-ID, die von der PropertyAccessor.GetProperty -Methode zurückgegeben und die Eintrags-ID, die von der EntryID -Eigenschaft für jedes Element im Posteingang zurückgegeben.
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
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.