The ContentServerDisks.Count property returns a Long value specifying the number of objects in a collection.
Syntax
ContentServerDisks.Count
Example
The following example uses the Count property to enumerate through a Clients collection object to output client IDs.
sub eumDisks(server As String)
Dim Disk As IMSrvCServerDisk
Dim CServer As IMSrvCServer
MediaServer1.SetServer server
For Each CServer In MediaServer1.CServers
MsgBox "There are " & CServer.Disks.Count & " on " & CServer.Name
Next
End Sub
See Also
Clients object, ContentServers object, ContentServerDisks object, Titles object, Walkers object
© 1996-1998 Microsoft Corporation. All rights reserved.