Always keep Junk Mail folder empty in Outlook 2007

Posted on 2009-05-01
Medium Priority
Last Modified: 2012-08-13
We currently have SBS 2003 with only a handful of clients.  One person in management is insisting to have an empty junk mail folder.  We currently have Vamsoft installed which tags all spam as ***SPAM***.  

When I select "Permanently delete suspected junk-email instead of movitin it to the Junk E-Mail folder" in the Junk Mail Settings, it doesn't work... but that's what we need it to do.  
Question by:erikandre
LVL 15

Expert Comment

ID: 24280418
Create an outlook rule that checks the subject for ***SPAM*** and set the rule to delete the email.


Author Comment

ID: 24280560
Well, I have that in place, however, the Junk Mail folder still collects the emails and does nothing.  I think the rules only apply to messages that were not already pre-sorted into the Junk Mail folder.
LVL 15

Accepted Solution

zelron22 earned 672 total points
ID: 24280751
You could set archiving on the junk mail folder, to autoarchive anything over 1 day old, and delete it instead of saving it.  That's in the folder properties, archive tab.

You can create a macro to do it at the touch of a button:

LVL 76

Assisted Solution

by:David Lee
David Lee earned 664 total points
ID: 24281335
Hi, erikandre.

How about a macro that deletes items as they hit the junk mail folder?  Something like the code in the snippet.  It will delete items as they arrive in the junk mail folder.  Follow these instructions to use it.

1.  Start Outlook
2.  Click Tools->Macro->Visual Basic Editor
3.  If not already expanded, expand Microsoft Office Outlook Objects and click on ThisOutlookSession
4.  Copy the code from the Code Snippet box and paste it into the right-hand pane of Outlook's VB Editor window
5.  Edit the code as needed.  I included comment lines wherever something needs to or can change
6.  Click the diskette icon on the toolbar to save the changes
7.  Close the VB Editor
8.  Click Tools > Trust Center
9.  Click Macro Security
10. Set Macro Security to "Warnings for all macros"
11. Click OK
12. Close Outlook
13. Start Outlook.  Outlook will display a dialog-box warning that ThisOutlookSession contains macros and asking if you want to allow them to run.  Say yes.

Dim WithEvents olkFolder As Outlook.Items
Private Sub Application_Quit()
    Set olkFolder = Nothing
End Sub
Private Sub Application_Startup()
    Set olkFolder = Outlook.Session.GetDefaultFolder(olFolderJunk).Items
End Sub
Private Sub olkFolder_ItemAdd(ByVal Item As Object)
End Sub

Open in new window


Assisted Solution

josephms earned 664 total points
ID: 24293930
Disable junk email filtering in your Outlook.
Tools | Options | Junk E-mail | No Automatic Filtering. And make sure
your Blocked Senders list is empty.

Now your Outlook rule should work.


Featured Post

Making Bulk Changes to Active Directory

Watch this video to see how easy it is to make mass changes to Active Directory from an external text file without using complicated scripts.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

How to effectively resolve the number one email related issue received by helpdesks.
Take a look at these 6 Outlook Email management tools which can augment the working and performance of Microsoft Outlook to give you a more rewarding emailing experience.
CodeTwo Sync for iCloud (http://www.codetwo.com/sync-for-icloud?sts=6554) automatically synchronizes your Outlook 2016, 2013, 2010 or 2007 folders with iCloud folders available via iCloud Control Panel. This lets you automatically sync them with…
This is my first video review of Microsoft Bookings, I will be doing a part two with a bit more information, but wanted to get this out to you folks.
Suggested Courses
Course of the Month15 days, 18 hours left to enroll

850 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question