It took me a bit of researching and programming, but I figured out a way to do it.
The most frustrating part of it is that Outlook doesn't provide VBA access to the Internet Headers. Grr!
I don't know how many people might be interested in this, but if you are, my solution is behind the cut.
(
Solution )
Comments 6
Reply
Did you install Redemption?
Did you copy the VBA sub into your Outlook VBA project?
Is your Outlook security on high? If so, did you digitally sign the project?
Did you create the rule that tests X-Spam-Status?
Did you run it or the ManualSetSpamScoresForFolder() sub?
Did you see the SpamScore field in your column list?
Reply
- Yes I also loaded it in the Library Section
Did you copy the VBA sub into your Outlook VBA project?
- Yes
Is your Outlook security on high? If so, did you digitally sign the project?
- No lowest for testing
Did you create the rule that tests X-Spam-Status?
- Yes
Did you run it or the ManualSetSpamScoresForFolder() sub?
- Yes But I get an Runtime Error Methode "Value" for "UserProperty" is failed
Did you see the SpamScore field in your column list?
- Yes I can see a column
Reply
What version of Outlook are you running?
Reply
Reply
However, you don't need to use Redemption.
It is possible to get at the Outlook headers directly.
I've adapted the script to get the headers out of the Outlook.MailItem directly. (I also adapted the header for current versions of SpamAssassin).
It works like a charm. Congrats, and thank you for the help.
Reply
Leave a comment