Login GUI Änderungen

This commit is contained in:
ja
2022-02-17 08:25:35 +01:00
parent 15b92954b4
commit f93d660558

View File

@@ -17,6 +17,11 @@ Partial Class login_FLEX
If Page.IsPostBack = True Then
Page.MaintainScrollPositionOnPostBack = True
intzahliterats = VERAG_VARIABLES.getiterationnumber
If Page.User.Identity.Name = "Userwithlongername" Then
Response.Redirect("../Customers/Welcome.aspx")
ElseIf Page.User.Identity.Name = "test2" Then
Response.Redirect("../AvisoTV_FLEX.aspx")
End If
Else
Try
Dim teststr = String.Empty
@@ -320,9 +325,10 @@ Partial Class login_FLEX
If reqfieldvalpassw_M.IsValid = True Then
Dim hashpw_M As Byte() = Await VERAG_VARIABLES.HashPasswordAsync(tb3_M.Text, salt, intzahliterats, intzahl)
passw = tb3_M.Text
tb3_M.Attributes.Add("style", "border: solid 2px lime")
Else
VERAG_VARIABLES.seterrorcount(4)
reqfieldvalpassw_M.ErrorMessage = String.Empty
reqfieldvalpassw_M.ErrorMessage = "Password does Not meet the requirements!"
End If
End If
' Dim constr As String = ConfigurationManager.ConnectionStrings("constr").ConnectionString