OFFICESE: How to Count the Number of Discussions in an Office 2000 Document
ID: Q247282
|
The information in this article applies to:
-
Microsoft Office 2000 Server Extensions
-
Microsoft Excel 2000
-
Microsoft PowerPoint 2000
-
Microsoft Word 2000
SUMMARY
In Microsoft Office, the Microsoft Office Server Extensions (OSE) library enables you to programmatically control objects in Discussions and DiscussionServers collections. You can use the Count property of the Discussions collection to return the number of discussions in a document that is hosted on a Web server extended with Microsoft Office 2000 Server Extensions.
MORE INFORMATION
The Count property returns the number of items in the specified collection.
The Count property does not count recursively, however, and any discussions that are replies to a Discussion object are not included in the count.
Microsoft provides programming examples for illustration only, without warranty
either expressed or implied, including, but not limited to, the implied warranties of
merchantability and/or fitness for a particular purpose. This article assumes that you
are familiar with the programming language being demonstrated and the tools used to
create and debug procedures. Microsoft support professionals can help explain the functionality
of a particular procedure, but they will not modify these examples to provide added
functionality or construct procedures to meet your specific needs. If you have limited
programming experience, you may want to contact a Microsoft Certified Solution Provider
or the Microsoft fee-based consulting line at (800) 936-5200. For more information about
Microsoft Certified Solution Providers, please see the following page on the World Wide Web:
http://www.microsoft.com/mcsp/
For more information about the support options available from Microsoft, please see the
following page on the World Wide Web:
http://www.microsoft.com/support/supportnet/overview/overview.asp
NOTE: You must add a reference to the OSE Object model. To do this, follow these steps:
- Start the Visual Basic Editor (VBE) by pressing ALT+F11 from within one of the Office programs.
- On the Tools menu, click References.
- In the Available References list box, select the Microsoft Office Server Extensions 1.0 Object Library check box.
- Click OK.
Sub Count_Discussions()
Dim dscDiscussions As Discussions
'<OSEWebServerName> is the name of the Discussion Server _
where the document is stored.
'<DocumentName> is the name of the document.
Set dscDiscussions = OpenDiscussions("http://<OSEWebServerName>/<DocumentName>")
MsgBox "There are " & dscDiscussions.Count & " discussions in this document."
End Sub
Additional query words:
XL2000 VBA2000 OSE oseclient focusteam
Keywords : kbdta kbdtacode OffVBA KbVBA
Version : WINDOWS:2000; winnt:
Platform : WINDOWS winnt
Issue type : kbhowto