Returns the Discussions collection for the document specified by the Uniform Resource Locator (URL). Read-only Object.
expression.OpenDiscussions(URL)
expression    An expression that returns a Microsoft Office Server Extensions (OSE) object.
URL Required. A String that represents the URL of the discussion server.
This example returns the Discussions collection for the folder http://examples.microsoft.com.
Dim dscDiscussions As Discussions
Set dscDiscussions = _
OpenDiscussions("http://examples.microsoft.com")