Henter mail-adressen fra Outlook\'s adressekartotek

Du kan bruge MAPI, som er en del at Windows\' API. Jeg mener at der ligger et eksempel på at bruge adressekartoteket på Microsoft MSDN hjemmeside...

Kan du komme nærmere ind på hvor og hvordan...

Jeg leder...

Selve MSDN ligger på adressen : http://msdn.microsoft.com , prøv at søge på \"MAPI\" ...

Jeg prøver.....

Nu er jeg ikke den store VB-nørd, men prøv at kikke på denne adresse : http://msdn.microsoft.com/library/psdk/cdo/_olemsg_selecting_recipients_from_the_address_book.htm

Her er lidt jeg har sakset ud, prøv om du kan bruge det !!

Dim ol As New Outlook.Application
Dim ContactFolder As MAPIFolder

Set ContactFolder = _
    ol.GetNamespace(\"MAPI\").GetDefaultFolder _
        (olFolderContacts)

Private Sub LoadContact(i%)
With ContactFolder.Items(i)
    Text1(0) = .FirstName
    Text1(1) = .LastName
    Text1(2) = .FullName
    Text1(3) = .CompanyName
    Text1(4) = .FileAs
    Text1(12) = .Email1Address
    Text1(13) = .WebPage
End With

hyde