Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Das StorageItem -Objekt wird gespeichert.
Syntax
Ausdruck. Speichern
Ausdruck Eine Variable, die ein StorageItem-Objekt darstellt.
Hinweise
Wenn das StorageItem-Objekt noch nie gespeichert wurde, speichert das Speichern des Elements als ausgeblendetes Element im Ordner auf dem Folder.GetStorage aufgerufen wurde. Wenn das StorageItem-Objekt zuvor gespeichert wurde, und das Element wurde seit geändert wurde, Speichern speichert die Änderungen auf das Element. Wenn das StorageItem-Objekt zuvor gespeichert wurde, und das Element nicht seitdem geändert wurde, wird die Save -Methode Nothing zurück.
Weitere Informationen zum Speichern von Lösungsdaten in einem StorageItem-Objekt finden Sie unter Erstellen und Speichern von Daten im Lösungsspeicher.
Beispiel
Im folgenden Codebeispiel in Visual Basic für Applikationen zeigt, wie das StorageItem -Objekt zum Speichern privater Lösungsdaten verwendet. Sie speichert die Daten in eine benutzerdefinierte Eigenschaft ein StorageItem -Objekt im Ordner Posteingang. Im folgenden werden die Schritte beschrieben:
Das Codebeispiel ruft Folder.GetStorage, um ein vorhandenes StorageItem -Objekt mit dem Betreff "My Private Storage" im Posteingang zu erhalten. Wenn keine StorageItem diesen Betreff bereits vorhanden ist, erstellt GetStorage ein StorageItem -Objekt mit diesem Thema.
Wenn das StorageItem-Objekt neu erstellt wird, wird das Codebeispiel eine benutzerdefinierte Eigenschaft "Order Number" für das Objekt erstellt. Beachten Sie, dass "Order Number" ein-Eigenschaft des ausgeblendetes Element im Posteingang.
Im Codebeispiel wird dann "Order Number" ein Wert zugewiesen und speichert das StorageItem -Objekt.
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
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.