NewMailEx Only provides First e-mail in inbox

Status
Not open for further replies.
B

ben

When using NewMailEx to get a list of received e-mails, EntryIDCollection

will only return the very first e-mail received, even if 10-15 e-mails come

in at the same time.

This is my code in it's entirety.

Private Sub Application_NewMailEx(ByVal EntryIDCollection As String)

Dim arr() As String

Dim i As Integer

Dim m As MailItem

On Error Resume Next

arr = Split(EntryIDCollection, ",")

For i = 0 To UBound(arr)

Set m = Application.Session.GetItemFromID(arr(i))

MsgBox m.Subject

Next

End Sub

Or am I going at this backwards, does (Will return a list of all e-mails

that have arrived since this event last fired) mean that if I receive 5

e-mails, the first one will trigger.. but the next time I receive an e-mail

the previous 4 , plus the one just in will trigger? And if so, won't that

leave a few e-mails always in limbo?

When you lose your mind, you free your life.
 
Don't use a MsgBox to test any kind of automatic processing, because it's

modal and will stop execution while the box is displayed. Use Debug.Print

instead.

If you're working with an Exchange account in cached mode, NewMailEx will

fire for every single item received, so you'll see only one entry ID each

time. In online mode, it will return multiple items, but may skip a small

number under extremely heavy loads.

Sue Mosher

"ben" <&&&&bw_rgb@hotmail.com(remove this if mailing direct)> wrote in

message news:002D682B-86FF-40FE-8E16-663A7150D9A5@microsoft.com...
> When using NewMailEx to get a list of received e-mails, EntryIDCollection
> will only return the very first e-mail received, even if 10-15 e-mails
> come
> in at the same time.

> This is my code in it's entirety.

> Private Sub Application_NewMailEx(ByVal EntryIDCollection As String)
> Dim arr() As String
> Dim i As Integer
> Dim m As MailItem
> On Error Resume Next
> arr = Split(EntryIDCollection, ",")
> For i = 0 To UBound(arr)
> Set m = Application.Session.GetItemFromID(arr(i))
> MsgBox m.Subject
> Next
> End Sub

> Or am I going at this backwards, does (Will return a list of all e-mails
> that have arrived since this event last fired) mean that if I receive 5
> e-mails, the first one will trigger.. but the next time I receive an
> e-mail
> the previous 4 , plus the one just in will trigger? And if so, won't that
> leave a few e-mails always in limbo?
 
Sue,

Thank you, that was precisely the problem. Changed my code to mark all

incoming messages as read for testing, and worked like a charm. I was a

little lost because all the examples I found used MsgBox for testing.

When you lose your mind, you free your life.

"Sue Mosher [MVP]" wrote:


> Don't use a MsgBox to test any kind of automatic processing, because it's
> modal and will stop execution while the box is displayed. Use Debug.Print
> instead.

> If you're working with an Exchange account in cached mode, NewMailEx will
> fire for every single item received, so you'll see only one entry ID each
> time. In online mode, it will return multiple items, but may skip a small
> number under extremely heavy loads.

> > Sue Mosher
> > >

> "ben" <&&&&bw_rgb@hotmail.com(remove this if mailing direct)> wrote in
> message news:002D682B-86FF-40FE-8E16-663A7150D9A5@microsoft.com...
> > When using NewMailEx to get a list of received e-mails, EntryIDCollection
> > will only return the very first e-mail received, even if 10-15 e-mails
> > come
> > in at the same time.
> > This is my code in it's entirety.
> > Private Sub Application_NewMailEx(ByVal EntryIDCollection As String)
> > Dim arr() As String
> > Dim i As Integer
> > Dim m As MailItem
> > On Error Resume Next
> > arr = Split(EntryIDCollection, ",")
> > For i = 0 To UBound(arr)
> > Set m = Application.Session.GetItemFromID(arr(i))
> > MsgBox m.Subject
> > Next
> > End Sub
> > Or am I going at this backwards, does (Will return a list of all e-mails
> > that have arrived since this event last fired) mean that if I receive 5
> > e-mails, the first one will trigger.. but the next time I receive an
> > e-mail
> > the previous 4 , plus the one just in will trigger? And if so, won't that
> > leave a few e-mails always in limbo?


>
 
Status
Not open for further replies.
Similar threads
Thread starter Title Forum Replies Date
S NewMailEx event not Triggered Outlook VBA and Custom Forms 2
A NewMailEx issue Outlook VBA and Custom Forms 3
A The EntryID in NewMailEx Event Outlook VBA and Custom Forms 1
B CurrentView.XML provides incorrect XML Outlook VBA and Custom Forms 1
P Limited Support for 3rd Party Mail in new Outlook? Using Outlook 1
T Exchange Server - Mail Delay Stamping Exchange Server Administration 0
L Error when exporting Sent Mail to Excel Outlook VBA and Custom Forms 6
X Run macro automatically when a mail appears in the sent folder Using Outlook 5
K How can I delete an e-mail from Outlook Using Outlook 1
L Help: set flag for sent mail to check if received an answer Outlook VBA and Custom Forms 2
A Macro Mail Alert Using Outlook 4
e_a_g_l_e_p_i MY Outlook 2021 changed the format of the shortcuts for mail, calendar etc. Using Outlook 10
Z Outlook 365 Automatically assign categories to incoming mail in a shared folder Round Robin Outlook VBA and Custom Forms 1
W Outlook 365 I am getting the "Either there is no default mail client" error when I try to send an email on excel Office 365 Using Outlook 1
D Gmail mail is being delivered to a different email inbox in Outlook App 2021 Using Outlook 2
P What is your strategy for dealing with SPAM and Junk Mail? Using Outlook 1
C Code to move mail with certain attachment name? Does Not work Outlook VBA and Custom Forms 3
T 1:1 Datatransfer from incoming mail body to customs form body Outlook VBA and Custom Forms 0
O Mail rule issue Using Outlook 3
A manual rule sends mail to wrong folder Using Outlook 5
Aussie Outlook 365 Rule runs manually but returns the error code "an unexpected error has occurred" when incoming mail arrives Using Outlook 1
D ISOmacro to extract active mail senders name and email, CC, Subject line, and filename of attachments and import them into premade excel spread sheet Outlook VBA and Custom Forms 2
Witzker Outlook 2019 Macro to answer a mail with attachments Outlook VBA and Custom Forms 2
D Outlook 2003 Mail Fails Using Outlook 1
Cathy Rhone Mail merge error message Using Outlook 1
R Sent emails show iCloud mail account not the alias Using Outlook 2
D Advanced e-Mail search on from/to contact group only searches for first 20 contacts in group Using Outlook 0
P Print attachments automatically and move the mail to an existing folder called "Ted" Outlook VBA and Custom Forms 4
P Importing other e-mail accounts into Outlook Using Outlook 1
lcarpay Stay in the mail folder pane after ctrl-1 Using Outlook 1
O Exchange Sync period only (e.g. last years mail) Using Outlook 0
F Excel VBA to move mails for outlook 365 on secondary mail account Outlook VBA and Custom Forms 1
M Convertor for Outlook Express Mail Store (.dbx) to Outlook Mail Store (.pst) Using Outlook 0
T vba extract data from msg file as attachment file of mail message Outlook VBA and Custom Forms 1
J E-mail held in Outbox while Minimized Using Outlook 3
G Forward email body to other mail list directly from Exchange server Exchange Server Administration 1
T Outlook creates a copie of every mail I send Using Outlook.com accounts in Outlook 4
N Please advise code received new mail Using Outlook 0
M Outlook 2010 How could I globally redesign an outlook template form/region/inspector template used to display mail lists or an individual mails? Outlook VBA and Custom Forms 0
A How to stop user form from disapearing once mail window is closed? Outlook VBA and Custom Forms 0
M Outlook, send to > mail recipient - results in plain text email Using Outlook 1
R How to Sync *all* Google Workspace Mail Folders with Outlook 2019 (MS365) Using Outlook 3
S Outlook VBA How to adapt this code for using in a different Mail Inbox Outlook VBA and Custom Forms 0
E Having some trouble with a run-a-script rule (moving mail based on file type) Outlook VBA and Custom Forms 5
S Outlook email to configure setup for each mail Outlook VBA and Custom Forms 1
L Correct E-Mail Pulling Wrong Mail Using Outlook 5
S Outlook mail adressing stops after first match in GAL Using Outlook 0
P Outlook 2013 All imported Mail Rules in error when imported into new profile Using Outlook 5
S Outlook Macro to send auto acknowledge mail only to new mails received to a specific shared inbox Outlook VBA and Custom Forms 0
S Outlook Macro to move reply mail based on the key word in the subjectline Outlook VBA and Custom Forms 0

Similar threads

Back
Top