Método Folder.GetStorage (Outlook)
Obtiene un objeto StorageItem en el Folder primario para almacenar datos de una solución de Outlook.
Sintaxis
expresión. GetStorage( _StorageIdentifier_ , _StorageIdentifierType_ )
Expresión Variable que representa un objeto Folder .
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| StorageIdentifier | Obligatorio | String | Un identificador para el objeto StorageItem; según el tipo de identificador, el valor puede representar un EntryID, una clase de mensaje o un asunto. |
| StorageIdentifierType | Obligatorio | OlStorageIdentifierType | Especifica el tipo de identificador para el objeto StorageItem. |
Valor devuelto
Un objeto StorageItem que se usa para almacenar datos de una solución.
Comentarios
El método GetStorage obtiene un objeto StorageItem en un objeto Folder mediante el identificador especificado por StorageIdentifier y tiene el tipo de identificador especificado por StorageIdentifierType. El objeto StorageItem es un elemento oculto en la carpeta, que se mueve con la cuenta y está disponible en línea y sin conexión.
Si especifica entryID para StorageItem mediante el valor olIdentifyByEntryID de StorageIdentifierType , el método GetStorage devolverá el objeto StorageItem con el EntryID especificado. Si no se encuentra ningún StorageItem usando dicho EntryID o si StorageItem no existe, el método GetStorage provocará un error.
Si especifica la clase de mensaje para StorageItem mediante el valor olIdentifyByMessageClass para StorageIdentifierType , el método GetStorage devolverá el objeto StorageItem con la clase de mensaje especificada. Si hay varios elementos con la misma clase de mensaje, el método GetStorage devuelve el elemento con el PR_LAST_MODIFICATION_TIME de más reciente. Si no existe StorageItem con la clase de mensaje especificada, el método GetStorage crea un nuevo StorageItem con la clase de mensaje especificada por StorageIdentifier.
Si se especifica el asunto del objeto StorageItem, el método GetStorage devolverá StorageItem con el Subject especificado en la llamada a GetStorage. Si hay varios elementos con el mismo asunto, el método GetStorage devolverá el elemento con el PR_LAST_MODIFICATION_TIME de más reciente. Si no existe ningún objeto StorageItem con el subject especificado, el método GetStorage creará un nuevo objeto StorageItem con el subject especificado por StorageIdentifier.
GetStorage devuelve un error si no se admite el tipo de almacén de la carpeta. Los siguientes almacenes de devuelven un error cuando se llama a GetStorage:
Almacén de Hotmail
Almacenes de Protocolo de acceso a mensajes de Internet (IMAP)
Almacenes de delegado
Almacenes de carpeta pública
El tamaño de un objeto StorageItem recién creado es cero (0) hasta que se realiza una llamada explícita en el método Save del elemento.
Para obtener más información sobre cómo almacenar datos de una solución, vea Almacenar datos para soluciones.
Ejemplo:
El siguiente ejemplo de código en Visual Basic para aplicaciones muestra cómo usar el objeto StorageItem para almacenar datos privados de soluciones. Guarda los datos en una propiedad personalizada de un objeto StorageItem en la carpeta Bandeja de entrada. A continuación describe los pasos:
El ejemplo de código llama a GetStorage para obtener un objeto StorageItem existente que tenga el asunto "My Private Storage" en la Bandeja de entrada. Si no existe ningún objeto StorageItem con ese asunto, GetStorage crea un objeto StorageItem con ese asunto.
Si el objeto StorageItem recién creado, el ejemplo de código crea una propiedad personalizada "Order Number" para el objeto. Tenga en cuenta que "Order Number" es una propiedad de un elemento oculto en la Bandeja de entrada.
A continuación, el código de ejemplo asigna un valor a "Order Number" y guarda el objeto 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
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.