SMTP Server Beispiele für die SPS

Mit dem FB_SmtpFull stehen sehr umfangreiche E-Mail-Funktionalitäten für die SPS zur Verfügung.

Beschreibung

In dem hier gezeigten Beispiel werden diese Möglichkeiten aufgezeigt:

Eine E-Mail wird nach dem Triggern der Variable bStart versendet.

ToDo: Konfiguriere die Mailserveradresse, die Zugangsdaten und die Pfade zu den Dateianhängen.

Download Sample2 TC3 project

Programm-Variablen

VAR
fbSmtpFull    : FB_SmtpV3_Full;
sMessage_HTML : STRING(500) := '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"><html><head><title>HTML-Test</title><body><h3>Dear SMTP-User,</h3>this e-mail was sent in HTML from <u>your PLC!</u><br/><br/>Best regards,<br/>your Beckhoff-Team</body></html>';
nPriority     : UDINT;
R_Edge     : R_TRIG;
bStart     : BOOL;
bError     : BOOL;
udErrId     : UDINT;
nMailCounter : UDINT := 0;
sFiles     : ARRAY [0..32] OF STRING(80) := ['c:\Temperatures.txt','c:\Log.txt']; (* TODO: Adjust file paths*)END_VAR

Programm-Code

fbSmtpFull(
sNetId:= '',
sSmtpServer:= 'mail.company.com',
sUsername:= 'TestUser',
sPassword:= 'TestPwd',
sFrom:= 'TestUser@company.com',
sTo:= 'service@company.com',
sSubject:= 'Email from your Beckhoff PLC',
nContentType:= 2, (* 2 = HTML *)
nPriority:= 1, (* 1 = HIGH *)        
sAttachments:= sFiles,
pMessage:= ADR(sMessage_HTML),
cbMessage:= SIZEOF(sMessage_HTML),
bExecute:= bStart,
bError=> bError,
bBusy=>bBusy,
nErrId=> nErrId);

IF NOT bBusy AND NOT bError AND bStart THEN
nState := 0;
bStart := FALSE;
END_IF

Voraussetzungen

Entwicklungsumgebung

Zielplattform

Einzubindende SPS-Bibliotheken

TwinCAT v3.0.0

PC or CX (x86)

Tc2_Smtp