Freigeben über


NameSpace.OpenSharedFolder-Methode (Outlook)

Ein freigegebener Ordner, auf den durch eine URL oder einen Dateinamen verwiesen wird, wird geöffnet.

Syntax

Ausdruck. OpenSharedFolder( _Path_ , _Name_ , _DownloadAttachments_ , _UseTTL_ )

Ausdruck Ein Ausdruck, der ein NameSpace-Objekt zurückgibt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Path Erforderlich String Die URL oder der lokale Dateiname des freigegebenen Ordners, der geöffnet werden soll.
Name Optional Variant Der Name des RSS-Feeds (Really Simple Syndication) oder Webcal-Kalenders. Dieser Parameter wird für andere Typen freigegebener Ordner ignoriert.
DownloadAttachments Optional Variant Gibt an, ob Anlagen für RSS-Feeds oder für Webcal-Kalender heruntergeladen werden sollen. Dieser Parameter wird für andere Typen freigegebener Ordner ignoriert.
UseTTL Optional Variant Gibt an, ob die TTL-Einstellung (Time To Live) in einem RSS-Feed oder WebCal-Kalender verwendet werden soll. Dieser Parameter wird für andere Typen freigegebener Ordner ignoriert.

Rückgabewert

Ein Folder -Objekt, das den freigegebenen Ordner darstellt.

HinwBemerkungeneise

Diese Methode wird zum Zugreifen auf die folgenden Typen freigegebener Ordner verwendet:

  • Webcal-Kalender (webcal:// mysite / mycalendar )

  • RSS-Feeds (feed:// mysite / myfeed )

  • Microsoft SharePoint Foundation-Ordner (stssync:// mysite / myfolder )

  • iCalendar-Kalenderdateien (ICS)

  • vCard-Kontaktdateien (VCF)

  • Outlook-Nachrichtendateien (MSG)

Hinweis

[!HINWEIS] iCalendar-Termindateien (ICS) werden von dieser Methode nicht unterstützt. Zum Öffnen von iCalendar-Termindateien können Sie die OpenSharedItem -Methode des NameSpace -Objekts verwenden.

Verwenden Sie die GetSharedDefaultFolder-Methode des Namespace-Objekts , um Standardordner wie den Ordner Posteingang in Exchange freizugeben.

Beispiel

Im folgenden Beispiel für Visual Basic für Applikationen wird ein Webcal-Kalender geöffnet und angezeigt.

Public Sub OpenSharedHolidayCalendar() 
 
 
 
 Dim oNamespace As NameSpace 
 
 Dim oFolder As Folder 
 
 
 
 On Error GoTo ErrRoutine 
 
 
 
 Set oNamespace = Application.GetNamespace("MAPI") 
 
 Set oFolder = oNamespace.OpenSharedFolder( _ 
 
 "webcal://icalx.com/public/icalshare/US32Holidays.ics") 
 
 oFolder.Display 
 
 
 
EndRoutine: 
 
 On Error GoTo 0 
 
 Set oFolder = Nothing 
 
 Set oNamespace = Nothing 
 
Exit Sub 
 
 
 
ErrRoutine: 
 
 MsgBox Err.Description, vbOKOnly, Err.Number & " - " & Err.Source 
 
 GoTo EndRoutine 
 
End Sub

Siehe auch

NameSpace-Objekt

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.