Creditsave-Rountine, Mailsender, etc.

This commit is contained in:
2025-09-03 10:04:56 +02:00
parent 01a8f1f7ad
commit 18f433f345
6 changed files with 830 additions and 277 deletions

View File

@@ -1013,8 +1013,7 @@ Module Mail
If Body = "" Then
Body = "Anbei befinden sich die Auswertungen Zollanmeldungen von " & von.ToShortDateString & " bis " & bis.ToShortDateString & "." &
"<br><br>Erstellt am: " & Now.ToShortDateString & ", um " & Now.ToShortTimeString &
"<br><br><br>Automatisch generiertes E-Mail. Bitte Antworten Sie nicht an dieses E-Mail." &
"<br><br>VERAG SPEDITION AG"
"<br><br><br>Automatisch generiertes E-Mail. Bitte Antworten Sie nicht an dieses E-Mail."
Else
Body = replaceBodyVariable(Body, von, bis)