Does anybody know how to access the Mapi address book. I am using the mapi session and message controls in a vb5 project. I can load up the address book, but how do I access the selected recipients ??
Thanks
Printable View
Does anybody know how to access the Mapi address book. I am using the mapi session and message controls in a vb5 project. I can load up the address book, but how do I access the selected recipients ??
Thanks
I use VB6 so I'm not for sure how it will work in VB5. Try this Function, where pName can either be "" or a partial name.
MailLogOn is a subroutine that verifies that the MAPI session is connected.
I hope this helps you.
Public Function GetAddressBook(pName) As String
Dim response As Integer
'Check if mail server is logged on already
MailLogOn
If pName = "" Then
pName = " "
End If
'Check names versus names in Address book of mail system
With MAPISession
'.Compose
.Compose
.RecipDisplayName = pName
.AddressResolveUI = True
On Error GoTo NameErr1
.ResolveName
If .RecipDisplayName <> pName Then
GetAddressBook = ExtractName(.RecipDisplayName)
End If
End With
ExitGet:
Exit Function
NameErr1:
Select Case Err()
Case Is = 32001
response = MsgBox("Must select a valid name from the address book.", vbCritical + vbRetryCancel, "User Name Error")
If response = vbRetry Then
Resume
Else
GetAddressBook = " "
Resume ExitGet
End If
End Select
End Function