This commit is contained in:
2021-03-04 15:41:35 +01:00
parent 326c3fcb11
commit 8233a21e83
16 changed files with 4160 additions and 322 deletions

View File

@@ -644,8 +644,8 @@ Public Class frmAuswertung
While dr.Read
Dim kdnr = dr.Item("KundenNr").ToString
Dim LIST_EMAILS = New SDL.cEmailBenachrichtigungList(kdnr, 1)
Dim LIST_EMAILS2 = New SDL.cEmailBenachrichtigungList(kdnr, 2)
Dim LIST_EMAILS = New VERAG_PROG_ALLGEMEIN.cEmailBenachrichtigungList(kdnr, 1)
Dim LIST_EMAILS2 = New VERAG_PROG_ALLGEMEIN.cEmailBenachrichtigungList(kdnr, 2)
Dim eMail = (dr.Item("eMail")).ToString.Replace(" ", "")
Dim eMail2 = (dr.Item("eMail2")).ToString.Replace(" ", "")