SPAM Mail Cleaning On Outlook 2003 Turkish?

[Erdin? E. Ka]

Hi everyone, :hi:

I want to stop receive some SPAM mails.
Everytime i have these SPAM mails which is includes SENDER NAME as "Mail Delivery System", "postmaster" or "MAELER-DAEMON" ...etc.

This SPAM mails sometimes coming to "Gelen Kusutu" folder sometimes to "?nemsiz E-Posta" Folder.

I need to 2 different solution:

My fisrt question is:
I want to clear "?nemsiz E-Posta" folder. Clear to all mail items with a VBA code at ..... _Open event. (If it possible).

My secont question is:
I want to clear when i clicked to "G?nder/Al" (Sent/Receive) button; mail items of "Gelen Kutusu" folder only which is includes:
sender address includes "Mailer-Daemon" or
sender name includes "Mail Delivery System" or
sender name includes "System Administrator" or
sender name includes "Mail Delivery Subsystem" +
mail item subject includes "Warning".

I attached the picture of Outlook screenshot.

This is my big problem, i will be very happy if i can find a solution for this.

3-4 weeks ago Dear Sue Mosher helped me to solve this problem at outlookcode.com website but i am inexperrienced and i think i didn't do the right thing.:dunno

Please help me. :help

Thanks in advance. :friends:

Not:
My current code is to solve only for my second problem:
(But i think i need to 2 different code)

Set TheProblemFolder = Application.GetDefaultFolder(olFolderInbox)
Count = TheProblemFolder.Items.Count
For i = Count To 1 Step -1
Set itm = TheProblemFolder.Items(i)
If Left(itm.SenderAddress, 13) = "Mailer-Daemon" Then
itm.Delete
ElseIf itm.SenderName = "Mail Delivery System" Then
itm.Delete
ElseIf InStr(itm.Subject, "Warning") > 0 Then
itm.Delete
End If
Next