Bugfix Messenger

This commit is contained in:
2024-05-21 09:09:40 +02:00
parent d482841133
commit de97cb6460
4 changed files with 8 additions and 12 deletions

View File

@@ -4126,9 +4126,10 @@ Public Class frmHauptfenster
Dim newMsg = VERAG_PROG_ALLGEMEIN.cMessenger.GET_NewMSG_COUNT()
Label20.Text = newMsg.ToString
Label20.Visible = (newMsg > 0)
VERAG_PROG_ALLGEMEIN.cMessenger.NEW_MESSGE = True 'NEUE NACHTICHTEN
'VERAG_PROG_ALLGEMEIN.cMessenger.NEW_MESSGE = True 'NEUE NACHTICHTEN -> falsch gesetzt?
If newMsg > 0 Then
VERAG_PROG_ALLGEMEIN.cMessenger.NEW_MESSGE = True
Me.Icon = My.Resources.avisoNewMsg
Dim isshown = False
@@ -4562,8 +4563,7 @@ Public Class frmHauptfenster
Mail = outl.CreateItem(0)
Mail.To = "T.Wesolowski@hkt-tax.de"
Mail.CC = "C.Tuendermann@hkt-tax.de;D.Horneber@hkt-tax.de"
Mail.CC = "C.Tuendermann@hkt-tax.de;D.Horneber@hkt-tax.de;IO@ambarlog.de"
Dim TextHTML = ""
TextHTML &= "Sehr geehrte Damen und Herren, <br> im Anhang befinden sich die Exportdaten für die Buchhaltung!"