Mailsender, status EZA send

This commit is contained in:
2026-07-07 13:35:57 +02:00
parent f193cb6dd3
commit 252a74a93a
6 changed files with 257 additions and 8 deletions

View File

@@ -396,7 +396,7 @@ Public Class frmMain
'End If
If cbxBrg_de2_VeragAG.Checked Then 'DE
Dim DE_DIFFERENZ As Double = 3000000 ' UNBEKANNT DIFFENREZ!!! 1000000 + 2000000 (unbekannt??????)
Dim DE_DIFFERENZ As Double = 1000000 ' UNBEKANNT DIFFENREZ!!! 1000000 + 2000000 (unbekannt??????)
'DE WOCHE
Dim woche_de2 As Double = BRG.getBrgSumFromFMZOLL_Zabis(Now.AddDays(-6).ToShortDateString, Now.ToShortDateString, "50", "60", brg_DE_NEU)