Was this page helpful?
Your feedback about this content is important. Let us know what you think.
Additional feedback?
1500 characters remaining
OpenSharedFolder Method

NameSpace.OpenSharedFolder Method

Office 2007
Opens a shared folder referenced through a URL or file name.

Version Information
 Version Added:  Outlook 2007

Syntax

expression.OpenSharedFolder(Path, Name, DownloadAttachments, UseTTL)

expression   An expression that returns a NameSpace object.

Parameters

NameRequired/OptionalData TypeDescription
PathRequiredStringThe URL or local file name of the shared folder to be opened.
NameOptionalVariantThe name of the Really Simple Syndication (RSS) feed or Webcal calendar. This parameter is ignored for other shared folder types.
DownloadAttachmentsOptionalVariantIndicates whether to download enclosures (for RSS feeds) or attachments (for Webcal calendars.) This parameter is ignored for other shared folder types.
UseTTLOptionalVariantIndicates whether the Time To Live (TTL) setting in an RSS feed or WebCal calendar should be used. This parameter is ignored for other shared folder types.

Return Value
A Folder object that represents the shared folder.

Remarks

This method is used to access the following shared folder types:

  • Webcal calendars (webcal://mysite/mycalendar)
  • RSS feeds (feed://mysite/myfeed)
  • Windows SharePoint Services folders (stssync://mysite/myfolder)
  • iCalendar calendar (.ics) files
  • vCard contact (.vcf) files
  • Outlook message (.msg) files
Bb208170.vs_note(en-us,office.12).gif  Note
This method does not support iCalendar appointment (.ics) files. To open iCalendar appointment files, you can use the OpenSharedItem method of the NameSpace object.

You can use the GetSharedDefaultFolder method of the Namespace object to share default folders, such as the Inbox folder, in Exchange.

Example
The following Visual Basic for Applications (VBA) example opens and displays a Webcal calendar.

Visual Basic for Applications
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



Community Additions

ADD
Show:
© 2015 Microsoft