Table Generation in OnSuccess-Funktion implementiert.

This commit is contained in:
ja
2022-01-04 11:06:25 +01:00
parent 11899dfb07
commit 2293da8e58
2 changed files with 22 additions and 14 deletions

View File

@@ -392,7 +392,7 @@ Partial Class LKWS
strtemp2 = l3.Nationalität
End If
tbl_mainpage_M.Rows.Clear()
tr1_M.Attributes.Add("nclick", "Javascript:doPostBack_M('""" & tr1_M.Cells.Item(0).Text & """,""" & strtemp2 & """')")
tr1_M.Attributes.Add("onclick", "Javascript:doPostBack_M('""" & tr1_M.Cells.Item(0).Text & """,""" & strtemp2 & """')")
cnt += 1
tbl_2.Rows.Add(tr1_M)
Next
@@ -424,7 +424,7 @@ Partial Class LKWS
Return tbl
End Function
<WebMethod>
<ScriptMethod(ResponseFormat:=ResponseFormat.Json)>
<ScriptMethod(ResponseFormat:=ResponseFormat.Json, UseHttpGet:=False)>
Public Shared Function filltable_M(Kennzeichen As String) As Table
Dim list2 As List(Of VERAG_PROG_ALLGEMEIN.cSDL) = VERAG_PROG_ALLGEMEIN.cSDL.GET_LIST_WEB_LKW(401940, Kennzeichen)
@@ -447,6 +447,7 @@ Partial Class LKWS
tr_M.Attributes.Add("style", "background-color:#ff2500;color:#fff;font-weight:400;")
Tbl.Rows.Add(tr_M)
Next
Return Tbl
End Function
End Class