Мне необходимо скачать в таблицу SQL Server'а адреса из адресной книги Microsoft Exchange (5.5), с помощью MSDN научился создавать сессию, но как из всего этого вытащить адреса - назнаю, может быть кто-нибудь подскажет, причем по ТЗ мне нужно обойтись без помощи Outlook'а - пытаюсь пользоваться библиотекой cdo.dll.
Все, что пока получилось:

Public objSession As MAPI.Session

Sub Main()
On Error GoTo err

Dim oAddressList As Object
Dim oAddressEntries As Object
Dim oAddressEntry As AddressEntry

Set objSession = CreateObject("MAPI.Session")
objSession.Logon , profilename:="outlook", showDialog:=False

Set oAddressList = objSession.GetAddressList(1)
Set oAddressEntries = oAddressList.AddressEntries
Set oAddEntryFilter = oAddressEntries.Filter

ex:
Exit Sub

err:
MsgBox Error$
GoTo ex
End Sub