|
Reporter
|
VBOffice Reporter is an easy to use tool for data analysis and reporting in Outlook. A single click, for instance, allows you to see the number of hours planned for meetings the next month. |
This small sample demonstrates how to get the default account with the Redemption.
Public Function GetDefaultMailAccount() As String
Dim Session As Redemption.RDOSession
Dim List As Redemption.RDOAccountOrderList
Set Session = CreateObject("redemption.rdosession")
Session.LogOn ""
' The first object of the sorted list is always the default account
Set List = Session.Accounts.GetOrder(acMail)
GetDefaultMailAccount = List.Item(1).Name
End Function