Outlook XP Add-in

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

My company like many companies has spam issues. I am developing a outlook add-in that can forward a message to a mailbox for further spam processing. This works, but is there a way that I can get the forwarded message to not show up in the users sent items folder. We are trying to get rid of spam and not make a copy of it hehe...

Here is what I am doing

Dim oEmailMessage As Outlook.MailItem = CType(m_olApp.ActiveInspector.CurrentItem, Outlook.MailItem)
Dim oNewEmailMessage As Outlook.MailItem = oEmailMessage.Forward
oNewEmailMessage.To = "(e-mail address removed)" 'Spam Address
oNewEmailMessage.Send()
oEmailMessage.Delete()

'The above code works...

If I add oNewEmailMessage.DeleteAfterSubmit = True then I get Object not set to instance of an object. Is there a way that I can prevent a forwarded message from being saved?
 
Skip the first question...I just figured it out.... My new question is instead of doing oEmailMessage.Delete() can I permanently delete the message?
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Simple way to autoforward 1
Outlook 2016 - "Run-time error '287': Application-defined or object-defined error" while using CurrentItem.Saveas or CurrentItem.HTMLBody 4
Outlook events stop work randomly 0
Outlook macro for specific email 0
Attaching mail items in Outlook 2010 7
How do I automatically open link in email? Outlook macro 1
Microsoft Outlook 11.0 Object Library 0
Outlook add-in accessviolationexception setting Body property 3

Back
Top