From c5c53c0216f9223c8f2b4a8fcc26e50f33473a0b Mon Sep 17 00:00:00 2001 From: ja Date: Wed, 6 Oct 2021 13:05:07 +0200 Subject: [PATCH] Login iframe wurde erstellt. --- css/login/Changepw.css | 41 ++++++++ login/ChangePW.aspx | 122 ++++++++++++++++++++++ login/ChangePW.aspx.vb | 25 +++++ login/login_FLEX_iFrame.aspx | 174 ++++++++++++++++++++++++++++++++ login/login_FLEX_iFrame.aspx.vb | 61 +++++++++++ newpageJulius_Sidebar.aspx | 2 +- 6 files changed, 424 insertions(+), 1 deletion(-) create mode 100644 css/login/Changepw.css create mode 100644 login/ChangePW.aspx create mode 100644 login/ChangePW.aspx.vb create mode 100644 login/login_FLEX_iFrame.aspx create mode 100644 login/login_FLEX_iFrame.aspx.vb diff --git a/css/login/Changepw.css b/css/login/Changepw.css new file mode 100644 index 0000000..d09c84d --- /dev/null +++ b/css/login/Changepw.css @@ -0,0 +1,41 @@ +body { + font-family: 'Poppins', sans-serif; + background: #fafafa; + background-image: url(../../images/road.jpg); + background-position: center center; + background-repeat: no-repeat; + background-attachment: fixed; + background-size: cover; + background-color: #fff; +} +#txt_Pw_WH:invalid { + background-color: indianred; + border-color: red; + color: red; +} +#txt_Pw_WH:valid { + background-color: lightgreen; + border-color: forestgreen; + color: forestgreen; +} +#tbl_main { + font-family: Arial; + font-size: 11px; + border: 1px solid gray +} +#content_container { + display: flex; + justify-content: center; + align-items: center; + width: 1024px; + height: 800px; + margin: 0 auto; + margin-top: auto; +} + +.container-fluid { + width: 262px; + height: 216px; + background-color: rgba(255,255,255,0.5); +} + diff --git a/login/ChangePW.aspx b/login/ChangePW.aspx new file mode 100644 index 0000000..30ce70d --- /dev/null +++ b/login/ChangePW.aspx @@ -0,0 +1,122 @@ +<%@ Page Language="VB" AutoEventWireup="false" CodeFile="ChangePW.aspx.vb" Inherits="login_ChangePW" %> + + + + + + <%@ import Namespace="MySql.Data.MySqlClient"%> + + + VERAG Spedition AG Passwort vergessen + + + + + + + + + + + + + + + + + + + + + + + + + +
+
+
+ + + + + + + + + + + + + + + + + + + + + + + + + +
+ +
+ +
+ +
+ + +
+ +
+ +
+ + + +
+ +
+
+
+
+ + diff --git a/login/ChangePW.aspx.vb b/login/ChangePW.aspx.vb new file mode 100644 index 0000000..d23d672 --- /dev/null +++ b/login/ChangePW.aspx.vb @@ -0,0 +1,25 @@ + +Partial Class login_ChangePW + Inherits System.Web.UI.Page + + Protected Sub Page_Load(sender As Object, e As EventArgs) + btn_submitpw.Enabled = False + End Sub + + Protected Sub txt_Pw_WH_TextChanged(sender As Object, e As EventArgs) + If reqPasswtxt.IsValid AndAlso reqPassw1txt.IsValid AndAlso confirmPasswordReq.IsValid Then + btn_submitpw.Enabled = True + Else + btn_submitpw.Enabled = False + End If + End Sub + + Protected Sub btn_submitpw_Click(sender As Object, e As EventArgs) + Dim tempstr As String = "" + + + If txt_Pw.Text = tempstr Then + + End If + End Sub +End Class diff --git a/login/login_FLEX_iFrame.aspx b/login/login_FLEX_iFrame.aspx new file mode 100644 index 0000000..7f3d8c0 --- /dev/null +++ b/login/login_FLEX_iFrame.aspx @@ -0,0 +1,174 @@ +<%@ Page Language="VB" Debug="true" AutoEventWireup="false" CodeFile="login_FLEX_iFrame.aspx.vb" Inherits="login_login_TEST"%> + + + + + + <%@ import Namespace="MySql.Data.MySqlClient"%> + + + VERAG Spedition AG Login + + + + + + + + + + + + + + + + + + + + + + + + + + +
+
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
+
+ Kundennummer: + + + * +
+ Benutzername: + + + * +
+ Kennwort: + + + * +
+ +
+ +
+
+
+ Admin-Login +
+ Passwort Vergessen +
+ + +
+
+ + + + + + + diff --git a/login/login_FLEX_iFrame.aspx.vb b/login/login_FLEX_iFrame.aspx.vb new file mode 100644 index 0000000..2352153 --- /dev/null +++ b/login/login_FLEX_iFrame.aspx.vb @@ -0,0 +1,61 @@ +Imports System.Data.SqlClient +Imports System.Data + +Partial Class login_login_TEST + Inherits System.Web.UI.Page + Dim CustomerIDTextBox As TextBox + Protected Sub ValidateUser(sender As Object, e As EventArgs) + Dim userId As Integer = 0 + ' cDBFunctions.GetNewOpenConnection() + Dim ConnectionString = "" + If HttpContext.Current.Request.ServerVariables("SERVER_NAME") = "localhost" Then + 'ConnectionString = "Server=DEVELOPER\DEVSQL;Database=VERAG_HOMEPAGE;Uid=sa;Pwd=BmWr501956" + ConnectionString = "Server=DEVELOPER\DEVSQL;Database=VERAG_HOMEPAGE;Uid=AppUser;Pwd=yp/THDd?xM+pZ$;" + Else + ConnectionString = "Server=DEVELOPER.verag.ost.dmn\DEVSQL;Database=VERAG_HOMEPAGE;Uid=AppUser;Pwd=yp/THDd?xM+pZ$;" + 'ConnectionString = "Server=db593295684.db.1and1.com;Database=db593295684;Uid=dbo593295684;Pwd=atilla#2;" + End If + + ' Dim constr As String = ConfigurationManager.ConnectionStrings("constr").ConnectionString + Using con As New SqlConnection(ConnectionString) + ' Using cmd As New SqlCommand("Validate_User") + Using cmd As New SqlCommand("SELECT COUNT(*) FROM [VERAG_HOMEPAGE].[dbo].[Users] WHERE Username=@Username AND Password=@Password") + ' cmd.CommandType = CommandType.StoredProcedure + cmd.Parameters.AddWithValue("@Username", Login1.UserName) + cmd.Parameters.AddWithValue("@Password", Login1.Password) + cmd.Connection = con + con.Open() + ' userId = Convert.ToInt32(cmd.ExecuteScalar()) + Dim dr As SqlDataReader = cmd.ExecuteReader() + If dr.HasRows Then + dr.Read() + 'MsgBox(dr.Item(0).ToString()) + Select Case dr.Item(0) + Case 0 + Login1.FailureText = "Username and/or password is incorrect." + Exit Select + Case -2 + Login1.FailureText = "Account has not been activated." + Exit Select + Case Else + FormsAuthentication.RedirectFromLoginPage(User.Identity.Name, True) + Session.Add("test", Login1.UserName) + CustomerIDTextBox = Login1.FindControl("CustomerID") + Session.Add("CustomerID", CustomerIDTextBox.Text) + Session.Add("PW", Login1.Password) + + 'FormsAuthentication.SetAuthCookie(Login1.UserName, True) + 'Response.Redirect("../Customers/CustomsAviso.aspx") + Exit Select + End Select + End If + dr.Close() + con.Close() + End Using + End Using + End Sub + + Protected Sub LoginButton_Click(sender As Object, e As EventArgs) + + End Sub +End Class diff --git a/newpageJulius_Sidebar.aspx b/newpageJulius_Sidebar.aspx index ed82a87..ec265fd 100644 --- a/newpageJulius_Sidebar.aspx +++ b/newpageJulius_Sidebar.aspx @@ -550,7 +550,7 @@ --> -