expression.Commit
expression An expression that returns a Discussion object.
Example
This example commits all properties (including all property changes) that affect the specified discussion.
Dim dscDiscussions As Discussions
Set dscDiscussions = OpenDiscussions(URL:="http://samples.microsoft.com")
dscDiscussions(1).Discussions(1).Commit