From c12cf5101daecbeb158ff8ace7e9358191625ca2 Mon Sep 17 00:00:00 2001
From: "d.breimaier" <d.breimaier@verag.ag>
Date: Fri, 5 Dec 2025 15:21:39 +0100
Subject: [PATCH] kundenblatt

---
 SDL/My Project/AssemblyInfo.vb | 4 ++--
 SDL/kunden/frmKundenblatt.vb   | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/SDL/My Project/AssemblyInfo.vb b/SDL/My Project/AssemblyInfo.vb
index 08de7503..9dc046b9 100644
--- a/SDL/My Project/AssemblyInfo.vb	
+++ b/SDL/My Project/AssemblyInfo.vb	
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("1.5.0.2")>
-<Assembly: AssemblyFileVersion("1.5.0.2")>
+<Assembly: AssemblyVersion("1.5.0.3")>
+<Assembly: AssemblyFileVersion("1.5.0.3")>
diff --git a/SDL/kunden/frmKundenblatt.vb b/SDL/kunden/frmKundenblatt.vb
index c230cd70..2915485d 100644
--- a/SDL/kunden/frmKundenblatt.vb
+++ b/SDL/kunden/frmKundenblatt.vb
@@ -829,7 +829,7 @@ Public Class frmKundenblatt
                 txtKundeninfo.AppendText(IIf(checkNullStr(ADRESSE.Telefon) <> "", "Tel.: " & ADRESSE.Telefon & vbNewLine, ""))
                 txtKundeninfo.AppendText(IIf(checkNullStr(ADRESSE.Telefax) <> "", "Fax: " & ADRESSE.Telefax & vbNewLine, ""))
                 txtKundeninfo.AppendText(IIf(checkNullStr(ADRESSE.Mobiltelefon) <> "", "Mobil: " & checkNullStr(ADRESSE.Mobiltelefon) & vbNewLine, ""))
-                txtKundeninfo.AppendText(IIf(checkNullStr(ADRESSE.E_Mail) <> "", "E-Mail: " & ADRESSE.E_Mail & "; " & IIf(checkNullStr(ADRESSE.E_Mail2) <> "", " " & ADRESSE.E_Mail & ";", "") & vbNewLine, ""))
+                txtKundeninfo.AppendText(IIf(checkNullStr(ADRESSE.E_Mail) <> "", "E-Mail: " & ADRESSE.E_Mail & "; " & IIf(checkNullStr(ADRESSE.E_Mail2) <> "", " " & ADRESSE.E_Mail2 & ";", "") & vbNewLine, ""))
 
                 lblKurzname.Text = checkNullStr(ADRESSE.Ordnungsbegriff)