Merge branch 'master' of https://verag.visualstudio.com/AVISO/_git/AVISO

AvisoTV/frmAnzeige.vb

@@ -296,7 +296,7 @@ Public Class frmAnzeige
             Try
                 Dim conn As SqlConnection = cDatenbankAVISO.GetNewOpenConnectionWithoutError()
                 removeControls()
-                'MsgBox(hSQL)
+                '  MsgBox(hSQL)
                 'If IsNothing(conn) Then Exit Sub 'Fehler bei DB-Zugriff - Anzeige nicht aktualisieren
                 Using cmd As New SqlCommand(hSQL, conn)
                     '  MsgBox(conn.ConnectionString)
@@ -438,7 +438,7 @@ Public Class frmAnzeige
                     Dim dr = cmd.ExecuteReader()
                     If Not IsNothing(dr) Then
                         gridFertig.Rows.Clear() 'Ansicht löschen
-
+                        '  MsgBox(getSQL("", False, True))
                         While dr.Read()
                             anz += 1
                             Dim LKW_Nr As String = VarToStr(dr.Item("LKW_Nr"))