VB Script?

Peter S. Taler · 17. Juli 2018

Moinsen,

ja das ist ein AutoIT Forum! Ist mir auch klar. Trotzdem vielleicht kann mir jemand helfen? ich setze gerade einen hmail server auf - und brauche eine Regel die es dort so nicht gibt - man kann aber VB Scripts einbinden.

Das Script soll den Betreff eines Mails in der Gestallt ändern, dass SPAM vor dem Betreff steht?

Ich verstehe von VB --> NICHTS.

Danke für ev. hilfe.

Gruß

Peter

Ps.: Ja ich bin zu faul mich in einem entsprechenden forum anzumelden

**alpines** · 17. Juli 2018

Wir bieten auch Support für andere Sprachen an: Andere Programmiersprachen

Oscar kannste das bitte verschieben?

Ich kenne mich mit hmail auch nicht aus aber mit ein bisschen googlen habe ich z.B. das hier gefunden: https://www.hmailserver.com/forum/viewtopic.php?t=17985

Im Grunde brauchst du vor VB keine Angst zu haben, es ist einfach nur schlechtes C#. Außerdem ist das kein VB sondern VBS.

Soll denn vor jeder Mail Spam stehen? Oder nur vor bestimmten, wenn ja welchen?

Das Event, das du suchst, ist vermutlich OnAcceptMessage und dessen Parameter oMessage.

Ich schätze mal einfach die Apostrophs entfernen (Kommentare) und deinen Code dort reinschreiben.

Peter S. Taler · 17. Juli 2018

Das macht die Regel z.B wenn Absender = xyz dann ----> Schreibe ins Betreff...

Leider gibt es keine vorgefertigte Reaktion. Es gibt aber die Möglichkeit als (Then)Ergebnis ein VBS Script aufzurufen...

Gruß

Peter

Ps.: Tzzz das ist wieder typisch ICH HABE gegoogelt und nichts brauchbares gefunden. Wenn ich trotzdem Code schnorren könnte wäre mir geholfen (Terminpresse :)) --> danke

**alpines** · 17. Juli 2018

Was kannst du denn dem Script alles übergeben? Hast du dafür ein Template was du anpassen könntest?

**Oscar** · 17. Juli 2018

[verschoben nach "Andere Programmiersprachen"]

Peter S. Taler · 17. Juli 2018

Es gibt diese Beispielseite, die mir zugegeben nicht sehr viel weiter hilft...

https://www.hmailserver.com/do…ge=feature_rules_examples

Dabei ist von einem Event Script die Rede - dies hat folgenden Inhalt:

-------------

Sub OnClientConnect(oClient)

' End Sub

' Sub OnSMTPData(oClient, oMessage)

' End Sub

' Sub OnAcceptMessage(oClient, oMessage)

' End Sub

' Sub OnDeliveryStart(oMessage)

' End Sub

' Sub OnDeliverMessage(oMessage)

' End Sub

' Sub OnBackupFailed(sReason)

' End Sub

' Sub OnBackupCompleted()

' End Sub

' Sub OnError(iSeverity, iCode, sSource, sDescription)

' End Sub

' Sub OnDeliveryFailed(oMessage, sRecipient, sErrorMessage)

' End Sub

' Sub OnExternalAccountDownload(oFetchAccount, oMessage, sRemoteUID)

' End Sub

-----------------------------------------

LG

Peter

**alpines** · 17. Juli 2018

Das ist doch genau was du suchst. Du öffnest die Events\EventHandler.vbs und fügst dort eine neue Funktion ein z.B.

VB.Net

Sub OnSpamRule(oMessage)
   oMessage.Subject = "[SPAM] " & oMessage.Subject
   oMessage.Save
End Sub

Anschließend wählst du in hmail für die Einstellungen der Regel "Run function" in dem Dropdown aus und trägst deine Funktion OnSpamRule ein.

Peter S. Taler · 17. Juli 2018

alpines

Vorab -- DANKE!

Funktioniert. Wenn ich mir meinen Beitrag von oben nach unten durclese - hätte ich auch alleine draufkommen können - schwer war es ja nicht. Aber manchmal hat mean ein Brett vor dem Kopf - das wohl 50cm - 100 cm DICK ist :).

Dann hilft um Hilfe fragen! Warum ? Wohl weil man gezwungen ist das Problem zu beschreiben und Informationen zusammezutrgen - dann liegt die Lösung oft sehr nahe.

Ich danke Dir.

Beste Grüße

Peter

--> Closed weil das so funktioniert.

Ps.: Hat hier jemand erfahrung mit dem hServer?

Teilen