Hallo,
ich möchte aus einem Dok eine Email per LS an mehrere Empfänger senden, die in zwei Feldern des Doks sind:
Feld1 (dort kann nur einer stehen)
Feld2 (dort können mehrere Peronen sein)
Die Empfänger werden per Schalter aktiviert:
S_Feld1
S_Feld2
Ich habe mir ein Zwischenfeld "Empfaenger" erstellt, wo die möglichen Empfänger zusammengefasst werden:
tmpVielFeld2 := @Implode(Feld2 + ", ");
tmpFeld2 := @If(S_Feld2 ="Y"; tmpVielFeld2; "" );
tmpFeld1 := @If(S_Feld1 ="Y"; Feld1 + ", "; "" );
tmpFeld2 + tmpFeld1
Die LS-Mail wird per Schaltfläche an "Empfaenger" verschickt:
If doc.S_Feld1(0)="Y" Or doc.S_Feld2(0)="Y" Then
Message.SendTo=doc.Empfaenger
Message.Subject = "bla"
Call rtitem.AppendText("bla-bla. " )
Call rtitem.AddNewLine( 1 )
Call rtitem.AppendDocLink( doc, "" )
Call Message.Send( False )
End If
Aber irgendwie funktioniert das Ganze nicht richtig. Entweder wird die Email nicht an alle ausgewählten Empfänger verschickt, oder wenn ich etwas ändere, dann werden Empfänger doppelt angezeigt etc...
So z.B funktioniert es auch nicht:
tmpFeld2 := @If(S_Feld2 ="Y"; tmpVielFeld2+ " ,"; "" );
Wie kann das Ding verbessert werden?
Gruß
Leo