Login wurde angepasst und die Designs überarbeitet bzw aneinander angepasst.

This commit is contained in:
ja
2021-10-06 16:02:58 +02:00
parent c5c53c0216
commit d1a4cd5120
8 changed files with 200 additions and 69 deletions

View File

@@ -4,10 +4,14 @@ Partial Class login_ChangePW
Protected Sub Page_Load(sender As Object, e As EventArgs)
btn_submitpw.Enabled = False
txt_Pw_WH.Enabled = False
regexval_txt_Pw_WH.Enabled = False
End Sub
Protected Sub txt_Pw_WH_TextChanged(sender As Object, e As EventArgs)
If reqPasswtxt.IsValid AndAlso reqPassw1txt.IsValid AndAlso confirmPasswordReq.IsValid Then
regexval_txt_Pw_WH.Validate()
confirmPasswordReq.Validate()
If confirmPasswordReq.IsValid Then
btn_submitpw.Enabled = True
Else
btn_submitpw.Enabled = False
@@ -17,9 +21,25 @@ Partial Class login_ChangePW
Protected Sub btn_submitpw_Click(sender As Object, e As EventArgs)
Dim tempstr As String = ""
If txt_Pw.Text = tempstr Then
End If
End Sub
Protected Sub txt_Pw_TextChanged(sender As Object, e As EventArgs)
regexval_txt_Pw.Validate()
If regexval_txt_Pw.IsValid Then
txt_Pw_WH.ReadOnly = False
txt_Pw_WH.Enabled = True
regexval_txt_Pw_WH.Enabled = True
MsgBox("PW erfolgreich geändert!")
Else
txt_Pw_WH.ReadOnly = True
txt_Pw_WH.Enabled = False
regexval_txt_Pw_WH.Enabled = False
MsgBox("PW nicht erfolgreich geändert!")
End If
End Sub
End Class