0

Mail mit mehrere Anhänge

Hallo zusammen,

 

habe wie im Screenshot zu sehen ist, 2 Bild Bausteine mit den Namen: VorschauPDF und VorschauZeichnung.

Nebenbei noch ein Button mit "PDF generieren" der mit dem Code versehen ist:

let me := this;
VorschauPDF := null;
VorschauPDF := importFile(this, printAndSaveRecord(this, "Layout1"), "Protokoll" + " " + Wohnungen.Wohnungsnummer + " " + Wohnungen.Immobilie.'Straße, Hausnummer' + " " + Datum + ".pdf");
VorschauZeichnung := null;
VorschauZeichnung := importFile(this, printAndSaveRecord(this, "Layout2") + "Zeichnung" + " " + Wohnungen.Wohnungsnummer + " " + Wohnungen.Immobilie.'Straße, Hausnummer' + " " + Datum + ".pdf")

Wenn ich diesen Code ausführen lasse, kommen die 2 Layouts als PDF in die Bildboxen VorschauPDF und VorschauZeichnung.

So weit funktioniert es bis auf die Dateinamen vergebung.

Jetzt gehts weiter, dann habe ich unten ein Button mit "Protokoll abschließen"  der ist mit dem Code:

let me := this;
let d := dialog("Wartungsprotokoll abschließen", "Möchten Sie das Wartungsprotokoll wirklich abschließen und eine Mail an Büro test versenden ? ", ["Ja", "Abbrechen"]);
if d = "Ja" then
let myTO := "bericht@test.de";
sendEmail({
from: userEmail(),
to: myTO,
subject: "Wartungsprotokoll" + " " + Wohnungen.Wohnungsnummer + " " + Wohnungen.Immobilie.'Straße, Hausnummer' + " " + Datum,
text: "Hallo , anbei erhalten Sie das Wartungsprotokoll. Beste Grüße,",
html: "<b>" + "Hallo, " + "<br><br>" + "anbei erhalten Sie das Wartungsprotokoll." + "<br><br>" + "Beste Grüße" + "</b>",
attachments: 
let: Status := 2
});
let newRecord := (create WhgWartung);
openRecord(newRecord);
openTable("DashboardAndroid")
end

1.So wie könnte ich beide Bild Dateien mit den PDF`s in den Anhang mit einbinden ?

attachments: VorschauPDF + VorschauZeichnung,     <-Diesen Code erlaubt er, aber im Mail finde ich kein Anahng, z.B. wenn ich nur VorschauPDF schreibe dann habe ich den Inhalt als Anhang.

Im Forum habe ich schon recherchiert kam aber nicht weiter.  

Ich danke im vorraus.

Beste Grüße

5 Antworten

null
    • info.43
    • vor 3 Jahren
    • Gemeldet - anzeigen

    Habe es 2 Tage lang versucht, und jetzt wo ich es hier gepostet habe hab ich es hinbekommen, für die Leute die wissen wollen wie es sein soll:

    habe oben noch zuweisungen getroffen;

    let att1 := VorschauPDF;
    let att2 := VorschauZeichnung;

    und 

    attachments: [att1, att2],

    und so hat es funktioniert. 

    • Leonid_Semik
    • vor 3 Jahren
    • Gemeldet - anzeigen

    Hallo Info,
    zuerst zu den Dateinamen:
    Die Dateinamen dürfen keine Sonderzeichen und auch äöüß  erhalten. Auch die Punkte sind nur vor der Dateierweiterung erlaubt. Das wird bei dir mit dem Datum schon mal problematisch. Man kann es mit einer Funktion abfangen.

    ---

    let me := this;
    function Dateiname(TT : text) do
    let mySTR := ["Ä", "Ü", "Ö", "ä", "ü", "ö", "ß"];
    let myARR := ["Ae", "Ue", "Oe", "ae", "ue", "oe", "ss"];
    let myT := TT;
    for ii in range(0, 7) do
    let myS := "[" + item(mySTR, ii) + "]";
    myT := replacex(myT, myS, item(myARR, ii))
    end;
    replacex(myT, "[~ "" # % & * : < > ? / \ { | }.]", "_")
    end;
    let myFileName:=Wohnungen.Wohnungsnummer + "_" + Wohnungen.Immobilie.'Straße, Hausnummer' + "_" +format( Datum,"DD_MM_YYYY");
    importFile(this, printAndSaveRecord(this, "Layout1"), "Protokoll" + "_" + Dateiname(myFileName)+".pdf");
    sleep(1000);
    VorschauPDF:= "Protokoll" + "_" + Dateiname(myFileName)+".pdf"
    importFile(this, printAndSaveRecord(this, "Layout2") , "Zeichnung" + "_" + Dateiname(myFileName)+".pdf")
    sleep(1000);
    VorschauZeichnung:= "Zeichnung" + "_" + Dateiname(myFileName)+".pdf"

    ---

     

    zu Attachments:

    ---

    attachments: [VorschauPDF,VorschauZeichnung]

    ---

     

    Leo

    • info.43
    • vor 3 Jahren
    • Gemeldet - anzeigen

    Hallo Leonid, danke erstmals für deine Mühe es ist sehr clever kodiert.

    ich bekomme die Meldung:

    Ende erwartet: importFile in Zeile 16, Spalte10.

    für diese Zeile : importFile(this, printAndSaveRecord(this, "Layout2") , "Zeichnung" + "_" + Dateiname(myFileName)+".pdf");

    habe mir erstmal gedacht dass hinten eine Semikolon fehlt aber das ist es auch nicht.

    Woran könnte es liegen ?

    • Leonid_Semik
    • vor 3 Jahren
    • Gemeldet - anzeigen

    Es fehlt auch eine Semikolon in der vorherigen Zeile:

    ----

    let me := this;
    function Dateiname(TT : text) do
    let mySTR := ["Ä", "Ü", "Ö", "ä", "ü", "ö", "ß"];
    let myARR := ["Ae", "Ue", "Oe", "ae", "ue", "oe", "ss"];
    let myT := TT;
    for ii in range(0, 7) do
    let myS := "[" + item(mySTR, ii) + "]";
    myT := replacex(myT, myS, item(myARR, ii))
    end;
    replacex(myT, "[~ "" # % & * : < > ? / \ { | }.]", "_")
    end;
    let myFileName:=Wohnungen.Wohnungsnummer + "_" + Wohnungen.Immobilie.'Straße, Hausnummer' + "_" +format( Datum,"DD_MM_YYYY");
    importFile(this, printAndSaveRecord(this, "Layout1"), "Protokoll" + "_" + Dateiname(myFileName)+".pdf");
    sleep(1000);
    VorschauPDF:= "Protokoll" + "_" + Dateiname(myFileName)+".pdf";
    importFile(this, printAndSaveRecord(this, "Layout2") , "Zeichnung" + "_" + Dateiname(myFileName)+".pdf");
    sleep(1000);
    VorschauZeichnung:= "Zeichnung" + "_" + Dateiname(myFileName)+".pdf"

    ---

    • info.43
    • vor 3 Jahren
    • Gemeldet - anzeigen

    läuft Perfekt, Danke Leo!

Anmelden, um zu antworten

Content aside

Kategorien

Alle Themen anzeigen
  • vor 3 JahrenZuletzt aktiv
  • 5Antworten
  • 231Ansichten