Zentrierte Fehlermeldung in Tablerow

Customers/CustomsAviso.aspx

@@ -14,6 +14,7 @@
     visibility: hidden;
     color: #043381;
     } 
+
     </style>    
      <!-- Bootstrap CSS -->
     <link href="https://cdn.jsdelivr.net/npm/bootstrap@5.0.2/dist/css/bootstrap.min.css" rel="stylesheet" integrity="sha384-EVSTQN3/azprG1Anm3QDgpJLIm9Nao0Yz1ztcQTwFspd3yD65VohhpuuCOmLASjC" crossorigin="anonymous"/>

Customers/CustomsAviso.aspx.vb

@@ -18,11 +18,10 @@ Partial Class Kundenbereich_Default
         DataBind()
         tbl_Header_row.TableSection = TableRowSection.TableHeader
         ' MsgBox(datebis)
-
         If (Page.IsPostBack And normaltable.EnableViewState = False) Then
-
             datevon = Date.Parse(pickdate1.Text)
             datebis = Date.Parse(pickdate2.Text)
+            normaltable.EnableViewState = True
         Else
             Dim erster = New Date(Now().Year, Now().Month, 1)
             Dim ersterdat = erster.Day.ToString + "." + Now().Month.ToString + "." + Now().Year.ToString
@@ -236,7 +235,7 @@ Partial Class Kundenbereich_Default
             dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB(Art, Kdnrtext, {5}, Nothing, Nothing, Absender, Empfaenger, LKWNR, KDNAFNR)
         End If
 
-        If dt IsNot Nothing Then
+        If dt IsNot Nothing AndAlso dt.Rows.Count = 0 Then
             Dim i As Integer = 0
             For Each d In dt.Rows
                 Dim tr = New TableRow
@@ -325,9 +324,13 @@ Partial Class Kundenbereich_Default
             Next
         Else
             Dim tbl_cellNothing = New TableCell()
+            tbl_cellNothing.ColumnSpan = tbl_Header_row.Cells.Count
+            tbl_cellNothing.Style.Add("text-align", "center")
             Dim tr = New TableRow()
+            tr.Style.Add("text-align", "center")
             tbl_cellNothing.Text = "Keine Daten gefunden."
             tr.Cells.Add(tbl_cellNothing)
+            normaltable.Rows.Add(tr)
         End If
     End Sub