Reading Outlook e-mail addresses (Visual Basic 6.0)

Topic

New Reply

This, I’m sure, is a simple thing to do, but despite having tons of samples, I can’t seem to find an answer. I’d like to be able to display my list of contacts inside VB, letting the user pick a name. Once the name is selected, use that e-mail address in the program.
My test program has been able to read a couple of addresses, but they don’t seem to be from the Contacts folder.
Does anyone have any sample code that would demonstrate this?

Reply | Quote

Replies

This looks like the code that you need, but there’s no VB on my current machine, so I can’t test it out. Reply back if you have problems; tomorrow, I’ll be on a VB machine. Don’t forget to add a reference to Outlook via the Project | References menu. HTH –Sam

Reply | Quote

I tried that, but kept getting errors. However, it did point me in the right direction for some research. I found this subroutine which fills the bill:

Private Sub RetrieveOutlookList()
Set olApp = New Outlook.Application
Set olNS = olApp.GetNamespace(“MAPI”)
dlgAddress.Combo1.Text = “or select an e-mail address from this box.”
For Each olAL In olNS.AddressLists
For Each olAE In olAL.AddressEntries
dlgAddress.Combo1.AddItem olAE.Name & “(” & olAE.Address & “)”
Next
Next
End Sub

You still have to make a reference to Outlook (like before) and Outlook needs to be running.

Brian A.

Reply | Quote