Mailversand mit WagoLibMail02

2020-02-28T16:50:59.830000Z

Heijeijeijeijei !!!

Jetzt habe ich in Beispiel 2 zur WagoLibMail_02 doch noch ein Beispiel fürs Versenden eines Attachments gefunden. Da stellt sich dann heraus, dass ich einfach zu logisch gedacht hatte. Habe gemeint, entweder man hat ein File vorliegen und gibt dann nur dessen Namen an oder man gibt direkt den Speicherbereich an, den man verschicken will (siehe die zwei vermeintlichen Alternativen in meinem Eingangsposting), dann könne man sich den Filenamen sparen.

Nein, man braucht (also Gurt und Hosenträger). Die Daten müssen in einem Buffer stehen, der mit ptAttachment und diAttachmentLength spezifiziert wird. sAttachmentFileName braucht man zusätzlich - aber nicht um auf ein fixfertiges, nur noch anzuhängendes File zu verweisen, sondern lediglich um dem beim Aufruf des Mailhandlers sozusagen "on the fly" erzeugten Attachment einen Namen zu geben.

Also Pappnase auf und ab ins Getümmel !

Mailversand mit WagoLibMail02

2020-02-28T16:50:57.082000Z

gravieren hat geschrieben:
Hast du den Dateinamen richtig angegeben ?
Ja

gravieren hat geschrieben:
Was sagt die Anleitung hierzu ?
Nix. Habe noch die Schreibweisen "alles klein" (wie Beispiel in Anleitung) und "alles groß" (wie's der PLC-Browser anzeigt) probiert => wieder nix.

gravieren hat geschrieben:
Die Neueste LIB von Wago wirst du ja schon verwenden ?
Ja. Was neueres als WagoLibMail_02 finde ich bei Wago nicht.

dann wünsche ich mal gutes Rutschen !

Mailversand mit WagoLibMail02

2020-02-28T16:50:49.299000Z

Hast du den Dateinamen richtig angegeben ?

Was sagt die Anleitung hierzu ?

Die Neueste LIB von Wago wirst du ja schon verwenden ?

Mailversand mit WagoLibMail02

2020-02-28T16:50:46.507000Z

Hallo Karl,

gravieren hat geschrieben:
Siehe hier geht es zur FTP-Hilfestellung:
http://www.magnia.de/index.php?option=c ... &Itemid=44
Vielen Dank für die Anleitung. Habe jetzt also meine Testdatei (kurzer Text, erzeugt im Windows Editor) per FTP hochgeladen, im PLC-Browser auch gefunden und dann per Email verschickt - gleiches Ergebnis: an der Email hängt ein leeres File mit dem richtigen Namen, aber der Länge 117 Bytes (so angezeigt in MS Outlook) bzw. 0 KB (so angezeigt im Windows Browser).

Wie mir der Befehl "fds" des PLC-Browsers verrät, habe ich auf der Wago nicht mehr so schrecklich viel Speicherplatz (mit der nur 24 Byte langen Testdatei im Bauch sind es knapp 20 KB). Kann das ein Problem sein ?

Das gleiche Ergebnis erhalte ich übrigens, wenn ich die Testdatei auf der Wago lösche und dann die Email versende. Das heisst, es wird beim Versenden gar nicht ernsthaft versucht, eine Datei zu finden und dranzuhängen, sondern die leere Dateihülle wird automatisch drangeklatscht, egal ob die spezifizierte Datei da ist oder nicht.

Mailversand mit WagoLibMail02

2020-02-28T16:50:38.519000Z

Wühlmaus hat geschrieben:
Ich weiß jetzt nicht recht wie das mit FTP geht

Siehe hier geht es zur FTP-Hilfestellung:
http://www.magnia.de/index.php?option=c ... &Itemid=44

P.S.: Das mit der Datei erzeugen durch das PLC-Programm sollten wir etwas veschieben.

Der Code hierfür ist nicht recht geeignet
Das File-Schreiben werden wir erst später anschauen.
(Kurze info hierzu; Flankensteuerung, State-Maschine)

Gruß Karl

Mailversand mit WagoLibMail02

2020-02-28T16:50:35.590000Z

gravieren hat geschrieben:
Hast du diese Datei geschlossen ? (fclose-befehl)
Ansonsten kann KEIN Lesezugriff einer 2.ten Instanz erfolgreich sein.

Ja.

Hier der Code, der das File schreiben soll (WriteFile wird testweise durch einen Button in der Visu aktiviert):

IF WriteFile THEN
   FileID:=SysFileOpen (FileName:='TagesDaten.dat', Mode:= 'w') ;              (* Rückgabewert 1 *)
   ByteCnt := SysFileWrite (File:=FileID, Buffer:=ADR(ShortHistory),SIZEOF(ShortHistory));    (* 7296 - könnte passen *)
   FileStatus := SysFileClose (File:= FileID);     (* TRUE, heißt angeblich "alles OK" *)
END_IF

Nachdem ich das jetzt nochmal probiert habe, lässt sich diese Datei auch manuell nicht mehr runterladen. (Dienstnummer: 49, Fehlernummer 80, aber die CoDeSys Hilfe kennt beide Begriffe nicht - tolle "Hilfe").

Auch vorheriges Löschen des zu schreibenden Files bringt nichts (sollte eigentlich nicht nötig sein). "Alles bereinigen" bringt auch nichts. Jetzt suche ich noch nach dem Menüpunkt "Alles in die Tonne treten", und dann weiß ich was ich tue.

gravieren hat geschrieben:
Ich denke, du kannst NUR eine Datei versenden.

Hmmm... warum bietet die WagoLibMail_02 dann die Alternative mit Pointer und Länge ? Aber egal, Datei wäre mir ja auch recht - nur gehen sollte es halt ...

gravieren hat geschrieben:
Mach doch mal einen Test.
Schreibe eine Datei per FTP in deine Steuerung.
Gib nun diesen Dateinamen an zum versenden.
(Hiermit kannst du sicherstellen, dass die Datei von deinem SPS-Programm NICHT gesperrt wird)
(Z.b.für das schreiben geöffnet ist)
Wenn das klappt, rühre dich wieder.

Ich weiß jetzt nicht recht wie das mit FTP geht - hab's mal mit dem Befehl "Online > Datei in Steuerung laden" probiert, unter anderem Namen. Das Hochladen geht, aber das Verschicken dieser Datei unter neuem namen schlägt fehl (leeres Attachment).

Irgendwie scheine ich hier in ein schwarzes Loch zwischen CoDeSys und Wago gefallen zu sein.

Mailversand mit WagoLibMail02

2020-02-28T16:50:27.492000Z

Wühlmaus hat geschrieben:
Ich schon wieder ...

Du schon wieder

Wühlmaus hat geschrieben:
1. zu übermittelnde Daten in eine Datei geschrieben und dann versucht, diese als Attachment an die Statusmail anzuhängen, indem ich den Aufruf des MAIL_ESMTP_Client um "sAttachmentFileName := 'TagesDaten.dat'" ergänzte. Ergebnis: Es wird zwar eine Datei mit dem gewünschten Namen angehängt, diese ist aber leer. Wenn ich hingegen in der CoDeSys-Umgebung die Datei manuell herunterlade (Online > Datei aus Steuerung laden), ist die Datei komplett. Leider ist manuelles Herunterladen keine Option für meine Anwendung.

Hast du diese Datei geschlossen ? (fclose-befehl)

Ansonsten kann KEIN Lesezugriff einer 2.ten Instanz erfolgreich sein.

Wühlmaus hat geschrieben:
2. Statt wie zuvor die Daten über den Dateinamen anzusprechen, habe ich die Daten mit folgenden Parametern im MAIL_ESMTP_Client Aufruf spezifiziert
ptAttachment := ADR(History.LongHistory) ,
diAttachmentLength := SIZEOF(History.LongHistory) ,
wobei LongHistory ein Array vom Typ HistoryElement ist, den ich zuvor als Datentyp definiert habe (mittels STRUCT). History ist das Programm (Typ PRG), in dem das Array definiert ist. Ergebnis: an die Email wird gar nichts angehängt.
Versuche mit Verringerung des Datenvolumens auf wenige Bytes oder Verlagern des Arrays (VAR RETAIN) brachten auch keine Verbesserung.
Was also mache ich jetzt schon wieder falsch ?

Ich denke, du kannst NUR eine Datei versenden.

Mach doch mal einen Test.

Schreibe eine Datei per FTP in deine Steuerung.
Gib nun diesen Dateinamen an zum versenden.
(Hiermit kannst du sicherstellen, dass die Datei von deinem SPS-Programm NICHT gesperrt wird)
(Z.b.für das schreiben geöffnet ist)

Wenn das klappt, rühre dich wieder.

Mailversand mit WagoLibMail02

2020-02-28T16:50:24.566000Z

Ich schon wieder ...

Nachdem mit den zuvor erörterten Lösungen der Mailversand von der WAGO 750-841 nun zuverlässig funktioniert, wollte ich nun ein Attachment mit Daten hinzufügen. Ziel: die tägliche Statusmail mit History-Daten der letzten 24 h versehen, um sie offline auswerten (z.B. Zeitverläufe grafisch anzeigen) zu können.

Zwei Wege führten nicht zum Ziel:
1. zu übermittelnde Daten in eine Datei geschrieben und dann versucht, diese als Attachment an die Statusmail anzuhängen, indem ich den Aufruf des MAIL_ESMTP_Client um "sAttachmentFileName := 'TagesDaten.dat'" ergänzte. Ergebnis: Es wird zwar eine Datei mit dem gewünschten Namen angehängt, diese ist aber leer. Wenn ich hingegen in der CoDeSys-Umgebung die Datei manuell herunterlade (Online > Datei aus Steuerung laden), ist die Datei komplett. Leider ist manuelles Herunterladen keine Option für meine Anwendung.

Statt wie zuvor die Daten über den Dateinamen anzusprechen, habe ich die Daten mit folgenden Parametern im MAIL_ESMTP_Client Aufruf spezifiziert
ptAttachment := ADR(History.LongHistory) ,
diAttachmentLength := SIZEOF(History.LongHistory) ,
wobei LongHistory ein Array vom Typ HistoryElement ist, den ich zuvor als Datentyp definiert habe (mittels STRUCT). History ist das Programm (Typ PRG), in dem das Array definiert ist. Ergebnis: an die Email wird gar nichts angehängt.

Versuche mit Verringerung des Datenvolumens auf wenige Bytes oder Verlagern des Arrays (VAR RETAIN) brachten auch keine Verbesserung.

Was also mache ich jetzt schon wieder falsch ?

Mailversand mit WagoLibMail02

2020-02-28T16:50:16.811000Z

Hallo Karl, (schön, dass du jetzt einen Namen hast )

vielen Dank. Das hat geholfen - die Freischaltung von Port 123 für SNTP hatte gefehlt.

Und wenn ich mal ganz viel Langeweile habe, implementiere ich auch noch die automatische Sommerzeitumstellung, aber da habe ich ja noch Zeit bis Ende März...

Mailversand mit WagoLibMail02

2020-02-28T16:50:14.065000Z

Wühlmaus hat geschrieben:
mit ptbtime1.ptb.de [192.53.103.108] versucht. Obwohl der auf PING antwortet, setzt er meine RTC nicht (Intervall ist auf 300 s gesetzt).
Allerdings fehlt mir jetzt die Zeit, das mit allen bekannten Zeitservern durchzudeklinieren.

Wo ist dein "großer Bruder"

Siehe hier:
http://www.wago.com/cps/rde/xchg/SID-99 ... u-3862.htm

Thema:
Sommer-/Winterzeitumstellung im Ethernet Controller 750-841
bei Verwendung des SNTP-Protokolls, ZIP-Datei

Gruß Karl

Recent posts to Mailversand mit WagoLibMail02

Mailversand mit WagoLibMail02

Mailversand mit WagoLibMail02

Mailversand mit WagoLibMail02

Mailversand mit WagoLibMail02

Mailversand mit WagoLibMail02

Mailversand mit WagoLibMail02

Mailversand mit WagoLibMail02

Mailversand mit WagoLibMail02

Mailversand mit WagoLibMail02

Mailversand mit WagoLibMail02