Domino 9 und frühere Versionen > ND8: Entwicklung

Script Mailweiterleitung

<< < (2/2)

Lysienne:
nochmal danke für die Hilfe - es funktioniert.
Noch eine Frage zu
Call docNew.Send(false)

True bedeutet ja das ich die maske mitsende. Innerhalb von Notes ist ja wohl false die richtige Wahl.
Wie ist denn das wenn ich nach extern versende.
Kann das leider nicht in meiner testumgebung testen


Sub Initialize
   
   Const sForward = "blabla"
   Dim session As New NotesSession
   Dim note As NotesDocument
   Dim docNew As NotesDocument
   Dim db As NotesDatabase
   Dim item As NotesItem
   Dim Betreff As string
   Set session = New NotesSession
   Set db = session.CurrentDatabase
   Set note = session.DocumentContext
   Set item = note.GetFirstItem("Body")
   
   Betreff = UCase("test")
   
   If InStr (UCase(note.Subject (0)), Betreff ) then
         Set docNew = New NotesDocument(db)
         docNew.Form = "Memo"
      Call item.copyitemtodocument(docNew, "")
      docNew.SendTo = sForward
      docNew.From = " " & note.From(0)
         docNew.Principal = " " & note.From(0)
         docNew.Subject = note.Subject(0)
   
   Call docNew.Send(false)
   
   End if
End Sub

koehlerbv:
Wenn Du nach extern (SMTP) *mit* Maske sendest, dann ist das noch viel, viel sinnfreier: Was würde dem Empfänger *ohne* Notes ein Mail senden, in der ein Gestaltungsdokument aus Notes sinnfrei die Mail aufbläht? Er kann damit ja gerade genau Null anfangen. Das wäre genau das gleiche, als wenn ich aus Outlook Informationen zu einer internen Anpassung an einen Empfänger rmit ... irgendwas anderem senden würde. Oder von mir aus auch an Notes.
Und da SMTP so einen Zauber gar nicht kennt / nicht in den RFCs hat, würde der Router eine Notes-Mail vor dem Versenden via SMGTP eh um alles strippen, was da nicht hin gehört.

HTH,
Bernhard

Lysienne:
 :)
Bist schon fit Bernhard

Hast du eigentlich auch noch andere Hobbys? ;)

Gut solche Leute hier im Forum zu haben.

koehlerbv:
Ooooh ja, ich habe auch andere Hobbies. Und war in in letzter gar nicht mehr so aktiv hier (nach x sehr aktiven Jahren hat man halt sehr viel eh schon mal geschrieben, oft mehr als einmal), aber die Lust kommt wieder - wenn auch selektiv.

Ad andere Hobbies oder Beschäftigungen: Zeitgeschichte, versuchen, aktuelle Dinge in grössere Zusammenhänge einzuordnen. Spannend wie sonst nur irgend etwas. Fotografieren und Dinge aus anderer Sicht zu sehen - zur eigenen Freude und zu dem von Freunden. Und auch Dinge, die ein Loch haben und trotzdem nicht kaputt sind (Flugzeuge). Letzteres aus technischer Sicht - und nicht mit Bezug zu Punkt 2, ich bin kein Spotter. Eher der Bezug zu Punkt 1.

Bernhard

PS: Ich habe eine tolle Familie incl. erstem Enkelkind und einem Urgroßvater (vom Enkelkind). Das ist aber kein Hobby. Aber auch das ist ein sehr, sehr grosser Bestandteil meines Lebens, den ich sehr schätze.

Navigation

[0] Themen-Index

[*] Vorherige Sete