Änderungen an Codefiles Der alte alle Elemente würden fehlen Fehler tritt nun nicht mehr auf.

This commit is contained in:
ja
2021-10-15 15:14:37 +02:00
parent 2c4bb14cad
commit b94c5bfae3
15 changed files with 188 additions and 159 deletions

View File

@@ -1,11 +1,13 @@
Imports System.Data.SqlClient
Imports System.Data
Partial Class login_login_TEST
Partial Class login_FLEX
Inherits System.Web.UI.Page
Dim CustomerIDTextBox As TextBox
Protected Sub Page_Load(sender As Object, e As EventArgs)
Protected Sub Page_Load(sender As Object, e As EventArgs)
If Not Page.IsPostBack Then
End If
End Sub
Protected Sub ValidateUser(sender As Object, e As EventArgs)
Dim userId As Integer = 0
@@ -43,8 +45,7 @@ Partial Class login_login_TEST
Case Else
Login1.FailureText = "Erfolgreich validiert."
Session.Add("test", Login1.UserName)
CustomerIDTextBox = Login1.FindControl("CustomerID")
Session.Add("CustomerID", CustomerIDTextBox.Text)
Session.Add("PW", Login1.Password)
FormsAuthentication.RedirectFromLoginPage(Login1.UserName, True)
@@ -65,7 +66,11 @@ Partial Class login_login_TEST
End Sub
Protected Sub CustomerID_TextChanged(sender As Object, e As EventArgs)
' valid_getNumberInput.Validate()
End Sub
Protected Sub Username_M_TextChanged(sender As TextBox, e As EventArgs)
If sender.Text = "" Then
sender.Text = "ID"
End If
End Sub
End Class