From 31bafc22e50dd2c9c179dfd088eb332697466cad Mon Sep 17 00:00:00 2001
From: ja <ja@verag.ag>
Date: Mon, 3 Jan 2022 13:57:06 +0100
Subject: [PATCH] =?UTF-8?q?Ver=C3=A4nderung=20AJAX=20Post=20Methode=20und?=
 =?UTF-8?q?=20Abfrageart=20zu=20korrekter=20AJAX=20ge=C3=A4ndert?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Customers/LKWs.aspx    | 79 +++++++++++++++++++++++++++++++++++-------
 Customers/LKWs.aspx.vb | 12 +++----
 2 files changed, 73 insertions(+), 18 deletions(-)

diff --git a/Customers/LKWs.aspx b/Customers/LKWs.aspx
index 11bff5e..962b9cf 100644
--- a/Customers/LKWs.aspx
+++ b/Customers/LKWs.aspx
@@ -65,11 +65,11 @@
                             <div class="row">  
                              <div class="col-12">Kennzeichen:
                                  <asp:TextBox ID ="txt_lkw" runat="server" Width="110px" style="margin-left:25px"></asp:TextBox>                                
-                                 <asp:Button ID="btn_Suchen" OnClick="btn_Suchen_Click" runat="server" Text="Suchen" style="margin-left:5px"/> </div>
+                                 <asp:Button ID="btn_Suchen" ClientIDMode="Static" OnClick="btn_Suchen_Click" runat="server" Text="Suchen" style="margin-left:5px"/> </div>
                             <div class="col-9">       
                                 <div class="col-9"style="height:10px;"></div>                               
                               <div class="flex-col-9">                                 
-                                  <asp:Table ID="tbl_sidemenue" runat="server" CssClass="table table-striped" style="width:310px;margin-left:-32px;cursor:default">
+                                  <asp:Table ID="tbl_sidemenue" ClientIDMode="Static" runat="server" CssClass="table table-striped" style="width:310px;margin-left:-32px;cursor:default">
                                       <asp:TableHeaderRow style="background-color:#043381;color:#fff;font-size:0.86em"><asp:TableHeaderCell ID="tbhc_KFZKennz">KFZ-Kennzeichen</asp:TableHeaderCell><asp:TableHeaderCell ID="tbhc_Nat">Nat.</asp:TableHeaderCell><asp:TableHeaderCell ID="tblhc_Verk">Verk</asp:TableHeaderCell><asp:TableHeaderCell ID="tblhc_Kz">KZ-An</asp:TableHeaderCell><asp:TableHeaderCell ID="tblhc_Verm">Vermerk</asp:TableHeaderCell></asp:TableHeaderRow>
                                   </asp:Table>                                  
                               </div>                                
@@ -78,17 +78,17 @@
                         <div class="col-9">
                             <div class="col-12"> 
                                 <asp:Image runat="server" ClientIDMode="AutoID" ID="Img_Text1" ImageUrl="~/images/Icons/Aviso.png" style="width:96px;height:96px" />
-                                <asp:Label ID="lbl_sped_Placeholder" runat="server" Font-Size="20px" Font-Bold="true">Bitte Spedition wählen</asp:Label>
+                                <asp:Label ID="lbl_sped_Placeholder" ClientIDMode="Static" runat="server" Font-Size="20px" Font-Bold="true">Bitte Spedition wählen</asp:Label>
                             </div> 
                             <div class="col-12">
-                                <asp:Label ID="lbl_natLKW" runat="server" Font-Size="1.12em" style="color:#043381">Nationalität:</asp:Label><asp:Label runat="server" ID="lbl_Placeholder" style="font-size:1.12em">Placeholder</asp:Label>                               
+                                <asp:Label ID="lbl_natLKW" runat="server" ClientIDMode="Static" Font-Size="1.12em" style="color:#043381">Nationalität:</asp:Label><asp:Label runat="server" ID="lbl_Placeholder" style="font-size:1.12em">Placeholder</asp:Label>                               
                             </div>
                             <div class="col-12">
                                  <asp:Label ID="lbl_SDL" runat="server" Font-Size="1.331em" style="color:#043381;font-weight:500">SDL-Leistungen:</asp:Label>
                             </div>
                               <div class="col-12"style="height:10px;"></div>
                             <div id="conovertab" class="col-12" style="margin-left:-10px;background-color:#fff;overflow-y:auto;">
-                                <asp:Table ID="tbl_mainpage" runat="server" Width="100%" style="background-color:#fff;overflow-y:auto;" CssClass="table table-striped col-12">
+                                <asp:Table ID="tbl_mainpage" ClientIDMode="Static" runat="server" Width="100%" style="background-color:#fff;overflow-y:auto;" CssClass="table table-striped col-12">
                                     <asp:TableHeaderRow ID="headrow1" runat="server" style="background-color:#043381;color:#fff;height:10px"><asp:TableHeaderCell ID="tblhc_SDLNr">SDL-Nr</asp:TableHeaderCell><asp:TableHeaderCell ID="tblhc_Bez">Bezeichnung</asp:TableHeaderCell><asp:TableHeaderCell ID="tbl_gueltig">Gültig Bis</asp:TableHeaderCell><asp:TableHeaderCell ID="tblhc_KarteNr">Karten-Nummer</asp:TableHeaderCell></asp:TableHeaderRow>
                                </asp:Table>
                             </div>
@@ -111,7 +111,7 @@
                                        
                                             <div style="height:17px"></div>
                                             <div class="col-12-flex">
-                                                <asp:Table ID="tbl_2" runat="server">
+                                                <asp:Table ID="tbl_2" runat="server" ClientIDMode="Static">
                                                     <asp:TableHeaderRow style="background-color:#043381;color:#fff" runat="server"><asp:TableHeaderCell ID="tbhc_KFZKennz_M">KFZ_Kennzeichen</asp:TableHeaderCell><asp:TableHeaderCell ID="tbhc_Nat_M">Nat.</asp:TableHeaderCell><asp:TableHeaderCell ID="tbhc_Verk_M">Verk.</asp:TableHeaderCell><asp:TableHeaderCell ID="tbhc_KZ_An_M">KZ-An</asp:TableHeaderCell><asp:TableHeaderCell ID="tbhc_Verm_M">Vermerke</asp:TableHeaderCell></asp:TableHeaderRow>
                                                 </asp:Table>                                           
                                             </div>                                       
@@ -120,17 +120,17 @@
                                     <div class="col-12">
                                         <div class="col-12">
                                             <asp:Image runat="server" ClientIDMode="AutoID" ID="Img_Text1_M" ImageUrl="~/images/Icons/Aviso.png" style="width:56px;height:56px" />
-                                            <asp:Label ID="lbl_sped_Placeholder_M" runat="server" Font-Size="22px" Font-Bold="true">Bitte Spedition wählen...!</asp:Label>
+                                            <asp:Label ID="lbl_sped_Placeholder_M" ClientIDMode="Static" runat="server" Font-Size="22px" Font-Bold="true">Bitte Spedition wählen...!</asp:Label>
                                         </div>
                                         <div class="col-12">
-                                            <asp:Label ID="lbl_natLKW_M" runat="server" Font-Size="1.12em" Style="color:#043381"></asp:Label><asp:Label ID="lbl_Placeholder_M" runat="server" style="font-size:1.12em">Placeholder</asp:Label>
+                                            <asp:Label ID="lbl_natLKW_M" ClientIDMode="Static" runat="server" Font-Size="1.12em" Style="color:#043381"></asp:Label><asp:Label ID="lbl_Placeholder_M" runat="server" style="font-size:1.12em">Placeholder</asp:Label>
                                         </div>
                                         <div class="col-12">
                                             <asp:Label ID="lbl_SDL_M" runat="server" Font-Size="1.331em" style="color:#043381;font-weight:500">SDL-Leistungen</asp:Label>
                                         </div>
                                         <div class="col-12" style="height:15px"></div>
                                         <div id="conovertab_M" class="col-12" style="margin-left:-10px;background-color:#fff;overflow-x:auto">
-                                            <asp:Table ID="tbl_mainpage_M" runat="server" Width="100%" CssClass="table table-striped col-12">
+                                            <asp:Table ID="tbl_mainpage_M" ClientIDMode="Static" runat="server" Width="100%" CssClass="table table-striped col-12">
                                                 <asp:TableHeaderRow runat="server" ID="headrow_M" style="background-color:#043381;color:#fff"><asp:TableHeaderCell ID="tblhc_SDLNr_M">SDL_Nr</asp:TableHeaderCell><asp:TableHeaderCell ID="tblhc_Bez_M">Bezeichnung</asp:TableHeaderCell><asp:TableHeaderCell ID="tbl_gueltig_M">Gültig Bis</asp:TableHeaderCell><asp:TableHeaderCell ID="tblhc_KarteNr_M">Karten-Nummer</asp:TableHeaderCell></asp:TableHeaderRow>
                                             </asp:Table>
                                             </div>
@@ -333,7 +333,38 @@
                 //addNewRow(SDL,Bez,Datguenstig,KartNr)
                 // Pagemethods.filltable2(<%' =tbl_mainpage %> , SDL, Bez, Datguenstig, KartNr)
             //}
-            Pagemethods.filltable2(id.split(',')[0])
+            let booleansuccess = false
+            $.ajax({
+                type: "POST",
+                url: "LKWs.aspx/filltable2",
+                contentType: "application/json; charset=utf-8",
+                dataType: "json",
+                data: '{"format":"' + id.split(',')[0] + '"}',
+                success: function (result) {
+                    OnSuccess(result.d);
+                    booleansuccess = true
+                },
+                error: function (result) {
+                    OnFailure(result);
+                    booleansuccess = false
+                }
+            });
+            function OnSuccess(success) {
+                alert('horray! 200 status code!');
+                    alert(success)
+                
+            }
+            function OnFailure(error) {
+                alert(error);
+                //get the status code
+                if (code == 400) {
+                    alert('400 status code! user error');
+                }
+                if (code == 500) {
+                    alert('500 status code! server error');
+                }
+            }
+            //filltable2(id.split(',')[0])
         }
         function doPostBack_M(id_M) {
             let Speditionslabel = document.getElementById('<%=lbl_sped_Placeholder_M.ClientID%>');
@@ -344,7 +375,7 @@
 
             for (let i = rowCount - 1; i > 0; i--) {
                 table_M.deleteRow(i);
-            }
+            }            
             Speditionslabel.textContent = id_M.split(',')[0];            
             natplaceholder.textContent = id_M.split(',')[1];            
             addheader_M();
@@ -358,7 +389,31 @@
                 //addNewRow(SDL,Bez,Datguenstig,KartNr)
             // Pagemethods.filltable2(<%' =tbl_mainpage_M%> , SDL, Bez, Datguenstig, KartNr)
             //}
-            Pagemethods.filltable2_M(id_M.split(',')[0])
+            let booleansuccess_M = false
+            //debugger
+            $.ajax({
+                type: "POST",
+                url: "LKWs.aspx/filltable2_M",
+                contentType: "application/json; charset=utf-8",
+                dataType: "json",
+                data: '{"format":"' + id_M.split(',')[0] + '"}',
+                success: function (result) {
+                    booleansuccess_M = true;
+                    OnSuccess(result.d);                    
+                },
+                error: function (xhr, status, error) {
+                    booleansuccess_M = false;
+                    OnFailure(error);                    
+                }
+            });
+            function OnSuccess(booleansuccess_M) {
+                if (booleansuccess_M) {
+                    alert("Success")
+                }
+            }
+            function OnFailure(error) {
+                alert(error);
+            }
          }
     </script>
 </asp:Content>
\ No newline at end of file
diff --git a/Customers/LKWs.aspx.vb b/Customers/LKWs.aspx.vb
index 51b8440..a73df5a 100644
--- a/Customers/LKWs.aspx.vb
+++ b/Customers/LKWs.aspx.vb
@@ -254,7 +254,7 @@ Partial Class LKWS
             tr2.Cells.Add(tc_Vermerk)
 
             initcells(tblhrow, tbhc_KFZKennz, tbhc_Nat, tblhc_Verk, tblhc_Kz, tblhc_Verm, tr2, tc_KfzKennz, tc_Nationalitaet, tc_Verk, tc_KZ_An, tc_Vermerk, cnt)
-            tr2.Attributes.Add("onclick", "Javascript:doPostBack('""" + tr2.Cells.Item(0).Text + """,""" + strtempnat + """')")
+            tr2.Attributes.Add("OnClientClick", "Javascript:doPostBack('""" + tr2.Cells.Item(0).Text + """,""" + strtempnat + """')")
             tbl_sidemenue.Rows.Add(tr2)
             cnt += 1
         Next
@@ -392,15 +392,15 @@ Partial Class LKWS
                 strtemp2 = l3.Nationalität
             End If
             tbl_mainpage_M.Rows.Clear()
-            tr1_M.Attributes.Add("OnClick", "Javascript:doPostBack_M('""" & tr1_M.Cells.Item(0).Text & """,""" & strtemp2 & """')")
+            tr1_M.Attributes.Add("OnClientClick", "Javascript:doPostBack_M('""" & tr1_M.Cells.Item(0).Text & """,""" & strtemp2 & """')")
             cnt += 1
             tbl_2.Rows.Add(tr1_M)
         Next
     End Sub
 
     <WebMethod>
-    <ScriptMethod(ResponseFormat:=ResponseFormat.Json, UseHttpGet:=False)>
-    Public Sub filltable2(Kennzeichen As String)
+    <ScriptMethod(ResponseFormat:=ResponseFormat.Json, UseHttpGet:=False, XmlSerializeString:=False)>
+    Public Shared Sub filltable2(Kennzeichen As String)
         Dim tbl As Table = New Table
         Dim list2 As List(Of VERAG_PROG_ALLGEMEIN.cSDL) = VERAG_PROG_ALLGEMEIN.cSDL.GET_LIST_WEB_LKW(401940, Kennzeichen)
         For Each l2 In list2
@@ -423,8 +423,8 @@ Partial Class LKWS
         Next
     End Sub
     <WebMethod>
-    <ScriptMethod(ResponseFormat:=ResponseFormat.Json, UseHttpGet:=False)>
-    Public Sub filltable_M(Kennzeichen As String)
+    <ScriptMethod(ResponseFormat:=ResponseFormat.Json, UseHttpGet:=False, XmlSerializeString:=False)>
+    Public Shared Sub filltable_M(Kennzeichen As String)
         Dim list2 As List(Of VERAG_PROG_ALLGEMEIN.cSDL) = VERAG_PROG_ALLGEMEIN.cSDL.GET_LIST_WEB_LKW(401940, Kennzeichen)
         Dim Tbl As New Table
         For Each l2 In list2