How to define a whitelist in Lotus Script to prevent spam

I would like to create an agent in client Notes who can says …

If the sender is not in my white list (write in lotus script ) , move the mail to another folder …

I have only fifty addresses accepted, all the other will be rejected …

please help me , how can I write this agent for client notes … How can it possible …

Many thanks

Subject: How to define a whitelist in Lotus Script to prevent spam

I try this :

http://www.dominopower.com/issues/issue200305/00001039001.html

I create this agent in one client notes , but its says , Object variable no set when I run the agent …

The agent stop at :

If doc.HasItem(“$DNSBLSite”) Then

In fact there are no variable define in my mail prefernces form client ?? with “$DNSBLSite” ??

If doc.HasItem(“SMTPOriginator”) Then

also …

What can i do ?