diff --git a/App_Code/VERAG_VARIABLES.vb b/App_Code/VERAG_VARIABLES.vb
index ed719bf..d260bf4 100644
--- a/App_Code/VERAG_VARIABLES.vb
+++ b/App_Code/VERAG_VARIABLES.vb
@@ -35,7 +35,7 @@ Public Class VERAG_VARIABLES
             Argon.Salt = salt
             Argon.DegreeOfParallelism = 24
             Argon.Iterations = nIterations
-            Argon.MemorySize = (((nIterations * 1 - nIterations * 3 / 4 * 2) / 1.05) + 1 * 150)
+            Argon.MemorySize = (((nIterations * 1 - (nIterations * 1.23) / 4 * 2) / 1.05) + 1 * 160)
 
             'Return Convert.ToBase64String(Argon.GetBytes(nHash))
             'Return Argon.GetBytes(nHash)
@@ -46,9 +46,9 @@ Public Class VERAG_VARIABLES
         Else
             Dim Argon As Argon2d = New Argon2d(Encoding.UTF8.GetBytes(VERAG_PROG_ALLGEMEIN.cCryptography3.Encrypt(password)))
             Argon.Salt = salt
-            Argon.DegreeOfParallelism = 36
-            Argon.Iterations = nIterations * 1.2
-            Argon.MemorySize = (((nIterations * 4 - (nIterations * 1.2) / 1.95 * 2.28) / 0.08) + 1 * 256) / 2
+            Argon.DegreeOfParallelism = 48
+            Argon.Iterations = nIterations * 1.375
+            Argon.MemorySize = (((nIterations * 1.375 - (nIterations * 1.2) / 1.95 * 2.28) / 0.08) + 1 * 256) / 2
             Return Await Argon.GetBytesAsync(nHash)
         End If
 
@@ -58,8 +58,7 @@ Public Class VERAG_VARIABLES
         Dim newHash As Byte() = Await HashPassword(passw, salt, nIterations, nHash)
         Return hash.SequenceEqual(newHash)
     End Function
-    Public Shared Function RandomInteger(ByVal min As Integer, ByVal _
-    max As Integer) As Integer
+    Public Shared Function RandomInteger(ByVal min As Integer, ByVal max As Integer) As Integer
         Dim rand As New RNGCryptoServiceProvider()
         Dim one_byte() As Byte = {0}
         rand.GetBytes(one_byte)
diff --git a/Global.asax b/Global.asax
index a453cbd..c98c5f7 100644
--- a/Global.asax
+++ b/Global.asax
@@ -24,8 +24,9 @@
     void Application_Error(object sender, EventArgs e)
     {
         // Code, der ausgeführt wird, wenn ein nicht behandelter Fehler auftritt
-       //Response.Redirect("../login/Error.aspx");
+        //Response.Redirect("../login/Error.aspx");
 
+        VERAG_PROG_ALLGEMEIN.cProgramFunctions.sendMail("ja@verag.ag", VERAG_PROG_ALLGEMEIN.cCryptography.Decrypt(Request.QueryString["Errcode"]), "Beim Besuch der Seite:" + Request.QueryString["Errcode"] + "ist es zum Fehler:" + VERAG_PROG_ALLGEMEIN.cCryptography.Decrypt(Request.QueryString["Errcode"]) + "gekommen." + System.Environment.NewLine + "Bitte Entschuldigen Sie die Unannehmlichkeiten.", "support@verag.ag", true, true, "", null);
     }
 
     void Session_Start(object sender, EventArgs e)