From 1b5479ceec4733bff8849e56fadd5ef0f77b316f Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Mon, 14 Nov 2022 09:46:56 +0100 Subject: [PATCH] BUgfix_Emailsignatur --- SDL/Formulare/KDFormulare/frmFormulare.vb | 4 +++- SDL/SDL.vbproj | 8 +++----- SDL/kunden/usrCntlKundenuebersicht.vb | 2 +- 3 files changed, 7 insertions(+), 7 deletions(-) diff --git a/SDL/Formulare/KDFormulare/frmFormulare.vb b/SDL/Formulare/KDFormulare/frmFormulare.vb index 3361da10..bac621a6 100644 --- a/SDL/Formulare/KDFormulare/frmFormulare.vb +++ b/SDL/Formulare/KDFormulare/frmFormulare.vb @@ -1012,11 +1012,13 @@ Public Class frmFormulare Dim TextHTML = "" TextHTML &= tX.txt_text - TextHTML &= cFakturierung.getSignature(cboTextKonserveSprache._value, tX.txt_firmaSig, True, True) + TextHTML &= "
" TextHTML &= "
" TextHTML &= "Mit freundlichen Grüßen
" TextHTML &= VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME & "
" TextHTML &= "
" + TextHTML &= cFakturierung.getSignature(cboTextKonserveSprache._value, tX.txt_firmaSig, True, True) + Mail.HTMLBody = "
" & TextHTML & "
" diff --git a/SDL/SDL.vbproj b/SDL/SDL.vbproj index ae6bffba..26fba405 100644 --- a/SDL/SDL.vbproj +++ b/SDL/SDL.vbproj @@ -89,9 +89,8 @@ False C:\Program Files (x86)\GrapeCity\ActiveReports 15\Tools\BouncyCastle.Crypto.dll - - False - ..\..\..\Aviso\AVISO\packages\ClosedXML.0.95.4\lib\net46\ClosedXML.dll + + ..\packages\ClosedXML.0.95.4\lib\net46\ClosedXML.dll ..\..\..\AVISO\Aviso\packages\esendex-dotnet-sdk.3.8.0\lib\net35\com.esendex.sdk.dll @@ -106,8 +105,7 @@ ..\..\..\AVISO\Aviso\packages\ExcelNumberFormat.1.0.10\lib\net20\ExcelNumberFormat.dll - - False + ..\..\..\Aviso\AVISO\Gemeinsames\bin\x64\Debug\Gemeinsames.dll diff --git a/SDL/kunden/usrCntlKundenuebersicht.vb b/SDL/kunden/usrCntlKundenuebersicht.vb index f4efbb32..9a25194d 100644 --- a/SDL/kunden/usrCntlKundenuebersicht.vb +++ b/SDL/kunden/usrCntlKundenuebersicht.vb @@ -2008,7 +2008,7 @@ Public Class usrCntlKundenuebersicht End Sub - Private Sub FlatButton5_Click(sender As Object, e As EventArgs) Handles btnBonitaetBearbeiten.Click + Private Sub btnBonitaetBearbeiten_Click(sender As Object, e As EventArgs) Handles btnBonitaetBearbeiten.Click Dim f1 As New frmBonitaet(kdNr) f1.ShowDialog(Me)