edv/AVISO
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Bugfix Messenger

Browse Source
This commit is contained in:
d.breimaier
2024-05-21 09:09:40 +02:00
parent d482841133
commit de97cb6460
4 changed files with 8 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Aviso/My Project/AssemblyInfo.vb
View File

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("3.9.9.5")>
<Assembly: AssemblyFileVersion("3.9.9.5")>
<Assembly: AssemblyVersion("3.9.9.8")>
<Assembly: AssemblyFileVersion("3.9.9.8")>

6
Aviso/frmHauptfenster.vb
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!"

6
Aviso/frmSendungsdetailsNEU.Designer.vb generated
View File

@@ -961,7 +961,7 @@ Partial Class frmSendungsdetailsNEU
Me.ToolStripMenuItem8.Font = New System.Drawing.Font("Segoe UI", 9.0!)
Me.ToolStripMenuItem8.Image = Global.AVISO.My.Resources.Resources.plus
Me.ToolStripMenuItem8.Name = "ToolStripMenuItem8"
Me.ToolStripMenuItem8.Size = New System.Drawing.Size(101, 30)
Me.ToolStripMenuItem8.Size = New System.Drawing.Size(188, 30)
Me.ToolStripMenuItem8.Text = "T1"
'
'ToolStripMenuItem9
@@ -969,7 +969,7 @@ Partial Class frmSendungsdetailsNEU
Me.ToolStripMenuItem9.Font = New System.Drawing.Font("Segoe UI", 9.0!)
Me.ToolStripMenuItem9.Image = Global.AVISO.My.Resources.Resources.plus
Me.ToolStripMenuItem9.Name = "ToolStripMenuItem9"
Me.ToolStripMenuItem9.Size = New System.Drawing.Size(101, 30)
Me.ToolStripMenuItem9.Size = New System.Drawing.Size(188, 30)
Me.ToolStripMenuItem9.Text = "T2"
'
'ToolStripMenuItem10
@@ -977,7 +977,7 @@ Partial Class frmSendungsdetailsNEU
Me.ToolStripMenuItem10.Enabled = False
Me.ToolStripMenuItem10.Image = Global.AVISO.My.Resources.Resources.plus
Me.ToolStripMenuItem10.Name = "ToolStripMenuItem10"
Me.ToolStripMenuItem10.Size = New System.Drawing.Size(101, 30)
Me.ToolStripMenuItem10.Size = New System.Drawing.Size(188, 30)
Me.ToolStripMenuItem10.Text = "Ü-T"
Me.ToolStripMenuItem10.Visible = False
'

4
Aviso/frmSendungsdetailsNEU.vb
View File

@@ -6858,8 +6858,4 @@ Public Class frmSendungsdetailsNEU
End Sub
End Class