Well I still don't know why it does this but I did find a work around. I added the following code after:
sItem.Item = Item
If sItem.Item.UnRead = True then 'If mail message is unread
sItem.Item.UnRead = False 'Mark it as read...
I wrote some Outlook VBA code so that when a message is added to the Inbox, it creates a new folder named with the sender's name and moves the new message into that folder. The code works OK except that, if the sender has requested a read receipt, they get a "Your message was deleted without...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.