Trigger VBA code every time a new email is received in Outlook doesn't work.

Hi Guys,

I found the following codes online and they're supposed to work for what I need to do, but for some reason they are not working. I placed the following codes under ThisOutlookSession but for some reason only the Private Sub Application_Startup () was triggered. The Private Sub olItems_ItemAdd(ByVal item As Object) did not trigger. Can someone tell me what I did wrong?

Please Login or Register  to view this content.

For some reason this portion of the code didn't trigger when I received a new mail.

Please Login or Register  to view this content.

Also, is it possible to change this code so instead of monitoring my "Inbox" folder, can it monitors a sub folder under my Inbox folder name "MyFolder"?

Thank you very much for your help.