Microsoft Chat Server SDK Reference |
---|
This property returns a single access entry from the collection.
Set AccessEntry = ChatAccessEntries.Item(Index)
Since Item is the default property, it does not need to be specified. For example, the following code is syntactically correct:
Dim Entry1 As CHATSVCLib.IChatAccessEntry
Set Entry1 = ChatServer.AccessEntries(1)
You can use a For Each…Next loop to iterate through all objects in the collection. The following Visual Basic example shows how this is done:
Dim Entry As CHATSVCLib.IChatAccessEntry
For Each Entry In ChatServer.AccessEntries
Debug.Print Entry.Mask
Next
© 1998 Microsoft Corporation. All rights reserved.