diff --git a/login/Change_PW.aspx b/login/Change_PW.aspx
index bfc37a0..9dafc16 100644
--- a/login/Change_PW.aspx
+++ b/login/Change_PW.aspx
@@ -321,7 +321,8 @@
|
diff --git a/login/Change_PW.aspx.vb b/login/Change_PW.aspx.vb
index b6800b3..c457d88 100644
--- a/login/Change_PW.aspx.vb
+++ b/login/Change_PW.aspx.vb
@@ -235,30 +235,30 @@ Partial Class login_Change_PW
End Try
End If
Msg = "PW erfolgreich geändert!"
- Style = vbOKOnly + vbInformation + vbDefaultButton1
- Title = "Information"
- regexval_txt_Pw.ForeColor = Drawing.Color.Green
- regexval_txt_Pw.Text = "Passwort wurde erfolgreich geändert!"
- 'MsgBox(Msg, Style, Title)
- ' If MsgBox(Msg, Style, Title).Ok Then
- 'Response.Redirect("login_FLEX.aspx")
- 'End If
+ Style = vbOKOnly + vbInformation + vbDefaultButton1
+ Title = "Information"
+ regexval_txt_Pw.ForeColor = Drawing.Color.Green
+ regexval_txt_Pw.Text = "Passwort wurde erfolgreich geändert!"
+ 'MsgBox(Msg, Style, Title)
+ ' If MsgBox(Msg, Style, Title).Ok Then
+ 'Response.Redirect("login_FLEX.aspx")
+ 'End If
ElseIf tempstr = "Error01" Then
- regexval_txt_Pw.ForeColor = Drawing.Color.MediumVioletRed
- VERAG_VARIABLES.seterrorcount(2)
- 'regexval_txt_Pw.Text = VERAG_VARIABLES.geterrornumb + "Passwords could not be found!"
- ' Msg = "PW nicht erfolgreich geändert!"
- ' Style = vbAbortRetryIgnore + vbCritical + vbDefaultButton1
- ' Title = "Error"
- 'MsgBox(Msg, Style, Title)
- 'If MsgBox(Msg, Style, Title).Retry Then
- 'Response.Redirect(Request.RawUrl)
- 'ElseIf MsgBox(Msg, Style, Title).Abort Then
- ' Response.Redirect("../newPageJulius_Sidebar.aspx")
- 'ElseIf MsgBox(Msg, Style, Title).Ignore Then
- ' Try
- ' Catch ex As Exception
- ' End Try
+ regexval_txt_Pw.ForeColor = Drawing.Color.MediumVioletRed
+ VERAG_VARIABLES.seterrorcount(2)
+ 'regexval_txt_Pw.Text = VERAG_VARIABLES.geterrornumb + "Passwords could not be found!"
+ ' Msg = "PW nicht erfolgreich geändert!"
+ ' Style = vbAbortRetryIgnore + vbCritical + vbDefaultButton1
+ ' Title = "Error"
+ 'MsgBox(Msg, Style, Title)
+ 'If MsgBox(Msg, Style, Title).Retry Then
+ 'Response.Redirect(Request.RawUrl)
+ 'ElseIf MsgBox(Msg, Style, Title).Abort Then
+ ' Response.Redirect("../newPageJulius_Sidebar.aspx")
+ 'ElseIf MsgBox(Msg, Style, Title).Ignore Then
+ ' Try
+ ' Catch ex As Exception
+ ' End Try
End If
End Sub
Protected Sub txt_Pw_WH_TextChanged(sender As Object, e As EventArgs)
|