Printing outgoing mails

[NewED]

I have a rule in outlook 2003 :


Sub MyRule(Item As Outlook.MailItem)
If Item.Categories = "ZZZ" Then
If MsgBox("print mail?", vbYesNo) = vbYes Then
Item.PrintOut
End If
Else
Item.Display
If MsgBox("print mail?", vbYesNo) = vbYes Then
Item.PrintOut
Else

End If
End If
End Sub


the problem is that it only works on new mails that I write from within outlook. It dosent work when I use the "send to - mail recipient" function outside of word in order to send a file and write a mail.

Is there a solution?

thanks