How could Outlook possibly know if that was an invalid address?
If the format of the email address is correct it will resolve. That doesn't
mean that it's an actual email address that you can send to.
I can resolve
but that doesn't mean that address actually
exists anywhere.
--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Professional Programming Outlook 2007.
Reminder Manager, Extended Reminders, Attachment Options.
http://www.slovaktech.com/products.htm
"Mark VII" wrote in message
...
Greetings --
I'm working on some email automation via VBA. (For a variety of reasons,
I
can't use the system address book, and keep the email addresses in an
Access
table. Long story.) I want to be able to protect against a fat-fingered
address in the table.
What I have so far creates the MailItem, adds a recipient, then uses the
Resolve method to make sure the email address exists in our system. (We
have
Exchange servers.)
What is happening is the resolved property is returning True, even if the
address is invalid.
Here's a code extract:
Dim appOutlook As Outlook.Application
Dim nsNameSpace As Outlook.Namespace
Dim miMailItem As Outlook.MailItem
Dim rcpRecipient As Outlook.Recipient
Set appOutlook = CreateObject("Outlook.application")
Set nsNameSpace = appOutlook.GetNamespace("MAPI")
Set miMailItem = appOutlook.CreateItem(olMailItem)
miMailItem.Subject = "some text"
Set rcpRecipient =
miMailItem.Recipients.Add("invalid.email@ourcompan y.com")
If rcpRecipient.Resolved = True Then
'* OK, continue
Else
'* issue error message and abort
End If
The Resolved property always returns True, I can't trap for an invalid
email
address. Should I be doing something differently to detect an invalid
address?
Thanks,
Mark