RDOStoresCollection object |
RDOStoresCollection represents a
static collection of stores (RDOStore2).
Returned by:
RDOExchangeAccount.AllStores
RDOExchangeAccount.DelegateStores
The example below prints out the
names of all stores that belong to an Exchange account as well as the list of
all delegate stores from that account.
set Session = CreateObject("Redemption.RDOSession")
Session.MAPIOBJECT = Application.Session.MAPIOBJECT
set Accounts = Session.Accounts
for each Account in Accounts
if Account.AccountType = 3 Then 'atExchange - we have
RDOExchangeAccount object
Debug.Print ""
Debug.Print
"========================="
Debug.Print "Exchange account: " &
Account.Name
Debug.Print
"========================="
Debug.Print "======= All Stores
======="
for each store in Account.AllStores
Debug.Print
store.Name
next
Debug.Print "======= Deletegate
Stores ======="
for each store in Account.DelegateStores
Debug.Print
store.Name
next
end if
next |
Properties
Methods
|
Derived from:
IDispatch
|
|
Properties |
|
Count
|
Integer, read-only.
Returns the number of RDOStore2
objects in the collection.
|
|
|
Methods |
|
Item(Index)
|
Returns RDOStore2 object with the
specified index (1 through Count).
|
|
|