Hallo,
eines vorweg - weiß herzlich wenig in Richtung Domino Designer und Agenten erstellen (->Lotus Script). Hätte folgende große Bitte. Ich habe auf der IBM Homepage ein interessantes Script entdeckt welches ich gern verwenden möchte. Es wertet die per Mail mitgeschickte Variable "X_Spam_Status" aus.
Nun meine Frage - habe den Eindruck dass das Skript 1:1 funktionieren könnte aber da wir die Mail von einem SuSE Slox
(Spam Schutz aktiv) geliefert bekommen weiß ich nicht ob der Inhalt der Variablen wirklich zum Skript passt.
Sowas bekomm ich in Lotus (abgeholt von Slox MailServer) geliefert:
X_SPAM_STATUS= "Yes, hits=8.6 required=5.0 tests=AWL,BAYES_00, DATE_IN_PAST_06_12,FORGED_THEBAT_HTML,HTML_MESSAGE, MIME_HTML_NO_CHARSET,MIME_HTML_ONLY,NORMAL_HTTP_TO_IP, RCVD_IN_BL_SPAMCOP_NET,RCVD_IN_DSBL,RCVD_IN_XBL autolearn=no version=2.64"
Passt dieser IBM Absatz darauf?
...
If Note.hasitem("X_Spam_Status") Then
paramarray = Evaluate({@explode(@ReplaceSubstring("}& note.X_Spam_Status(0) & {"; " "; " ") ;" ")})
Forall param In paramarray
params(Strleft(param, "=")) = Strright(param, "=")
End Forall
...
Vielleicht könnt ihr mir hier etwas helfen was mit explode und den
ganzen Semikolon passiert?
Abschließend noch das gesammte Skript:
Sub Initialize
Dim session As New NotesSession
Dim note As NotesDocument
Dim db As NotesDatabase
Dim paramarray As Variant
Dim params List As String
Set session = New NotesSession
Set db = session.CurrentDatabase
Set note = session.DocumentContext
If Note.hasitem("X_Spam_Status") Then
paramarray = Evaluate({@explode(@ReplaceSubstring("}& note.X_Spam_Status(0) & {"; " "; " ") ;" ")})
Forall param In paramarray
params(Strleft(param, "=")) = Strright(param, "=")
End Forall
If Val(params("hits")) >= 4.7 Then
Call db.EnableFolder("Spam")
Call note.PutInFolder( "Spam" )
Call note.RemoveFromFolder("($Inbox)")
End If
End If
End Sub
Alles was ich möchte ist, dass Post mit gesetztem X_SPAM_STATUS direkt nach unerwünschte Mails/Spam
weitergeleitet wird. Ja, es gibt Filterregeln, aber die
sind mir bislang nicht zuverlässig genug - gibt manipulierte
Spam die das anscheinend umgeht.
Wäre wahnsinnig nett wenn ihr mir hier helfen könntet!!!
Viele Grüße
Dreamwork
gern