Mahnungen, Ust-Antrag, Kundenuebersicht, EORI, etc.

This commit is contained in:
2024-06-05 11:51:52 +02:00
parent 9dc2d9f29e
commit 2ac6eed7ae
16 changed files with 276 additions and 127 deletions

View File

@@ -1118,7 +1118,7 @@ Public Class frmFormulare
Mail.HTMLBody = "<div style=""font-family:Calibri, Arial"">" & TextHTML & "</div>"
Mail.Subject = tX.txt_betreff
Mail.Subject = IIf(tX.txt_betreff <> "", tX.txt_betreff, " ")
If AVISO IsNot Nothing Then
Mail.Subject = Mail.Subject.Replace("%LKW%", AVISO.LKW_Nr)
Mail.Subject = Mail.Subject.Replace("%LKWKennzeichen%", AVISO.LKW_Nr)