Umschreiben nach Vorschrift JSON Dokumentation
This commit is contained in:
@@ -423,41 +423,61 @@
|
||||
//addNewRow(SDL,Bez,Datguenstig,KartNr)
|
||||
// Pagemethods.filltable2(<%' =tbl_mainpage %> , SDL, Bez, Datguenstig, KartNr)
|
||||
//}
|
||||
var data = {
|
||||
"Kennzeichen": id.split(',')[0]
|
||||
};
|
||||
var data = {};
|
||||
data['Kennzeichen'] = id.split(',')[0];
|
||||
|
||||
|
||||
|
||||
$.ajax({
|
||||
type: "POST",
|
||||
url: "LKWs.aspx/filltable2",
|
||||
contentType: "application/json; charset=utf-8",
|
||||
dataType: "json",
|
||||
async: "false",
|
||||
data: JSON.stringify(data),
|
||||
success: function (result) {
|
||||
|
||||
success: function (data) {
|
||||
result = data.d;
|
||||
// addheader();
|
||||
let strHTML = '<tr><th><td>SDL-Nr</td></th><th><td>Bezeichnung</td></th><th><td>Gueltig bis</td></th><th><td>Karten Nummer</td></th></tr>';
|
||||
alert('Horray! 200 status code!');
|
||||
alert(result.d)
|
||||
renderTable(result.d)
|
||||
// alert(result.rows.length)
|
||||
$(result).each(function () {
|
||||
let row = $(this)[0];
|
||||
strHTML += '<tr><td>' + row["SDL"] + '</td><td>' + row["Bez"] + '</td><td>' + row["Gueltigbis"] + '</td><td>' + row["KartNr"] + '</td></tr>';
|
||||
|
||||
alert(row)
|
||||
$('#<%=tbl_mainpage.ClientID%>').innerHTML = strHTML;
|
||||
});
|
||||
},
|
||||
error: function (jqXHR, textStatus, errorThrown) {
|
||||
alert("Status:" + jqXHR.status + "\nStatusText: " + textStatus + "\nError:" + errorThrown);
|
||||
}
|
||||
});
|
||||
function OnSuccess(result) {
|
||||
addheader();
|
||||
alert('Horray! 200 status code!');
|
||||
alert(result.rows.length)
|
||||
for (let i = 0; i < result.rows.length; i++) {
|
||||
let row = $('<tr><td>' + result.rows[i].SDL + '</td><td>' + result.rows[i].Bez + '</td><td>' + result.rows[i].DateGueltig + '</td><td>' + result.rows[i].KartNr + '</td></tr>');
|
||||
alert(row)
|
||||
}
|
||||
}
|
||||
//filltable2(id.split(',')[0])
|
||||
}
|
||||
function doPostBack_M(id_M) {
|
||||
let Speditionslabel = document.getElementById('<%=lbl_sped_Placeholder_M.ClientID%>');
|
||||
let natplaceholder = document.getElementById('<%=lbl_Placeholder_M.ClientID%>');
|
||||
alert(id_M)
|
||||
let table_M = document.getElementById('<%=tablemain_m.ClientID%>');
|
||||
let table_M = document.getElementById('<%=tbl_mainpage_M.ClientID%>');
|
||||
let rowCount = table_M.rows.length;
|
||||
|
||||
for (let i = rowCount - 1; i > 0; i--) {
|
||||
table_M.deleteRow(i);
|
||||
}
|
||||
Speditionslabel.textContent = id_M.split(',')[0];
|
||||
natplaceholder.textContent = id_M.split(',')[1];
|
||||
|
||||
//debugger
|
||||
|
||||
//for (let i = 0; i <= 5; i++) {
|
||||
// let SDL = "453543535434334543";
|
||||
// let Bez = "Diesel";
|
||||
@@ -466,28 +486,36 @@
|
||||
//addNewRow(SDL,Bez,Datguenstig,KartNr)
|
||||
// Pagemethods.filltable2(<%' =tbl_mainpage_M%> , SDL, Bez, Datguenstig, KartNr)
|
||||
//}
|
||||
var data = {
|
||||
"Kennzeichen": id_M.split(',')[0]
|
||||
};
|
||||
var data_m = {};
|
||||
data_m['Kennzeichen'] = id.split(',')[0];
|
||||
|
||||
$.ajax({
|
||||
type: "POST",
|
||||
url: "LKWs.aspx/filltable2_M",
|
||||
contentType: "application/json; charset=utf-8",
|
||||
dataType: "json",
|
||||
async: "false",
|
||||
data: JSON.stringify(data),
|
||||
success: function (data) {
|
||||
|
||||
|
||||
data: JSON.stringify(data_m),
|
||||
async: true,
|
||||
success: function (data_m) {
|
||||
result = data_m.d;
|
||||
// addheader();
|
||||
let strHTML = '<tr><th><td> SDL-Nr </td></th><th><td> Bezeichnung </td></th><th><td> Gueltig bis</td></th><th><td>Karten Nummer</td></th></tr>';
|
||||
alert('Horray! 200 status code!');
|
||||
alert(data.d)
|
||||
renderTable_M(data.d);
|
||||
},
|
||||
|
||||
$(result).each(function () {
|
||||
let row = $(this)[0];
|
||||
strHTML += '<tr><td>' + row["SDL"] + '</td><td>' + row["Bez"] + '</td><td>' + row["Gueltigbis"] + '</td><td>' + row["KartNr"] + '</td></tr>';
|
||||
|
||||
alert(row)
|
||||
$('#<%=tbl_mainpage_M.ClientID%>').innerHTML = strHTML;
|
||||
});
|
||||
},
|
||||
error: function (jqXHR, textStatus, errorThrown) {
|
||||
alert("Status:" + jqXHR.status + "\nStatusText: " + textStatus + "\nError:" + errorThrown);
|
||||
}
|
||||
|
||||
});
|
||||
|
||||
//filltable2(id.split(',')[0])
|
||||
}
|
||||
|
||||
|
||||
@@ -459,43 +459,40 @@ Partial Class LKWS
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
<WebMethod(BufferResponse:=False, CacheDuration:=120, Description:="Funktion zum zurückgeben einer Tabelle", EnableSession:=False, TransactionOption:=EnterpriseServices.TransactionOption.NotSupported)>
|
||||
<ScriptMethod(ResponseFormat:=ResponseFormat.Json, UseHttpGet:=False)>
|
||||
<WebMethod>
|
||||
<ScriptMethod(ResponseFormat:=ResponseFormat.Json)>
|
||||
Public Shared Function filltable2(Kennzeichen As String) As List(Of Entry)
|
||||
Dim strtemp2 As String = Kennzeichen.Remove(Kennzeichen.Length - 1, 1)
|
||||
Dim strtemp3 As String = strtemp2.Remove(0, 1)
|
||||
MsgBox(Kdnrtext + vbCr + strtemp3)
|
||||
Dim list As List(Of Entry) = New List(Of Entry)
|
||||
Dim list2 As List(Of VERAG_PROG_ALLGEMEIN.cSDL) = VERAG_PROG_ALLGEMEIN.cSDL.GET_LIST_WEB_LKW(Integer.Parse(Kdnrtext), Kennzeichen)
|
||||
If list2.Count > 0 Then
|
||||
For Each l2 In list2
|
||||
Dim entr As Entry = New Entry(l2.SDLNr.ToString, l2.Kategorie.ToString, l2.GültigBis.ToString, l2.KartenNr.ToString)
|
||||
list.Add(entr)
|
||||
Next
|
||||
ElseIf list2.Count = 0 Then
|
||||
Dim container As New Entry("Keine", "gültigen", "Daten", "gefunden!")
|
||||
list.Add(container)
|
||||
End If
|
||||
Dim list2 As List(Of VERAG_PROG_ALLGEMEIN.cSDL) = VERAG_PROG_ALLGEMEIN.cSDL.GET_LIST_WEB_LKW(401940, Kennzeichen)
|
||||
For Each l2 In list2
|
||||
Dim Entrytemp As New Entry
|
||||
Entrytemp.SDL = l2.SDLNr.ToString
|
||||
Entrytemp.Bez = l2.Kategorie.ToString
|
||||
Entrytemp.GueltigBis = l2.GültigBis.ToString
|
||||
Entrytemp.Kartnr = l2.KartenNr.ToString
|
||||
list.Add(Entrytemp)
|
||||
Next
|
||||
Return list
|
||||
End Function
|
||||
|
||||
<WebMethod(BufferResponse:=False, CacheDuration:=120, Description:="Funktion zum zurückgeben einer Tabelle", EnableSession:=False, TransactionOption:=EnterpriseServices.TransactionOption.NotSupported)>
|
||||
Public Class Entry
|
||||
Public SDL As String = String.Empty
|
||||
Public Bez As String = String.Empty
|
||||
Public Gueltigbis As String = String.Empty
|
||||
Public KartNr As String = String.Empty
|
||||
End Class
|
||||
<WebMethod>
|
||||
<ScriptMethod(ResponseFormat:=ResponseFormat.Json, UseHttpGet:=False)>
|
||||
Public Shared Function filltable2_M(Kennzeichen As String) As List(Of Entry)
|
||||
Dim strtemp2 As String = Kennzeichen.Remove(Kennzeichen.Length - 1, 1)
|
||||
Dim strtemp3 As String = strtemp2.Remove(0, 1)
|
||||
MsgBox(Kdnrtext + vbCr + strtemp3)
|
||||
Dim list As List(Of Entry) = New List(Of Entry)
|
||||
Dim list2 As List(Of VERAG_PROG_ALLGEMEIN.cSDL) = VERAG_PROG_ALLGEMEIN.cSDL.GET_LIST_WEB_LKW(Integer.Parse(Kdnrtext), Kennzeichen)
|
||||
If list2.Count > 0 Then
|
||||
For Each l2 In list2
|
||||
Dim entr As Entry = New Entry(l2.SDLNr.ToString, l2.Kategorie.ToString, l2.GültigBis.ToString, l2.KartenNr.ToString)
|
||||
list.Add(entr)
|
||||
Next
|
||||
ElseIf list2.Count = 0 Then
|
||||
Dim container As New Entry("Keine", "gültigen", "Daten", "gefunden!")
|
||||
list.Add(container)
|
||||
End If
|
||||
Dim list2 As List(Of VERAG_PROG_ALLGEMEIN.cSDL) = VERAG_PROG_ALLGEMEIN.cSDL.GET_LIST_WEB_LKW(401940, Kennzeichen)
|
||||
For Each l2 In list2
|
||||
Dim Entrytemp As New Entry
|
||||
Entrytemp.SDL = l2.SDLNr.ToString
|
||||
Entrytemp.Bez = l2.Kategorie.ToString
|
||||
Entrytemp.Gueltigbis = l2.GültigBis.ToString
|
||||
Entrytemp.KartNr = l2.KartenNr.ToString
|
||||
list.Add(Entrytemp)
|
||||
Next
|
||||
Return list
|
||||
End Function
|
||||
End Class
|
||||
|
||||
Reference in New Issue
Block a user