From b2e315fdf8ea7bed8c149fbe48af3fa7c19094b4 Mon Sep 17 00:00:00 2001 From: ja Date: Mon, 13 Dec 2021 14:00:20 +0100 Subject: [PATCH] =?UTF-8?q?=C3=84nderungen?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Customers/LKWs.aspx | 69 ++++++++++++++++++++---------------------- Customers/LKWs.aspx.vb | 2 ++ 2 files changed, 35 insertions(+), 36 deletions(-) diff --git a/Customers/LKWs.aspx b/Customers/LKWs.aspx index 529f6b7..5a6624c 100644 --- a/Customers/LKWs.aspx +++ b/Customers/LKWs.aspx @@ -68,8 +68,7 @@
-
- +
KFZ-KennzeichenNat.VerkKZ-AnVermerk @@ -88,9 +87,9 @@ SDL-Leistungen:
-
- - SDL-NrBezeichnungGültig BisKarten-Nummer +
+ + SDL-NrBezeichnungGültig BisKarten-Nummer
@@ -147,19 +146,17 @@ diff --git a/Customers/LKWs.aspx.vb b/Customers/LKWs.aspx.vb index 2682a68..7bbf15b 100644 --- a/Customers/LKWs.aspx.vb +++ b/Customers/LKWs.aspx.vb @@ -97,6 +97,7 @@ Partial Class LKWS tr1.Cells.Add(tc_Vermerk) initcells(tblhrow, tbhc_KFZKennz, tbhc_Nat, tblhc_Verk, tblhc_Kz, tblhc_Verm, tr1, tc_KfzKennz, tc_Nationalitaet, tc_Verk, tc_KZ_Ab, tc_Vermerk, cnt) Dim Stringtemp As String = String.Empty + Dim strtemparr As String = String.Empty For Each l2 In list2 Dim String2 As String = String.Empty @@ -116,6 +117,7 @@ Partial Class LKWS Else strtemp2 = l1.Nationalität End If + tr1.Attributes.Add("OnClick", "Javascript:TableRowClick(""" & list3.ToString & """,""" & l1.KfzKennzeichen & """,""" & strtemp2 & """)") cnt += 1 tbl_sidemenue.Rows.Add(tr1)