This commit is contained in:
2026-05-04 15:36:37 +02:00
7 changed files with 186 additions and 58 deletions

View File

@@ -1370,6 +1370,8 @@ Public Class frmStartOptions
betreff = betreff.Replace("%AbfertigungsNr%", SND.FilialenNr & "/" & SND.AbfertigungsNr)
betreff = betreff.Replace("%Standort%", "")
betreff = betreff.Replace("%Uhrzeit%", "")
betreff = betreff.Replace("%Absender%", "")
betreff = betreff.Replace("%Empfaenger%", "")
betreff = betreff.Replace("%KdAuftrNr%", If(KdAtrNr IsNot Nothing AndAlso KdAtrNr.ToString.Trim <> "", "Ihre Auftragsnr: " & KdAtrNr, ""))
@@ -1431,8 +1433,8 @@ Public Class frmStartOptions
body = body.Replace("%Uhrzeit%", Now.ToShortDateString & " " & Now.ToShortTimeString & " Uhr")
body = body.Replace("%KdAuftrNr%", If(KdAtrNr IsNot Nothing AndAlso KdAtrNr.ToString.Trim <> "", "Ihre Auftragsnr: " & KdAtrNr, ""))
body = body.Replace("%Absender%", If(SND.tblSnd_Absender, ""))
body = body.Replace("%Empfaenger%", If(SND.tblSnd_Empfaenger, ""))