[VBA] Outlook mailadressen uit distributielijst lezen

[Verwijderd]

Ik heb een stuk code gemaakt om de entry's uit een distributielijst te lezen:

Dim oApp As Outlook.Application

' Get namespace and Contacts folder reference.
Dim oNS As Outlook.NameSpace
Dim addrListParent As Outlook.AddressList
Dim addrList As Object
Dim MyAddressEntries As Object
Dim objAE As Outlook.AddressEntry

Set oApp = New Outlook.Application
Set oNS = oApp.GetNamespace("MAPI")


For y = 1 To oNS.AddressLists.Count
If oNS.AddressLists(y) = "SalesNL" Then
Set addrListParent = oNS.AddressLists(y)
Exit For
End If
Next

For y = 1 To addrListParent.AddressEntries.Count
If addrListParent.AddressEntries(y) = "distrlijst1" Then
Set addrList = addrListParent.AddressEntries(y)
Exit For
End If
Next

For Each objAE In addrList.Members
strName = objAE.Name
strAddress = objAE.Address
Next

Dit werkt behoorlijk alleen krijg ik in strAddress nu het volgende:
"/o=Sales RO/ou=Cou Belgium/cn=Recipients/cn=Blabla"

Hoe krijg ik nu een goed mailadres?

[gorgi_19]

Je loopt hier al langere tijd rond, dus ik neem aan dat je zelf ook wel weet dat je zo geen topic opent. Je dumpt niet een lap code neer met de opmerking:
"hoe los ik dit op?"; dit is niet de werkwijze in Programming & Webscripting

Verder mis ik een stuk zelfwerkzaamheid. Wat heb je allemaal geprobeerd en waar heb je allemaal gezocht?

Zie: P&W FAQ - De "quickstart" voor de eisen die we stellen aan een topic. Zo mis je bijvoorbeeld de [code][/code]-tags rondom je code.

Je bent vrij om een nieuw topic te openen, mits deze wel volgens de quickstart is en je zelf toonbaar moeite hebt gedaan om het op te lossen.

[ Voor 132% gewijzigd door gorgi_19 op 15-06-2004 14:35 ]