From a95c71e743a9234549ee3189a76e1e8ee181c6eb Mon Sep 17 00:00:00 2001 From: ja Date: Thu, 9 Dec 2021 09:06:42 +0100 Subject: [PATCH] =?UTF-8?q?=C3=84nderungen?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Web.config | 1 + login/Change_PW.aspx.vb | 7 ++++--- 2 files changed, 5 insertions(+), 3 deletions(-) diff --git a/Web.config b/Web.config index f9cc400..5825d33 100644 --- a/Web.config +++ b/Web.config @@ -70,6 +70,7 @@ + diff --git a/login/Change_PW.aspx.vb b/login/Change_PW.aspx.vb index fcf320d..a8f15ad 100644 --- a/login/Change_PW.aspx.vb +++ b/login/Change_PW.aspx.vb @@ -1,4 +1,5 @@  +Imports System Imports System.Data.SqlClient Imports System.Security.Cryptography Imports System.Threading.Tasks @@ -532,8 +533,8 @@ Partial Class login_Change_PW Dim token As Byte() 'Dim tok As Byte = Convert.ToBase64String(time.Concat(Key).ToArray()) Dim tok As String = password - token = Await VERAG_VARIABLES.HashPassword(password, salt, intzahliterats, intzahl) - Return token + token = Await VERAG_VARIABLES.HashPassword(password, salt, intzahliterats, intzahl) + Return token End If End Function @@ -546,7 +547,7 @@ Partial Class login_Change_PW If String.IsNullOrEmpty(theUserID) = False Then Dim tok As String = Convert.ToBase64String(time.Concat(Key).ToArray()) - token = Await VERAG_VARIABLES.HashPassword(tok, salt, intzahlits, intzahl) + token = Await VERAG_VARIABLES.HashPassword(tok, salt, intzahlits, intzahl) Return VERAG_PROG_ALLGEMEIN.cCryptography3.Encrypt(Convert.ToBase64String(token)) Else