From 2fac5ddae06c2baaf14334efb5f5319a1c9d5734 Mon Sep 17 00:00:00 2001
From: ja <ja@verag.ag>
Date: Mon, 20 Sep 2021 08:27:52 +0200
Subject: [PATCH] =?UTF-8?q?codedesign=20wurde=20ge=C3=A4ndert?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Customers/CustomsAviso.aspx.vb | 26 --------------------------
 1 file changed, 26 deletions(-)

diff --git a/Customers/CustomsAviso.aspx.vb b/Customers/CustomsAviso.aspx.vb
index 0dd785e..09abc48 100644
--- a/Customers/CustomsAviso.aspx.vb
+++ b/Customers/CustomsAviso.aspx.vb
@@ -217,29 +217,6 @@ Partial Class Kundenbereich_Default
 
         If dt IsNot Nothing Then
             Dim i As Integer = 0
-            'Dim sb As StringBuilder = New StringBuilder()
-
-            'Table start.
-            'sb.Append("<table cellpadding='5' cellspacing='0' style='border: 1px solid #ccc;font-size: 9pt;font-family:Arial'>")
-            'Adding HeaderRow.
-            'sb.Append("<tr>")
-            'For Each column As DataColumn In dt.Columns
-            '  sb.Append(("<th style='background-color: #B8DBFD;border: 1px solid #ccc'>" _
-            '               + (column.ColumnName + "</th>")))
-            'Next
-            'sb.Append("</tr>")
-            'Adding DataRow.
-            'For Each row As DataRow In dt.Rows
-            'sb.Append("<tr>")
-            'For Each column As DataColumn In dt.Columns
-            '    sb.Append(("<td style='width:100px;border: 1px solid #ccc'>" _
-            '                 + (row(column.ColumnName).ToString + "</td>")))
-            '  Next
-            '   sb.Append("</tr>")
-            'Next
-            'Table end.
-            'sb.Append("</table>")
-            ' ltTable.Text = sb.ToString
 
             For Each d In dt.Rows
                 Dim Cell = New TableCell
@@ -253,8 +230,6 @@ Partial Class Kundenbereich_Default
                 Dim tbl_CellInfo = New TableCell
                 Dim tr = New TableRow
 
-                'tr = New HtmlTableRow()
-
                 Dim zahl = i + 1
                 tbl_CellIndex.ValidateRequestMode = UI.ValidateRequestMode.Enabled
                 tbl_CellIndex.Text = zahl
@@ -326,7 +301,6 @@ Partial Class Kundenbereich_Default
                 ElseIf (rbt_Vorg.Selected = True Or rbt_Vorg_M.Selected = True) AndAlso tbl_CellStatus.Text = "Vorgeschrieben" Then
                     normaltable.Rows.Add(tr)
                 End If
-
                 i += 1
             Next
         End If