Commit 方法

向存储在服务器上的讨论提交指定 Discussion 对象的全部属性（包括属性变化）。

expression  该表达式返回一个 Discussion 对象。

示例

本示例实现的功能是：提交所有与讨论有关的属性（包括所有的属性变化）。

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