edv/VERAG_Homepage
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Korrigieren einer falschen AvisoID-Übergabe

Browse Source
This commit is contained in:
ja
2021-09-15 16:33:36 +02:00
parent fca2487f73
commit 1461e76f70
1 changed files with 8 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
Customers/CustomsAviso.aspx.vb
View File

@@ -29,6 +29,7 @@ Partial Class Kundenbereich_Default
Dim LKWNR As String = ""
Dim KDNAFNR As String = ""
Dim dt As DataTable
Enum ART
Kunde
AVISIERER
@@ -183,24 +184,24 @@ Partial Class Kundenbereich_Default
Dim btn2 As New ImageButton
btn2.ViewStateMode = ViewStateMode.Disabled
btn2.ImageUrl = "../images/Icons/service/hilfe_small.png"
'btn2.CssClass = "btn btn-primary"
'btn2.PostBackUrl = "../status_Julius.aspx?Par1=" + KDNAFNR.ToString
btn2.Attributes.Add("href", "../status_Julius.aspx?Par1=" + VERAG_PROG_ALLGEMEIN.cCryptography3.Encrypt(d("AvisoId")).ToString)
btn2.Attributes.Add("href", "../status_Julius.aspx?AvisoId=" + VERAG_PROG_ALLGEMEIN.cCryptography3.Encrypt(d("AvisoID")).ToString)
btn2.Attributes.Add("target", "_blank")
btn2.PostBackUrl = "../status_Julius.aspx?AvisoId=" + VERAG_PROG_ALLGEMEIN.cCryptography3.Encrypt(d("AvisoID")).ToString
Dim btn As New LinkButton
btn.ViewStateMode = ViewStateMode.Disabled
'btn.Text = "Text"
btn.CssClass = "btn btn-primary"
btn.Attributes.Add("Text", <img src="../images/Icons/service/hilfe_small.png" width="15" height="15"/>)
btn.Attributes.Add("href", "../status_Julius.aspx?Par1=" + VERAG_PROG_ALLGEMEIN.cCryptography3.Encrypt(d("AvisoId")).ToString)
btn.Attributes.Add("href", "../status_Julius.aspx?AvisoId=" + VERAG_PROG_ALLGEMEIN.cCryptography3.Encrypt(d("AvisoID")).ToString)
btn.Attributes.Add("target", "_blank")
btn.PostBackUrl = "../status_Julius.aspx?AvisoId=" + VERAG_PROG_ALLGEMEIN.cCryptography3.Encrypt(d("AvisoID")).ToString
btn.PostBackUrl = "../status_Julius.aspx?Par1=" + VERAG_PROG_ALLGEMEIN.cCryptography3.Encrypt(d("AvisoId")).ToString
tbl_CellInfo.Controls.Add(btn)
tbl_CellInfo.Controls.Add(btn2)
tr.Cells.Add(tbl_CellInfo)
If rbt_Ankunft.Selected = True AndAlso tbl_CellStatus.Text = "Ankunft" Then