Web VBA教程:Add方法

AddTotal方法应用于 Discussions对象的情形。

向指定的 Discussions集合中新添一个 Discussion对象。

expression.Add(Subject, Text, Bookmark)

expression   必需。该表达式返回上述对象之一。

Subject  String 类型,可选。特定讨论的主题。

Text  String 类型,可选。特定讨论的正文。

Bookmark  String 类型,可选。文档中特定讨论的位置的唯一标识符。

说明

新讨论的 Author属性会自动设置为由 Microsoft Office 主应用程序所决定的当前用户名。

 

 

AddTotal方法应用于 DiscussionServers对象的情形。

向 DiscussionServers集合中添加 DiscussionServer对象。

expression.Add(FriendlyName, ServerAddress)

expression   必需。该表达式返回上述对象之一。

FriendlyName  String 类型,必需。指定的讨论服务器的友好名称。

ServerAddress  String 类型,必需。指定的讨论服务器的统一资源定位符 (URL)。

说明

在 ServerAddress参数中指定的 URL 必须包含斜杠字符,如下例中使用 URL http://samples.microsoft.com。


dscServers.Add "Samples Folder", _
    http://samples.microsoft.com/

 

VBA示例

应用于 Discussions对象的情形。

本示例实现的功能是:添加响应指定的 Discussion对象的新讨论。


Set strResponse = dscDiscussions(1).Discussions.Add _
    ("Supply information", "Staples are here!", "Staples")

应用于 DiscussionServers对象的情形。

本示例实现的功能是:添加一个新的讨论服务器,该服务器的友好名称为“Corporate Information Server”,URL 为 http://samples.microsoft.com。


Dim dscServers As DiscussionServers
Set dscServers = DiscussionServers
dscServers.Add "Corporate Information Server", _
    "http://samples.microsoft.com/"

上页:Web VBA教程:返回集合中的对象 下页:Web VBA教程:Commit方法

Web VBA教程:Add方法

Web VBA教程:Commit方法 Web VBA教程:Delete方法
Web VBA教程:OpenDiscussions方法 Web VBA教程:SetAsDefault方法
Web VBA教程:Discussion对象 Web VBA教程:Discussions集合
Web VBA教程:DiscussionServer对象 Web VBA教程:DiscussionServers集合
Web VBA教程:Global对象 Web VBA教程:Author属性
Web VBA教程:AutoCommit属性 Web VBA教程:Bookmark属性
Web VBA教程:Count属性 Web VBA教程:CurrentUserName属性
Web VBA教程:Discussions属性 Web VBA教程:FriendlyName属性
Web VBA教程:Index属性 Web VBA教程:Item属性
Web VBA教程:LoginName属性 Web VBA教程:Parent属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号