diff --git a/login/ForgotPW.aspx b/login/ForgotPW.aspx index 0c5112a..a8ec552 100644 --- a/login/ForgotPW.aspx +++ b/login/ForgotPW.aspx @@ -291,7 +291,7 @@ - + @@ -333,7 +333,7 @@ - + diff --git a/login/ForgotPW.aspx.vb b/login/ForgotPW.aspx.vb index f454113..e5075e3 100644 --- a/login/ForgotPW.aspx.vb +++ b/login/ForgotPW.aspx.vb @@ -40,6 +40,7 @@ Partial Class ForgotPW check_UserName_regex_M.Enabled = False CustomerID_M_required.Enabled = False valid_getNumber_M_Input.Enabled = False + regexval_txt_Email_M.Enabled = False valreqtxtusername.Enabled = True valreqtxtEmail.Enabled = True @@ -49,18 +50,38 @@ Partial Class ForgotPW CustomerIDrequired.Enabled = True valid_getNumberInput.Enabled = True + + valreqtxtEmail.Validate() + If valreqtxtEmail.IsValid = True Then + regexval_txt_Email.Validate() + If regexval_txt_Email.IsValid = False Then + regexval_txt_Email.ForeColor = Drawing.Color.OrangeRed + regexval_txt_Email.ErrorMessage = "Annotation: The Domain does not match." + regexval_txt_Email.Validate() + If regexval_txt_Email_2.IsValid = True Then + email = txtEmail.Text + regexval_txt_Email_2.ForeColor = Drawing.Color.Lime + regexval_txt_Email_2.ErrorMessage = "E-mail Address valid." + End If + Else + regexval_txt_Email.Validate() + If regexval_txt_Email_2.IsValid = True Then + regexval_txt_Email_2.ForeColor = Drawing.Color.Lime + regexval_txt_Email_2.ErrorMessage = "E-mail Address valid." + email = txtEmail_M.Text + End If + End If + End If + CustomerIDrequired.Validate() If CustomerIDrequired.IsValid = True Then - valid_getNumber_M_Input.Validate() + valid_getNumberInput.Validate() If valid_getNumberInput.IsValid = True Then customerID = txt_CustomerID.Text Else valid_getNumberInput.ForeColor = Drawing.Color.Red valid_getNumberInput.ErrorMessage = "Customer-ID is not numeric or too long." End If - Else - valid_getNumberInput.ForeColor = Drawing.Color.Red - valid_getNumberInput.ErrorMessage = "Customer-ID is not given." End If valreqtxtusername.Validate() @@ -74,34 +95,7 @@ Partial Class ForgotPW check_UserName_regex.ForeColor = Drawing.Color.Lime check_UserName_regex.ErrorMessage = "Valid Username has been entered." End If - Else - valreqtxtusername.ForeColor = Drawing.Color.Lime - check_UserName_regex.ErrorMessage = "A too long Username has been entered." End If - - valreqtxtEmail.Validate() - If valreqtxtEmail.IsValid = True Then - regexval_txt_Email.Validate() - If regexval_txt_Email.IsValid = False Then - regexval_txt_Email.ForeColor = Drawing.Color.OrangeRed - regexval_txt_Email.ErrorMessage = "Annotation: The Domain does not match." - regexval_txt_Email_2.Validate() - If regexval_txt_Email_2.IsValid = True Then - email = txtEmail.Text - regexval_txt_Email.ForeColor = Drawing.Color.Lime - regexval_txt_Email.ErrorMessage = "E-mail Address valid." - End If - Else - regexval_txt_Email.Validate() - If valreqtxtEmail.IsValid = True Then - valreqtxtEmail.ForeColor = Drawing.Color.Lime - valreqtxtEmail.ErrorMessage = "E-mail Address valid." - email = txtEmail.Text - End If - End If - End If - - ' MsgBox("3" + email + " " + username) End If 'Mobil @@ -115,6 +109,7 @@ Partial Class ForgotPW valid_getNumberInput.Enabled = False regexval_2_txt_Email_M.Enabled = True + regexval_txt_Email_M.Enabled = True valreqtxtEmail_M.Enabled = True valreqtxtusername_M.Enabled = True check_UserName_regex_M.Enabled = True @@ -123,21 +118,21 @@ Partial Class ForgotPW valreqtxtEmail_M.Validate() If valreqtxtEmail_M.IsValid = True Then - regexval_txt_Email.Validate() - If regexval_txt_Email.IsValid = False Then - regexval_txt_Email.ForeColor = Drawing.Color.OrangeRed - regexval_txt_Email.ErrorMessage = "Annotation: The Domain does not match." - regexval_txt_Email.Validate() + regexval_txt_Email_M.Validate() + If regexval_txt_Email_M.IsValid = False Then + valreqtxtEmail_M.ForeColor = Drawing.Color.OrangeRed + regexval_txt_Email_M.ErrorMessage = "Annotation: The Domain does not match." + regexval_txt_Email_M.Validate() If regexval_2_txt_Email_M.IsValid = True Then email = txtEmail_M.Text - regexval_txt_Email.ForeColor = Drawing.Color.Lime - regexval_txt_Email.ErrorMessage = "E-mail Address valid." + regexval_txt_Email_M.ForeColor = Drawing.Color.Lime + regexval_txt_Email_M.ErrorMessage = "E-mail Address valid." End If Else regexval_txt_Email.Validate() If regexval_2_txt_Email_M.IsValid = True Then - regexval_txt_Email.ForeColor = Drawing.Color.Lime - regexval_txt_Email.ErrorMessage = "E-mail Address valid." + regexval_txt_Email_M.ForeColor = Drawing.Color.Lime + regexval_txt_Email_M.ErrorMessage = "E-mail Address valid." email = txtEmail_M.Text End If End If @@ -152,9 +147,6 @@ Partial Class ForgotPW valid_getNumber_M_Input.ForeColor = Drawing.Color.Red valid_getNumber_M_Input.ErrorMessage = "Customer-ID is not numeric or too long." End If - Else - valid_getNumber_M_Input.ForeColor = Drawing.Color.Red - valid_getNumber_M_Input.ErrorMessage = "Customer-ID is not given." End If valreqtxtusername_M.Validate() @@ -168,9 +160,6 @@ Partial Class ForgotPW check_UserName_regex_M.ForeColor = Drawing.Color.Lime check_UserName_regex_M.ErrorMessage = "Valid Username has been entered." End If - Else - check_UserName_regex_M.ForeColor = Drawing.Color.Lime - check_UserName_regex_M.ErrorMessage = "A too long Username has been entered." End If Else 'MsgBox("The form has not been filled completeley.", MsgBoxStyle.Critical, "Error08")