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.

Hinweise

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.