Formular/VBA: SMTP-adresse fra distributionslister i Outlook

Jeg er ved at lave en formular i Outlook 2003 som bl.a. danner en liste med mail-adresser over distributionslister fra en adresseliste.

Mit problem er at jeg ikke kan udtrække SMTP-adressen fra distributionslisterne. Det er lykkedes mig af få navnet på distributionslisterne samt en adresse som er formateret på følgende måde: "o=XXX/ou=YYY/cn=ZZZ/cn=VVV". Den sidste parameter i adressen har jeg prøvet at udtrække og sammensætte med "@domæne.xx" men adressen er ikke altid gyldig.

Her er min kode (mail-adresse ligges i arrayet 'arrModtagere'):

    dim arrModtagere()


    set objGAL = Item.Application.session.AddressLists("Adressebog")
    set objGAE = objGAL.AddressEntries

    Redim arrModtagere(objGAE.Count,2)
    idx = 1
    For Each objMember In objGAE
        if (objMember.DisplayType = 1) then
            strName = objMember.name
            strEmail = objMember.address
            arrModtagere(idx,0) = "" & strEmail
            idx = idx + 1
        end if
    Next
    set objGAE = nothing
    set objGAL = nothing

Jeg har søgt lidt på Google og har fundet frem til at man muligvis kan bruge følgende til at hente SMTP-adresser med dette kode:

    Const PR_EMS_AB_PROXY_ADDRESSES = 0x800F101E
    strMail = objMember.Fields(PR_EMS_AB_PROXY_ADDRESSES).value

Men metoden "Fields" findes ikke.