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.
 
S

Sue Mosher [MVP]

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?
 
B

ben

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
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 2
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
MrMayor SENT mail not reloading to top?? Using Outlook 4
Terry Sullivan Sender Field Displays My E-Mail Address, Not My Name Using Outlook 1
ThinkToday Calculate reply time of outlook mail Using Outlook 1
B Outlook 2010 Opening Mail Attachment Using Outlook 2
e_a_g_l_e_p_i Is it possible it set the fonts used to read incoming mail Using Outlook 25
D Mail in Sent Items Gone Using Outlook 12
M Managing Gmail "All Mail" sync issues with IMAP Using Outlook 1
GregS Outlook 2016 Sent Mail absent from Sent Mail or Sent Items Folders Using Outlook 4
GregS Why is Outlook 2016 mail in Outlook.com? Using Outlook 1
S Outlook not receiving mail Using Outlook 1
Commodore Outlook (2013) issues with icloud.com mail Using Outlook 0
GregS Outlook 2016 iPhone won't download Outlook 2016 Mail. Using Outlook 0
A Arthur needs help with 2007 Outlook e-mail Using Outlook.com accounts in Outlook 3

Similar threads

Top