edv/VERAG_Homepage
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Debug-flags auf Produktiv umgestellt, damit keinerlei sensible Pfadangaben nach außen gelangen können. sowie fix für Ignorierung der groß- und Kleinschreibung der E-Mails und nicht bei Usernamen, da somit mehrere überschrieben werdne könnten..

Browse Source
This commit is contained in:
ja
2021-11-15 10:17:44 +01:00
parent 70a4ef88f8
commit fd6ebe2e7f
3 changed files with 7 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
login/Change_PW.aspx
View File

@@ -1,4 +1,4 @@
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Change_PW.aspx.vb" Debug="true" Inherits="login_Change_PW" %>
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Change_PW.aspx.vb" Debug="false" Inherits="login_Change_PW" %>
<!DOCTYPE html>

2
login/ForgotPW.aspx
View File

@@ -1,4 +1,4 @@
<%@ Page Language="VB" AutoEventWireup="false" Debug="True" CodeFile="ForgotPW.aspx.vb" Inherits="ForgotPW" %>
<%@ Page Language="VB" AutoEventWireup="false" Debug="false" CodeFile="ForgotPW.aspx.vb" Inherits="ForgotPW" %>
<%@ Reference VirtualPath="~/login/Change_PW.aspx" %>
<!DOCTYPE html>

10
login/ForgotPW.aspx.vb
View File

@@ -129,7 +129,7 @@ Partial Class ForgotPW
customerID = dr("KundenNr").ToString()
Try
If txt_Username.Text = dr("Username").ToString() AndAlso String.IsNullOrEmpty(txt_Username_M.Text) = True And String.IsNullOrEmpty(customerID) = False Then
If String.Compare(txt_Username.Text, dr("Username").ToString(), False) = 0 AndAlso String.IsNullOrEmpty(txt_Username_M.Text) = True And String.IsNullOrEmpty(customerID) = False Then
username = txt_Username.Text
isusrnmright = True
ElseIf String.IsNullOrEmpty(txt_Username.Text) = True Then
@@ -142,7 +142,7 @@ Partial Class ForgotPW
isusrnmright = False
End Try
End If
If (txtEmail.Text = dr("Email").ToString() AndAlso String.IsNullOrEmpty(txtEmail_M.Text) = True) And String.IsNullOrEmpty(customerID) = False Then
If (String.Compare(txtEmail.Text, dr("Email").ToString(), True) AndAlso String.IsNullOrEmpty(txtEmail_M.Text) = True) And String.IsNullOrEmpty(customerID) = False Then
email = txtEmail.Text
lblMessage.ForeColor = Color.Green
isemailright = True
@@ -360,7 +360,7 @@ Partial Class ForgotPW
email = dr("Email").ToString()
customerID = dr("KundenNr").ToString()
Try
If (txt_CustomerID_M.Text = dr("KundenNr").ToString() AndAlso String.IsNullOrEmpty(txt_CustomerID.Text) = True) And String.IsNullOrEmpty(customerID) = False Then
If (String.Compare(txt_CustomerID_M.Text, dr("KundenNr").ToString(), False) = 0 AndAlso String.IsNullOrEmpty(txt_CustomerID.Text) = True) And String.IsNullOrEmpty(customerID) = False Then
customerID = txt_CustomerID_M.Text
lblMessage_M.ForeColor = Color.Green
isuserIDright = True
@@ -379,7 +379,7 @@ Partial Class ForgotPW
Title = "Authentication error!"
End Try
Try
If (txtEmail_M.Text = dr("Email").ToString() AndAlso String.IsNullOrEmpty(txtEmail.Text) = True) And String.IsNullOrEmpty(customerID) = False Then
If (String.Compare(txtEmail_M.Text, dr("Email").ToString(), True) AndAlso String.IsNullOrEmpty(txtEmail.Text) = True) And String.IsNullOrEmpty(customerID) = False Then
email = txtEmail_M.Text
isuserEmailright = True
lblMessage_M.ForeColor = Color.Green
@@ -398,7 +398,7 @@ Partial Class ForgotPW
Title = "Authentication error!"
End Try
Try
If (txt_Username_M.Text = dr("Username").ToString() AndAlso String.IsNullOrEmpty(txt_Username.Text) = True) And String.IsNullOrEmpty(customerID) = False Then
If (String.Compare(txt_Username_M.Text, dr("Username").ToString(), False) AndAlso String.IsNullOrEmpty(txt_Username.Text) = True) And String.IsNullOrEmpty(customerID) = False Then
username = txt_Username_M.Text
lblMessage_M.ForeColor = Color.Green
isusernameright = True