From e87b1b6a4a0925c4f6a6da13e3cca75632629d35 Mon Sep 17 00:00:00 2001
From: ja <ja@verag.ag>
Date: Mon, 25 Oct 2021 16:11:19 +0200
Subject: [PATCH] =?UTF-8?q?Erneute=20=C3=BCberpr=C3=BCfung=20auf=20ge?=
 =?UTF-8?q?=C3=A4nderte=20Felder=20bei=20pagelaod=20Event?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Customers/CustomsAviso.aspx.vb | 46 ++++++++++++++++++++++++++++++++--
 1 file changed, 44 insertions(+), 2 deletions(-)

diff --git a/Customers/CustomsAviso.aspx.vb b/Customers/CustomsAviso.aspx.vb
index f347f27..77ef21c 100644
--- a/Customers/CustomsAviso.aspx.vb
+++ b/Customers/CustomsAviso.aspx.vb
@@ -71,19 +71,61 @@ Partial Class CustomsAviso
         Else
             rbt_Alle.Checked = True
             normaltable.EnableViewState = True
+            lbl_von.Visible = True
+            lbl_bis.Visible = True
+            valDateRange_1.Enabled = True
+            valDateRange_2.Enabled = True
+            pickdate1.Visible = True
+            pickdate2.Visible = True
             Dim erster = New Date(Now().Year, Now().Month, 1)
             Dim ersterdat = erster.Day.ToString + "." + Now().Month.ToString + "." + Now().Year.ToString
             pickdate1.Text = erster.Day.ToString + "." + Now().Month.ToString + "." + Now().Year.ToString
             ' MsgBox(ersterdat)
             datevon = ersterdat
             datebis = Date.Parse(Now().Day.ToString + "." + Now().Month.ToString + "." + Now().Year.ToString).ToString
-            pickdate2.Text = Date.Parse(Now().Day.ToString + "." + Now().Month.ToString + "." + Now().Year.ToString).ToString
+            pickdate2.Text = Now().ToShortDateString()
             pickdate1.Text = erster.Day.ToString + "." + Now().Month.ToString + "." + Now().Year.ToString
-            If txt_LKWNr.Text = "" Then
+            If String.IsNullOrEmpty(txt_LKWNr.Text) Then
                 regexval_txt_LKW.Enabled = False
             Else
                 regexval_txt_LKW.Enabled = True
             End If
+            If String.IsNullOrEmpty(txt_KdNrAuftrag.Text) = True Then
+                regexval_txt_KdNrAuftrag.Enabled = False
+            Else
+                regexval_txt_KdNrAuftrag.Enabled = True
+            End If
+            If String.IsNullOrEmpty(txt_Empfaenger.Text) = True Then
+                regexval_txt_Empfaenger.Enabled = False
+            Else
+                regexval_txt_Empfaenger.Enabled = True
+            End If
+            If String.IsNullOrEmpty(txt_Absender.Text) = True Then
+                regexval_txt_Absender.Enabled = False
+            Else
+                regexval_txt_Absender.Enabled = True
+            End If
+
+            If String.IsNullOrEmpty(txt_LKWNr_M.Text) Then
+                regexval_txt_LKWNr_M.Enabled = False
+            Else
+                regexval_txt_LKWNr_M.Enabled = True
+            End If
+            If String.IsNullOrEmpty(txt_KdNrAuftrag_M.Text) = True Then
+                regval_txt_KdNrAuftrag_M.Enabled = False
+            Else
+                regval_txt_KdNrAuftrag_M.Enabled = True
+            End If
+            If String.IsNullOrEmpty(txt_Empfaenger_M.Text) = True Then
+                regval_txt_Empfaenger_M.Enabled = False
+            Else
+                regval_txt_Empfaenger_M.Enabled = True
+            End If
+            If String.IsNullOrEmpty(txt_Absender_M.Text) = True Then
+                regval_txt_Absender_M.Enabled = False
+            Else
+                regval_txt_Absender_Meset.Enabled = True
+            End If
         End If
     End Sub