![]() |
If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Search this Thread | Display Modes |
#1
|
|||
|
|||
![]()
Hi
I am using function NewMailEx as per below code to process attachments from incoming messages. Problem is Outlook is skipping processing some of the mail items probably when there are a number of them coming at the same time. What is the problem and how can I fix it? Is there a more robust way to do this? I have avoided .net add-in due to installation issues. Thanks Regards Private Sub Application_NewMailEx(ByVal EntryIDCollection As String) Dim arr() As String Dim i As Integer Dim ns As Outlook.NameSpace Dim itm As MailItem Dim m As Outlook.MailItem Set ns = Application.Session arr = Split(EntryIDCollection, ",") For i = 0 To UBound(arr) Set itm = ns.GetItemFromID(arr(i)) If itm.Class = olMail Then Set m = itm For Each Atmt In m.Attachments ' Do some processing here Next Atmt End If Next Set ns = Nothing Set itm = Nothing Set m = Nothing End Sub |
Ads |
#2
|
|||
|
|||
![]() It shouldn't skip anything. Why do you think it does so? -- Best regards Michael Bauer - MVP Outlook : Outlook Categories? Category Manager Is Your Tool : VBOffice Reporter for Data Analysis & Reporting : http://www.vboffice.net/product.html?pub=6&lang=en Am Fri, 25 Sep 2009 02:47:44 +0100 schrieb John: Hi I am using function NewMailEx as per below code to process attachments from incoming messages. Problem is Outlook is skipping processing some of the mail items probably when there are a number of them coming at the same time. What is the problem and how can I fix it? Is there a more robust way to do this? I have avoided .net add-in due to installation issues. Thanks Regards Private Sub Application_NewMailEx(ByVal EntryIDCollection As String) Dim arr() As String Dim i As Integer Dim ns As Outlook.NameSpace Dim itm As MailItem Dim m As Outlook.MailItem Set ns = Application.Session arr = Split(EntryIDCollection, ",") For i = 0 To UBound(arr) Set itm = ns.GetItemFromID(arr(i)) If itm.Class = olMail Then Set m = itm For Each Atmt In m.Attachments ' Do some processing here Next Atmt End If Next Set ns = Nothing Set itm = Nothing Set m = Nothing End Sub |
#3
|
|||
|
|||
![]()
Heavy load?
Regards "Michael Bauer [MVP - Outlook]" wrote in message ... It shouldn't skip anything. Why do you think it does so? -- Best regards Michael Bauer - MVP Outlook : Outlook Categories? Category Manager Is Your Tool : VBOffice Reporter for Data Analysis & Reporting : http://www.vboffice.net/product.html?pub=6&lang=en Am Fri, 25 Sep 2009 02:47:44 +0100 schrieb John: Hi I am using function NewMailEx as per below code to process attachments from incoming messages. Problem is Outlook is skipping processing some of the mail items probably when there are a number of them coming at the same time. What is the problem and how can I fix it? Is there a more robust way to do this? I have avoided .net add-in due to installation issues. Thanks Regards Private Sub Application_NewMailEx(ByVal EntryIDCollection As String) Dim arr() As String Dim i As Integer Dim ns As Outlook.NameSpace Dim itm As MailItem Dim m As Outlook.MailItem Set ns = Application.Session arr = Split(EntryIDCollection, ",") For i = 0 To UBound(arr) Set itm = ns.GetItemFromID(arr(i)) If itm.Class = olMail Then Set m = itm For Each Atmt In m.Attachments ' Do some processing here Next Atmt End If Next Set ns = Nothing Set itm = Nothing Set m = Nothing End Sub |
#4
|
|||
|
|||
![]() I don't understand your answer. Does it really skip messages, or just attachments? If the first, process all the items within the folder, and flag those that are processed yet (user property); if the latter, it's due to the code you haven't provided. -- Best regards Michael Bauer - MVP Outlook : Outlook Categories? Category Manager Is Your Tool : VBOffice Reporter for Data Analysis & Reporting : http://www.vboffice.net/product.html?pub=6&lang=en Am Sat, 26 Sep 2009 20:12:24 +0100 schrieb John: Heavy load? Regards "Michael Bauer [MVP - Outlook]" wrote in message ... It shouldn't skip anything. Why do you think it does so? -- Best regards Michael Bauer - MVP Outlook : Outlook Categories? Category Manager Is Your Tool : VBOffice Reporter for Data Analysis & Reporting : http://www.vboffice.net/product.html?pub=6&lang=en Am Fri, 25 Sep 2009 02:47:44 +0100 schrieb John: Hi I am using function NewMailEx as per below code to process attachments from incoming messages. Problem is Outlook is skipping processing some of the mail items probably when there are a number of them coming at the same time. What is the problem and how can I fix it? Is there a more robust way to do this? I have avoided .net add-in due to installation issues. Thanks Regards Private Sub Application_NewMailEx(ByVal EntryIDCollection As String) Dim arr() As String Dim i As Integer Dim ns As Outlook.NameSpace Dim itm As MailItem Dim m As Outlook.MailItem Set ns = Application.Session arr = Split(EntryIDCollection, ",") For i = 0 To UBound(arr) Set itm = ns.GetItemFromID(arr(i)) If itm.Class = olMail Then Set m = itm For Each Atmt In m.Attachments ' Do some processing here Next Atmt End If Next Set ns = Nothing Set itm = Nothing Set m = Nothing End Sub |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
Auto processing of incoming mail | John[_11_] | Outlook and VBA | 1 | August 24th 09 08:41 PM |
Processing incoming emails | John[_11_] | Outlook and VBA | 3 | May 21st 08 05:42 PM |
Processing incoming emails | John[_11_] | Add-ins for Outlook | 3 | May 21st 08 05:42 PM |
Processing incoming emails | John[_11_] | Outlook and VBA | 0 | May 20th 08 09:06 PM |
Processing incoming emails | John[_11_] | Add-ins for Outlook | 0 | May 20th 08 09:06 PM |