Automate identifying junk senders

[wemeier]

I am trying to create an Outlook 2002 VB procedure that, when one or more messages are selected in the Inbox, will automatically execute the menu item:

Actions | Junk Email | Add to Junk Senders list

and then permanently delete the message(s) (not just move it to the Deleted folder).

Although I have coded in VB for a while, I am new to doing it for Outlook. Any help would be greatly appreciated.

Cruising the Information Superhighway
_{(your mileage may vary)}

 

[BrainB]

I don't think this method will work because junk mail senders keep using different email addresses.

I find Outlook strangely lacking in certain features. In Outlook Express I set 'Message Rules' (eg to put a file into the Deleted Items folder if it contains certain text etc). A bit of a pain to keep doing this, but does get rid of some garbage. Unfortunately spam senders are overcoming this by actually writing garbage words.



Regards
BrianB
Use CupOfCoffee to speed up all windows applications
================================

 

[BrainB]

I found it in Outlook under Tools/Organise.


Regards
BrianB
Use CupOfCoffee to speed up all windows applications
================================

 

[Harlequin007]

Hi Wemeier

I simply created a custom toolbar button and highlight the senders, click the button (which adds them to junk senders) then delete.

I then set-up a rule that perm deletes them if they send again.

I agree with Brian's point though - they do change name. However, I am currently collecting something like 12,000 Junk senders and If I sort them, their are commonalities with a lot of the e-mail addresses so I can simply set up a few rules to delete anything from those domains.

Hope that helped.


-----------------
Cogito Ergo Sum
-----------------

 

[wemeier]

Thanks for the input. I never intended to automatically scan the emails to do this. I just wanted a way to select which emails I wanted to include as "junk" and to add them to the junk senders list AND delete them with one click of the button.

I got around the problem by using the SendKeys command to generate the same keystrokes that I would do manually. I then assigned this command to a new toolbar button.

Cruising the Information Superhighway
_{(your mileage may vary)}