Método PropertyAccessor.BinaryToString (Outlook)
Convierte la matriz de bytes especificada por Value en una cadena.
Sintaxis
expresión. BinaryToString( _Value_ )
Expresión Variable que representa un objeto PropertyAccessor .
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Valor | Obligatorio | Variant | Representa la matriz de bytes que se convertirá. |
Valor devuelto
Hexadecimal String que representa el valor convertido.
Comentarios
Para obtener más información sobre la conversión de tipos al usar el objeto PropertyAccessor , vea Procedimientos recomendados para obtener y establecer propiedades.
Ejemplo:
El modelo de objetos de Outlook expone una propiedad EntryID para los objetos de elemento obtener el identificador de entrada de un elemento. Esta propiedad es una cadena que representa el valor de la propiedad MAPI, entrada del objeto de ese elemento. Aparte de la propiedad EntryID, también puede utilizar el método PropertyAccessor.GetProperty para obtener el valor de entrada del objeto de un elemento y utilice PropertyAccessor.BinaryToString para convertir ese valor en una cadena. Esta cadena debe coincidir con el valor de la propiedad EntryID del mismo elemento. El siguiente ejemplo de código muestra la equivalencia de devuelto por el método PropertyAccessor.GetProperty el identificador de entrada y el identificador de entrada devuelto por la propiedad EntryID para cada elemento de la Bandeja de entrada.
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
Consulte también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.