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:

  1. 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.

  2. 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.

  3. 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

Objeto Folder

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.