Discussions 集合

         
Global
DiscussionServers (DiscussionServer)
Discussions (Discussion)

Discussion 对象组成的集合,表示在 Microsoft Office 主应用程序中注册的讨论。

使用 Discussions 集合

Global 对象的 OpenDiscussions 方法可返回由指定的统一资源定位符 (URL) 访问的文档的 Discussions 集合。以下示例返回文件夹 "http://examples.microsoft.com" 的 Discussions 集合。

Set dscDiscussions = _
    OpenDiscussions("http://examples.microsoft.com")

可用 Add 方法向 Discussions 集合添加新的 Discussion 对象。以下示例向集合中添加与第一个 Discussion 对象相对应的新讨论。

Set myResponse = dscDiscussions(1).Discussions.Add _
    Subject:="Supply information", Text:="Staples are here!", Bookmark:="Staples"

URL 属性可返回文档的 URL,该文档包含指定的 Discussions 集合。如下例所示:

Dim dscDiscussions As Discussions
Set dscDiscussions = OpenDiscussions("http://samples.microsoft.com")
MsgBox dscDiscussions.URL

Discussions(Index) 可返回单个的 Discussion 对象,其中 Index 是讨论的索引号。以下示例将变量 dscOfficeSupplies 设置为 Discussions 集合中的第一个讨论。

Set dscOfficeSupplies = dscDiscussions(1)