Mail-Pumpe im UI modifizieren

[adminnaddel]

Hallo liebe Gemeinde,

wir haben eine Serienmail-db im Einsatz und diese läuft irgendwie schon seit 10 Jahren prima!

Nun aber kommt mein Chef auf den Gedanken diese zu verändern und zwar um die Absenderadresse.

Ich habe mir mal die Shotgun angeschaut und hier funktioniert das ja prima, doch bei unsere bekomme ich das einfach nicht hin!

Das Script holt sich beim Abschuß die Mail-Db des jeweiligen Initiator und pumpt alle erforderlichen Information hinein, sendet und schnappt sich ein neues Memo und beginnt von vorn.

Wenn ich mich nicht irre, so kann ich im UI die entsprechendn Felder nicht modifizieren um die Absenderadresse zu faken, also zwischen durch mal ein doc.save .... richtig?

lg
Andy

PS: Shotgun ist ja ein tolles Produkt für den internen Einsatz aber wehe dem man möchte eine eigene App als Adressbuch nutzen, na dann hat man bei der Konfiguration verloren 

[TMC]

(...)läuft irgendwie schon seit 10 Jahren prima(...)
Nun aber kommt mein Chef auf den Gedanken diese zu verändern und zwar um die Absenderadresse.
(...)
Wenn ich mich nicht irre, so kann ich im UI die entsprechendn Felder nicht modifizieren um die Absenderadresse zu faken, also zwischen durch mal ein doc.save .... richtig?

Hier würde ich jetzt das als Anlass nehmen, und das ganze von Grund auf neu mit dem Know-how und den Mitteln die das Jahr 2005 bietet, neu aufbauen   

Ein Spoofing funktioniert meines Erachtens nur vernünftig wenn Du die Mails über die mail.box versendest. Sprich Du erstellst dort drin ein neues Dok, füllst die Daten und speicherst. Durchs Speichern wird das Mail versendet.
UI würde ich bei Serienmails überhaupt nicht einsetzen, kann ja sein dass der Trigger nicht irgend ein Anwender ist, sondern ein nächtlicher Agent, der die Mails rausschicken will.
Würde ich also sauber im Backend abbilden. Dann noch ein schickes ErrorHandling, das Dir in eine nsf das Ergebnis schreibt.

[koehlerbv]

wir haben eine Serienmail-db im Einsatz und diese läuft irgendwie schon seit 10 Jahren prima!

Seit 10 Jahren ? Wenn mich meine Erinnerung nicht ganz täuscht, müsste die dann ja noch aus R3-Zeiten kommen 

Ich sehe das genauso wie Matthias: Bei Serienmails hat UI nix zu suchen. Ein Spoofing ist darüber sowieso vollkommen unmöglich. Zuverlässig geht das nur über die MAIL.BOX.

Bernhard

[Marinero Atlántico]

von http://www-10.lotus.com/ldd/today.nsf/0/ef1565a0b202808285256c94004fd0fb?OpenDocument (Julie Kadashevich, true intelectual):
How can I change the apparent sender of agent generated mail?
Sometimes you need to generate mail from an identity different from your own. For example, you may want to generate mail from the user Domino Administrator. There are three ways to do this:

    * Create a special ID for user Domino Administrator and sign the agent with that ID.
    * Use the Principal field in the agent code to override the From field.
    * Use the Run on behalf of field (new in Notes/Domino 6).


The first method is the simplest because it requires no coding. It does, however, involve licensing and maintaining IDs. The second method is more flexible, but requires some coding. You don't need any special rights, but the information about the original sender is maintained for auditing purposes. By default, the mail template displays the original sender's name in the sent by field under the From field. There are three ways to specify the Principal field:

    * doc.Principal="Joe User/Org@NotesDomain" where Joe User/Org has a Person record with an InternetAddress of your choosing. (Note that the string @NotesDomain must be present.)
    * doc.Principal="CN=Joe User/O=Org" where Joe User/Org has a Person record with an InternetAddress of your choosing.
    * doc.Principal=User@acme.org@NotesDomain <mailto:User@acem.org@NotesDomain>. (Note that the string @NotesDomain must be present.)


If you only care about the ReplyTo address, you can use it instead of the Principal, which changes both the From and ReplyTo:

Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim doc As NotesDocument
Dim item As NotesItem
Dim ToWho(40) As String
Dim FirstName(40) As String
Dim Msg As String
Set db = session.CurrentDatabase
Set doc = New notesdocument(db)
'*******************************************************************

Count = 30
ToWho(0)="joe@yahoo.com"
FirstName(0)="Joe"

ToWho(1) = "teresa@yahoo.com"
FirstName(1)="Teresa"

<more initialization code removed>

doc.Principal = "julie@yahoo.com@NotesDomain"
doc.Form = "Memo"

doc.Subject=" Happy Holidays!"
For i=0 To count
Greet = "Hi " +FirstName(i) +", Happy Holidays!"
Msg1 ="additional text"
doc.Body=Greet + Msg1
Print toWho(i)
Call doc.Send(True,toWho(i))
Next

As we show in the preceding code, @NotesDomain is a string that is expected in the syntax. Omitting this is often the problem when people report that the Principal field is not working.

The third method (Run on behalf of) is new to Notes/Domino 6. This field in Agent Properties allows one user to run an agent as though it were invoked by another user. You need special rights to run agents on behalf of other users. These rights are controlled through the "Sign agents to run on behalf of someone else" field in the Security tab of the Server document. If they have this permission, mail appears to come from the name specified in the Run on behalf of field. This is a very high level of rights and should only be granted carefully, as it allows one user to run agents on behalf of other users, including having their ACL rights when accessing databases.

[TMC]

Jo, das kann auch eine Lösung sein, Axel.

Wobei -- ich bevorzuge für Mail-Versand klar die mail.box. Als Programmierer bin ich da sehr flexibel. Habe da eine Routine die das für mich macht, und verwende ich auch, wenn ich nicht spoofen will. Ein Parameter für der Function ist da der der Absender. Wenn ich nicht spoofen will, kommt da dann z.B. session.username rein.

Auszug:

   Set docMail = dbMailbox.CreateDocument
   docMail.Form = "Memo"
   docMail.From = strSendAs
   docMail.Principal = strSendAs
   docMail.SendFrom = strSendAs
   docMail.SendTo = vSendTo
   docMail.CopyTo = vCC
   docMail.BlindCopyTo = vBCC
   docMail.Subject = strSubject
   docMail.PostedDate = Now()
   docMail.ComposedDate = Now()
   docMail.DeliveredDate = Now()
   Set rtitem = docMail.CreateRichTextItem( "Body" )

[koehlerbv]

Zur Methode 2 (Principal): Damit kommt leider nicht jeder SMTP-Router und nicht jeder Mail-Client klar.

Bombensicher ist nur die MAIL.BOX-Variante und das Run-on-behalf-of von R6 (wenn man dabei nicht vergisst, den richtigen Eintrag zu machen ...  ).

Bernhard

[Ralf_M_Petter]

Hallo

@Bernhard Die mailbox Methode ist eben genau nicht bombensicher, da nicht supported by Lotus. Gibt auch echte Probleme unter bestimmten Umständen, wenn man direkt in die Mailbox schreiben will und ND6. Bin jetzt zu faul zu suchen aber es gibt einen Thread wo Julie einen User genau auf das aufmerksam macht. Ist ähnlich dem auf den Axel verlinkt hat.

Grüße

Ralf