Web VBA教程:DiscussionServers集合

   
Global
DiscussionServers (DiscussionServer)
Discussions (Discussion)

DiscussionServer对象组成的集合,代表 Microsoft Office 主应用程序中的讨论服务器。

使用 DiscussionServers集合

Global对象的DiscussionServers方法可返回所用计算机上注册的全部讨论服务器的 DiscussionServers集合。以下示例返回 DiscussionServers集合并用消息框显示集合中的服务器数。


Dim dscDiscussionServersCollection As DiscussionServers
Set dscDiscussionServersCollection = DiscussionServers
MsgBox dscDiscussionServersCollection.Count

Add方法可向集合中添加新的讨论服务器。以下示例实现的功能是:添加一个友好名为“Sample Server”的新讨论服务器,其统一资源定位符 (URL) 为 http://samples.microsoft.com。


Dim dscServers As DiscussionServers
Set dscServers = DiscussionServers
dscServers.Add FriendlyName:="Sample Server", _
    ServerAddress:="http://samples.microsoft.com/"

用 DiscussionServers(Index) 可返回单个的 DiscussionServer对象,其中 Index 是指定讨论服务器的索引号。以下示例将变量dscAccounting 设置为 DiscussionServers集合中的第三个服务器。


Set dscAccounting = dscServers(3)

上页:Web VBA教程:DiscussionServer对象 下页:Web VBA教程:Global对象

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属性
Web VBA教程:ServerAddress属性 Web VBA教程:Subject属性
Web VBA教程:Text属性 Web VBA教程:Timestamp属性
Web VBA教程:URL属性 Web VBA教程:Microsoft Office Web 讨论客户端对象
Web VBA教程:不支持的语言元素 Web VBA教程:Microsoft Office服务器扩展 Visual Basic参考
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号