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

Änderungen Ablauf Validierungen

Browse Source
This commit is contained in:
ja
2021-11-11 10:21:11 +01:00
parent 7d9f297bba
commit 5578ae3d92
1 changed files with 6 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
login/ForgotPW.aspx.vb
View File

@@ -679,7 +679,7 @@ Partial Class ForgotPW
Return String.Empty
End If
Else
Return "Error in Session. Please check admin!"
Return "Error in Session ID. It has changed. Please check admin!"
End If
End Function
@@ -705,8 +705,9 @@ Partial Class ForgotPW
Return True
ElseIf nameoftoken = "NotYet" Then
Return True
ElseIf nameoftoken = "Error in Session. Please check admin!" Then
Dim mailto As String = "support@verag.ag"
ElseIf nameoftoken = "Error in Session ID. It has changed. Please check admin!" Then
' Dim mailto As String = "support@verag.ag"
Dim mailto As String = "ja@verag.ag"
Dim htmlbody As String
VERAG_VARIABLES.seterrorcount(500)
Dim Betreff As String = "Session ID" + VERAG_VARIABLES.geterrornumb
@@ -716,7 +717,8 @@ Partial Class ForgotPW
htmlbody = "<p> Der User " + txt_Username_M.Text + "hat eine ungültige oder geänderte Session-ID </p> <table><th><td>User</td></th><th><td>neue ID</td></th><tr><td>" + txt_Username_M.Text + "</td><td>" + Session.SessionID + "</td></tr></table>"
End If
VERAG_PROG_ALLGEMEIN.cProgramFunctions.sendMail(mailto, Betreff, htmlbody)
Return False
Return False
Else
Return True
End If