diff --git a/login/Change_PW.aspx b/login/Change_PW.aspx
index df2f46c..0ad8739 100644
--- a/login/Change_PW.aspx
+++ b/login/Change_PW.aspx
@@ -308,31 +308,7 @@
- |
- The Password has to contain:
- |
-
-
- |
- 1 Uppercase
- |
-
-
- |
- 1 Downcase
- |
-
-
- |
- and one special letter
- |
-
-
- |
- The Password has to contain:
- |
-
-
+
-
1 Uppercase
diff --git a/login/Change_PW.aspx.vb b/login/Change_PW.aspx.vb
index a0ffc9f..c66055b 100644
--- a/login/Change_PW.aspx.vb
+++ b/login/Change_PW.aspx.vb
@@ -161,7 +161,7 @@ Partial Class login_Change_PW
If dr.HasRows Then
dr.Read()
If String.Equals(txt_Pw_WH.Text, dr("Password").ToString) = False Then
- tempstr = txt_Pw.Text
+ tempstr = txt_Pw_WH.Text
Else
lbl_messagetext.Text = "Die gewählten Passwörter dürfen nicht dem alten entsprechen!"
End If
@@ -173,13 +173,14 @@ Partial Class login_Change_PW
Else
VERAG_VARIABLES.seterrorcount(22)
lbl_messagetext.Text = VERAG_VARIABLES.geterrornumb + "Error bei der Passwort-Validation."
+ tempstr = "Error02"
End If
Else
tempstr = "Error01"
End If
- If String.Equals(txt_Pw.Text, tempstr, StringComparison.CurrentCulture) = True AndAlso String.Equals(txt_Pw_WH.Text, tempstr, StringComparison.CurrentCulture) = True AndAlso String.IsNullOrEmpty(txt_Pw_M.Text) = True And String.IsNullOrEmpty(txt_Pw_WH_M.Text) = True And String.Equals(tempstr, "Error01", StringComparison.CurrentCulture) = False Then
+ If String.Equals(txt_Pw.Text, tempstr) = True AndAlso String.Equals(txt_Pw_WH.Text, tempstr) = True AndAlso String.IsNullOrEmpty(txt_Pw_M.Text) = True And String.IsNullOrEmpty(txt_Pw_WH_M.Text) = True And String.Equals(tempstr, "Error01") = False And tempstr = "Error02" Then
txt_Pw_WH_M.Enabled = False
@@ -205,27 +206,25 @@ Partial Class login_Change_PW
'ConnectionString = "Server=db593295684.db.1and1.com;Database=db593295684;Uid=dbo593295684;Pwd=atilla#2;"
End If
If regexval_txt_Pw.IsValid = True Then
- If String.Equals(txt_Pw_WH.Text, tempstr) = True AndAlso String.Equals(txt_Pw.Text, tempstr) = True AndAlso String.IsNullOrEmpty(txt_Pw_M.Text) = True And String.IsNullOrEmpty(txt_Pw_WH_M.Text) = True And String.Equals(tempstr, "Error01") = False Then
- Using con As New SqlConnection(ConnectionString)
- Using cmd As New SqlCommand("UPDATE [VERAG_HOMEPAGE].[dbo].[Users] SET [Password]=@Password WHERE [Username]=@Username AND [UserId]=@UserId")
- ' cmd.CommandType = CommandType.StoredProcedure
- cmd.Parameters.AddWithValue("@Username", usrname)
- cmd.Parameters.AddWithValue("@Password", txt_Pw_WH.Text)
- cmd.Parameters.AddWithValue("@UserId", UsrID)
- cmd.Connection = con
- con.Open()
- If String.IsNullOrEmpty(usrname) = False Then
- cmd.ExecuteNonQuery()
- btn_submitpw.Visible = True
- Else
- VERAG_VARIABLES.seterrorcount(25)
- lbl_messagetext.Text = VERAG_VARIABLES.geterrornumb() + "Fehler bei der Behebung des Passwortwechsels."
- End If
- End Using
- con.Close()
+ Using con As New SqlConnection(ConnectionString)
+ Using cmd As New SqlCommand("UPDATE [VERAG_HOMEPAGE].[dbo].[Users] SET [Password]=@Password WHERE [Username]=@Username AND [UserId]=@UserId")
+ ' cmd.CommandType = CommandType.StoredProcedure
+ cmd.Parameters.AddWithValue("@Username", usrname)
+ cmd.Parameters.AddWithValue("@Password", tempstr)
+ cmd.Parameters.AddWithValue("@UserId", UsrID)
+ cmd.Connection = con
+ con.Open()
+ If String.IsNullOrEmpty(usrname) = False Then
+ cmd.ExecuteNonQuery()
+ btn_submitpw.Visible = True
+ Else
+ VERAG_VARIABLES.seterrorcount(25)
+ lbl_messagetext.Text = VERAG_VARIABLES.geterrornumb() + "Fehler bei der Behebung des Passwortwechsels."
+ End If
End Using
- End If
+ con.Close()
+ End Using
Else
VERAG_VARIABLES.seterrorcount(22)
lbl_messagetext_M.ForeColor = Drawing.Color.Red
@@ -344,7 +343,7 @@ Partial Class login_Change_PW
Dim dr As SqlDataReader = cmd.ExecuteReader()
If dr.HasRows Then
dr.Read()
- If String.Equals(txt_Pw_M.Text, dr("Password").ToString, StringComparison.CurrentCulture) = False Or String.Equals(txt_Pw_WH_M.Text, dr("Password").ToString, StringComparison.CurrentCulture) = False Then
+ If String.Equals(txt_Pw_M.Text, dr("Password").ToString) = False Or String.Equals(txt_Pw_WH_M.Text, dr("Password").ToString) = False Then
tempstr = txt_Pw_M.Text
Else
lbl_messagetext_M.ForeColor = Drawing.Color.Red
@@ -378,7 +377,7 @@ Partial Class login_Change_PW
Using cmd As New SqlCommand("UPDATE [VERAG_HOMEPAGE].[dbo].[Users] SET Password=@Password WHERE Username=@Username AND UserId=@UserId")
' cmd.CommandType = CommandType.StoredProcedure
cmd.Parameters.AddWithValue("@Username", usrname)
- cmd.Parameters.AddWithValue("@Password", txt_Pw_WH_M.Text)
+ cmd.Parameters.AddWithValue("@Password", tempstr)
cmd.Parameters.AddWithValue("@UserId", UsrID)
cmd.Connection = con
con.Open()
|