+
+
SDL-NrBezeichnungGültig BisKarten-Nummer
diff --git a/login/CreateUser.aspx b/login/CreateUser.aspx
index a2ba5d5..22cc0d8 100644
--- a/login/CreateUser.aspx
+++ b/login/CreateUser.aspx
@@ -270,6 +270,14 @@
+
+ |
+
+ |
+
+
+ |
+
|
diff --git a/login/CreateUser.aspx.vb b/login/CreateUser.aspx.vb
index 2bfb65a..83509f4 100644
--- a/login/CreateUser.aspx.vb
+++ b/login/CreateUser.aspx.vb
@@ -1,7 +1,8 @@
Partial Class login_CreateUser
Inherits System.Web.UI.Page
-
+ Dim salt As Byte()
+ Dim initrandzahl As Integer
Protected Sub Page_Load(sender As Object, e As EventArgs)
If User.Identity.IsAuthenticated = False Then
FormsAuthentication.RedirectToLoginPage()
@@ -14,6 +15,9 @@ Partial Class login_CreateUser
VERAG_VARIABLES.initerrorcount()
End If
+ salt = VERAG_VARIABLES.GenerateSalt(VERAG_VARIABLES.RandomInteger(VERAG_VARIABLES.RandomInteger(0, Math.Pow(2, 6)), VERAG_VARIABLES.RandomInteger(Math.Pow(2, 7), Math.Pow(2, 10))))
+ initrandzahl = VERAG_VARIABLES.getiterationnumber
+
End Sub
Protected Sub LinkButton1_Click(sender As Object, e As EventArgs)
@@ -36,7 +40,7 @@ Partial Class login_CreateUser
End If
End Sub
- Protected Sub btn_Save_Changes_Click(sender As Object, e As EventArgs)
+ Protected Async Sub btn_Save_Changes_Click(sender As Object, e As EventArgs)
Dim validFileTypes As String() = {"bmp", "gif", "png", "jpg", "jpeg"}
Dim ext As String = System.IO.Path.GetExtension(FileUpload_Desktop.PostedFile.FileName)
Dim isValidFile As Boolean = False
@@ -57,6 +61,9 @@ Partial Class login_CreateUser
lbl_message_desktop.ForeColor = System.Drawing.Color.Green
lbl_message_desktop.Text = "File uploaded successfully."
End If
+ If String.IsNullOrEmpty(txt_PW.Text) = False AndAlso String.IsNullOrEmpty(txt_PW_WH.Text) = False Then
+ Dim hashpw As Byte() = Await VERAG_VARIABLES.HashPassword(txt_PW_WH.Text, salt, initrandzahl, VERAG_VARIABLES.RandomInteger(0, Math.Pow(2, 7)))
+ End If
End Sub
|