well.. you ARE working with outlook.
so check help
those are methods of the outlook library to
check validity of email adresses against the address book.
if the eamil addresses are not necessarily
included in the address book then it would be of no use.
and rereading your original question:
try something like..very rough hope you get the gist..
dim SendErrors as collection
set SendErrors = new collection
on error goto SendError
for each x in y
x.send
next
on error goto 0
blah blah
if SendErrors.count 0 then
dim sMsg$,itm
for each itm in SendErrors
sMsg = sMsg & vblf & itm
next
msgbox sMsg
end if
exit sub
SendError:
select case err.Number
case 123 'Adapt to suit
SendErrors.add x
err.clear
case else
debug.print err.number,err.description
stop
end select
err.clear
resume next
end sub
--
keepITcool
|
www.XLsupport.com | keepITcool chello nl | amsterdam
Richard Buttrey wrote :
On Thu, 16 Jun 2005 04:53:11 -0700, "keepITcool"
wrote:
you may need to use the resolve method
on each recipient in the recipients collection
or ResolveAll on the recipients collection
Hi,
Thanks for the quick response.
Could you explain a little further please. I'm unfamiliar with the
terminology ResoveAll or the recipients collection.
Rgds
__
Richard Buttrey
Grappenhall, Cheshire, UK
__________________________