Änderungen

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