Commits all properties of the specified Discussion object (including property changes) to the discussion store on the server.
expression.Commit
expression    An expression that returns a Discussion object.
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