Einlesen deer durch Querystring übergebenen Werte

This commit is contained in:
ja
2021-11-08 08:53:30 +01:00
parent 259dcdcc05
commit 08d2cedf21

View File

@@ -6,6 +6,9 @@ Partial Class Customers_Default3
If Me.Page.User.Identity.IsAuthenticated Then
Try
Kdnrtext = Session.Item("CustomerID")
Dim Filialennumnmer As String = Request.QueryString.Get("P1")
Dim Abfertigungsnummer As String = Request.QueryString.Get("P2")
Dim RKID As String = Request.QueryString.Get("P3")
Catch A As UnauthorizedAccessException When String.IsNullOrEmpty(Kdnrtext)
MsgBox("Dieser Bereich ist nicht gestattet! Ein Fehler ist bei der Validierung der ID aufgetreten! Bitte erneut versuchen!", MsgBoxStyle.Information, "Error in User Area!")
End Try