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

Css Datei angepasst und Änderungen in Layout vorgenommen:

Browse Source 
Grid system eingefügt (responsive) und Login angepasst mit Session Vriablen an CustomsAviso übergeben bzw an gesamte Session für den jeweiligen Benutzer setzen
Hinweise:
siehe https://docs.microsoft.com/en-us/previous-versions/aspnet/ms178581(v=vs.100)
This commit is contained in:
ja
2021-09-13 15:23:47 +02:00
parent a7c7dfee21
commit a0b6a7c108
6 changed files with 267 additions and 248 deletions
Download Patch File Download Diff File Expand all files Collapse all files

185
Customers/CustomsAviso.aspx
View File

@@ -19,7 +19,61 @@
visibility: hidden;
color: #043381;
}
@media (min-width: 558.98px) {
#txt_Absender {
width: 850px;
}
#txt_Empfaenger {
width: 850px;
}
#txt_LKWNr {
width: 850px;
}
#txt_KdNrAuftrag {
width: 850px;
}
}
}
@media (max-width: 558.98px) {
#txt_Absender {
width: 250px;
padding-right:-2px;
padding-left:60px;
}
#txt_Empfaenger {
width: 250px;
padding-right:-2px;
padding-left:60px;
}
#txt_LKWNr {
width: 250px;
padding-right:-2px;
padding-left:60px;
}
#txt_KdNrAuftrag {
width: 250px;
padding-right:-2px;
padding-left:60px;
}
.container-fluid{
width:700px;
}
#cont1{
width:700px;
}
#containerseiterand{
min-width:700px;
}
.flex-fill{
width:700px;
}
#cont3{
width:700px;
}
#cont4{
min-width: 750px;
}
}
</style>
<!-- Bootstrap CSS -->
<link href="https://cdn.jsdelivr.net/npm/bootstrap@5.0.2/dist/css/bootstrap.min.css" rel="stylesheet" integrity="sha384-EVSTQN3/azprG1Anm3QDgpJLIm9Nao0Yz1ztcQTwFspd3yD65VohhpuuCOmLASjC" crossorigin="anonymous"/>
@@ -32,7 +86,7 @@
<link rel="stylesheet" type="text/css" href="../css/Dropdown.css"/>
<!-- <link rel="stylesheet" type="text/css" href="../css/style.css"/>-->
<link rel="stylesheet" type="text/css" href="../css/Customers/MasterpageCustomers.css"/>
<link rel="stylesheet" type="text/css" href="../css/Customers/CustomerIndex.css"/>
<link rel="stylesheet" type="text/css" href="../css/Customers/CustomerAVISO.css"/>
<link rel="stylesheet" type="text/css" href="../css/navbarsidebar2.css"/>
</asp:Content>
@@ -40,10 +94,13 @@
<asp:Content ID="Content3" ContentPlaceHolderID="ContentPlaceHolder1" Runat="Server">
<!-- Webiste-Content-->
<div id="containerseiterand">
<div class="container-fluid">
<div id="cont1">
<h1>Kundencenter:</h1>
<div id="line" style="width: 92%;"></div>
<br/>
<h3>Hier finden Sie Informationen zu den aktuellen Aufträgen.</h3>
</div>
<%Try
VERAG_PROG_ALLGEMEIN.cAllgemein.ERR_OP_GLOBAL = VERAG_PROG_ALLGEMEIN.ERROR_OP.SHOW
'Dim AD As New VERAG_PROG_ALLGEMEIN.cAdressen(799124)
@@ -63,71 +120,95 @@
If AVISO_dt IsNot Nothing Then
If True Then 'AVISO.Status <> 1 And AVISO.Status <> 2 Then 'SENDUNGSTABELLE'%>
<div class="flex-fill" style="margin-left:6px">
<div style="border:/*1px*/0.04071661237785016vw #043381 solid">
<div class="col-12" style="margin-left:2px">
<h2><%=STANDORT %></h2>
</div>
<div style="margin-left:6px">
<div class="col-12" style="margin-left:4px">
<asp:Label ID="Label1" runat="server" Text="Bitte eine Auswahl treffen:"></asp:Label>
<asp:Button ID="btn_resetForm" runat="server" Text="Reset Filters" onclick="btn_resetForm_Click"/>
<asp:Label ID="lbl_Kndnr" runat="server" Text="Die Kundennummer:"></asp:Label>
<asp:TextBox ID="txt_KdNr" runat="server"></asp:TextBox>
</div>
<div class="col-12">
<asp:Label ID="lbl_Kndnr" runat="server" Text="Herzlich Willkommen!"></asp:Label>
</div>
<div style="height:0.936768149882904vh"></div>
<div class="col-12" style="margin-left:8px">
<asp:Label ID="lbl_ArtderAuftraege" runat="server" Text="Art der Aufträge:"></asp:Label>
</div>
<div class="col-12" style="margin-left:8px">
<asp:RadioButton ID="rbt_Erf" runat="server" Text="Erfasst"/>
<asp:RadioButton ID="rbt_Vorb" runat="server" Text="Vorbereitet"/>
<asp:RadioButton ID="rbt_Vorg" runat="server" Text="Vorgeschrieben"/>
<asp:RadioButton ID="rbt_Ankunft" runat="server" Text="Ankunft"/>
<asp:RadioButton ID="rbt_Freig" runat="server" Text="Freigabe" onclick="rbt_Freig_Click"/>
</div>
</div>
</div>
<div style="height:0.936768149882904vh"></div>
<div class="col-12" id="cont4">
<div class="col-12" style="border:/*1px*/0.04071661237785016vw #043381 solid; margin:-4px 2px -4px 2px">
<div class="row-cols-12" style="margin-left:4px">
<asp:Label ID="lbl_Suchparam_Wichtig" runat="server" Text="Wichtge Suchparamter:"></asp:Label>
</div>
<div class="container" style="margin-left:2px">
<div class="align-content-start">
<asp:Label ID="lbl_von" runat="server" Text="Von:"></asp:Label>
<asp:Label ID="lbl_von2" runat="server" Text="format:dd.mm.yyyy"></asp:Label>
<asp:TextBox ID="txt_pickdate1" runat="server"></asp:TextBox>
<button class="btn btn-primary" id="btn_pickdate1" type="button" data-bs-toggle="collapse" data-bs-target="#collapseExample" aria-expanded="false" aria-controls="collapseExample" title="Für die grafische Auswahl des Datums auf die Uhr tippen."><center><img src="../images/Icons/main/uhr.gif" style="width:12px; height:12px"/></center></button>
<div class="collapse" id="collapseExample">
<div class="row">
<div class="col-4">
<asp:Calendar id="pickdate1" runat="server"></asp:Calendar>
</div>
<div class="col-5">
<div class="col-1">
<asp:CheckBox ID="ckb_Uhrzeit1" OnCheckedChanged="ckb_Uhrzeit1_CheckedChanged" runat="server" data-bs-toggle="tooltip" data-bs-placement="left" title="Zum Uhrzeit miteinbeziehen anwählen."/>
</div>
<div class="col-4">
<asp:Label ID="lbl_Uhrzeit1_von" runat="server" Text="Uhrzeit von:"></asp:Label>
<asp:TextBox ID="txt_Uhrzeit1_von" TextMode="Time" runat="server"></asp:TextBox>
</div>
</div>
</div>
</div>
<asp:TextBox id="pickdate1" Type="Date" runat="server"></asp:TextBox>
<asp:Label ID="lbl_bis" runat="server" Text="Bis:"></asp:Label>
<asp:Label ID="lbl_bis2" runat="server" Text="Format:dd.mm.yyyy"></asp:Label>
<asp:TextBox ID="txt_pickdate2" runat="server"></asp:TextBox>
<button class="btn btn-primary" id="btn_pickdate2" type="button" data-bs-toggle="collapse" data-bs-target="#collapseExample2" aria-expanded="false" aria-controls="collapseExample2" title="Für die grafische Auswahl des Datums auf die Uhr tippen."><center><img src="../images/Icons/main/uhr.gif" style="width:12px; height:12px"/></center></button>
<div class="collapse" id="collapseExample2">
<asp:TextBox id="pickdate2" Type="Date" runat="server"></asp:TextBox>
</div>
</div>
</div>
<div style="height:/*12px*/0.936768149882904vh"></div>
<div class="col-12" id="cont3" style="border:/*1px*/0.04071661237785016vw #043381 solid; margin: 2px 2px 2px 2px">
<div class="container" style="margin-left:2px">
<asp:Label ID="lbl_option_Suchparam" runat="server" Text="Optionale Suchparameter:"></asp:Label>
<div style="height:/*12px*/0.936768149882904vh"></div>
<!-- Optionale Suchparameter-->
<div class="row">
<div class="col-4">
<asp:Calendar id="pickdate2" runat="server"></asp:Calendar>
</div>
<div class="col-5">
<div class="col-1">
<asp:CheckBox ID="ckb_Uhrzeit2" runat="server" data-bs-toggle="tooltip" data-bs-placement="left" title="Zum Uhrzeit miteinbeziehen anwählen."/>
</div>
<div class="col-4">
<asp:Label ID="lbl_Uhrzeit2_bis" runat="server" Text="Uhrzeit bis:"></asp:Label>
<asp:TextBox ID="txt_Uhrzeit2_bis" TextMode="Time" runat="server"></asp:TextBox>
</div>
</div>
</div>
</div>
<!-- Optionale Suchparameter-->
<asp:Label ID="lbl_Absender" runat="server" Text="Absender"></asp:Label>
<asp:TextBox ID="txt_Absender" runat="server" ></asp:TextBox>
</div>
<div class="col-8" style="margin-right:/*1.52px;*/0.33480176211453744vw;">
<asp:TextBox ID="txt_Absender" runat="server" style="width:117px"></asp:TextBox>
</div>
</div>
<div style="height:/*12px*/0.936768149882904vh"></div>
<div class="row">
<div class="col-4">
<asp:Label ID="lbl_Empfaenger" runat="server" Text="Empfänger"></asp:Label>
<asp:TextBox ID="txt_Empfaenger" runat="server" ></asp:TextBox>
</div>
<div class="col-8" style="margin-right:/*1.52px;*/0.33480176211453744vw;">
<asp:TextBox ID="txt_Empfaenger" runat="server" style="width:117px"></asp:TextBox>
</div>
</div>
<div style="height:/*12px*/0.936768149882904vh"></div>
<div class="row">
<div class="col-4">
<asp:Label ID="lbl_LKWNr" runat="server" Text="LKW Nr"></asp:Label>
<asp:TextBox ID="txt_LKWNr" runat="server" ></asp:TextBox>
</div>
<div class="col-8" style="margin-right:/*1.52px;*/0.33480176211453744vw;">
<asp:TextBox ID="txt_LKWNr" runat="server" style="width:117px"></asp:TextBox>
</div>
</div>
<div style="height:/*12px*/0.936768149882904vh"></div>
<div class="row">
<div class="col-4">
<asp:Label ID="lbl_KdNrAuftrag" runat="server" Text="Kunden Auftrags Nr"></asp:Label>
<asp:TextBox ID="txt_KdNrAuftrag" runat="server" ></asp:TextBox>
<asp:Button ID="btn_Auftraege" runat="server" Text="Erhalte Aufträge" OnClick="btn_Auftraege_Click" />
</div>
<div class="col-8" style="margin-right:/*1.52px;*/0.33480176211453744vw;">
<asp:TextBox ID="txt_KdNrAuftrag" runat="server" style="width:117px"></asp:TextBox>
</div>
</div>
</div>
<div style="height:/*24px*/1.873536299765808vh"></div>
<asp:Button ID="btn_Auftraege" runat="server" Text="Erhalte Aufträge" OnClick="btn_Auftraege_Click" style="margin-left:18px" />
<div style="height:/*32px*/2.498048399687744vh"></div>
<div class="g-3" style="border:/*1.8px*/0.0706436420722135vw #808080 ridge; margin-left:12px">
<!-- <input class="form-control mb-4" id="tableSearch" type="text"
placeholder="Einen Begriff eingeben oder den Anfang davon ...">-->
<div id="conovertab">
@@ -160,7 +241,9 @@
</div>
</div></div></div>
</div>
<br /><br /><br />
<% End If
End If

147
Customers/CustomsAviso.aspx.vb
View File

@@ -19,15 +19,16 @@ Partial Class Kundenbereich_Default
Response.Redirect("../newpageJulius_Sidebar.aspx", True)
End Sub
Dim datevon As Date
Dim datebis As Date
Dim datevon As DateTime
Dim datebis As DateTime
Dim Kdnrtext As String
Dim dt
Dim hrv, hrb, minv, minb, secv, secb As DateAndTime
Dim setuhrzeit1bool As Boolean = False
Dim setuhrzeit2bool As Boolean = False
Protected Sub btn_Auftraege_Click(sender As Object, e As EventArgs)
Kdnrtext = txt_KdNr.Text
'MsgBox(Session.Item("test").ToString)
'MsgBox(Session.Item("CustomerID").ToString)
'MsgBox(Session.Item("PW").ToString)
Kdnrtext = Session.Item("CustomerID").ToString
Dim tbl_CellIndex = New TableCell
Dim tbl_CellArt = New TableCell
@@ -43,76 +44,15 @@ Partial Class Kundenbereich_Default
dt = Nothing
If txt_pickdate1.Text = "" AndAlso txt_pickdate2.Text = "" AndAlso setuhrzeit1bool = False And setuhrzeit2bool = False Then
If datebis > datevon Then
Try
datevon = Date.Parse(pickdate1.SelectedDate.Day.ToString + "-" + pickdate1.SelectedDate.Month.ToString + "-" + pickdate1.SelectedDate.Year.ToString)
txt_pickdate1.Text = Date.Parse(pickdate1.SelectedDate.Month.ToString + "-" + pickdate1.SelectedDate.Month.ToString + "-" + pickdate1.SelectedDate.Year.ToString)
datebis = Date.Parse(pickdate2.SelectedDate.Day.ToString + "-" + pickdate2.SelectedDate.Month.ToString + "-" + pickdate2.SelectedDate.Year.ToString)
txt_pickdate2.Text = Date.Parse(pickdate2.SelectedDate.Month.ToString + "-" + pickdate2.SelectedDate.Month.ToString + "-" + pickdate2.SelectedDate.Year.ToString)
Catch ex As Exception When datebis < datevon
Dim dttemp As Date
dttemp = datebis
datebis = datevon
datevon = datebis
End Try
ElseIf txt_pickdate1.Text = "" AndAlso txt_pickdate2.Text = "" AndAlso setuhrzeit1bool = False And setuhrzeit2bool = False Then
Try
Dim splitArray1 As String() = txt_Uhrzeit1_von.Text.Split(New Char() {":"})
Dim splitArray2 As String() = txt_Uhrzeit2_bis.Text.Split(New Char() {":"})
Dim hrv, hrb, m1, m2 As Integer
If ((Integer.TryParse(splitArray1(0), hrv)) AndAlso
((Integer.TryParse(splitArray1(1), m1)) AndAlso
((Integer.TryParse(splitArray1(1), m1)) AndAlso
(Integer.TryParse(splitArray2(0), hrb)) AndAlso
(Integer.TryParse(splitArray2(1), m2))) Then
Else
// invalid format HHMM
End If
End Try
temp2 = DateAndTime.Minute(txt_Uhrzeit2_bis.Text)
datevon = Date.Parse(pickdate1.SelectedDate.Day.ToString + "-" + pickdate1.SelectedDate.Month.ToString + "-" + pickdate1.SelectedDate.Year.ToString + temp1.ToString)
txt_pickdate1.Text = datevon
datebis = Date.Parse(pickdate2.SelectedDate.Day.ToString + "-" + pickdate2.SelectedDate.Month.ToString + "-" + pickdate2.SelectedDate.Year.ToString + hrb.ToString)
txt_pickdate2.Text = Date.Parse(pickdate2.SelectedDate.Month.ToString + "-" + pickdate2.SelectedDate.Month.ToString + "-" + pickdate2.SelectedDate.Year.ToString)
Catch ex As Exception When datebis < datevon
Dim dttemp As Date
dttemp = datebis
datebis = datevon
datevon = datebis
End Try
Else
Try
datevon = Date.Parse(txt_pickdate1.Text)
pickdate1.SelectedDate = datevon
datebis = Date.Parse(txt_pickdate2.Text)
pickdate2.SelectedDate = datebis
Catch ex As Exception When datevon < Date.Parse("01-01-2001") Or datebis > Date.Now
datevon = DateValue(Date.Now.ToString("01-MM-yyyy"))
txt_pickdate1.Text = datevon.ToString
datebis = DateValue(Date.Now)
txt_pickdate2.Text = datebis.ToString
datevon = Date.Parse(pickdate1.Text)
datebis = Date.Parse(pickdate2.Text)
Catch ex As Exception
MsgBox(ex.StackTrace, MsgBoxStyle.Exclamation)
End Try
End If
'Dim tr
If rbt_Erf.Checked = True Then
dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB("", Kdnrtext, {0})
@@ -125,13 +65,20 @@ Partial Class Kundenbereich_Default
ElseIf rbt_Vorb.Checked = True Then
dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB("", Kdnrtext, {4})
ElseIf rbt_Vorg.Checked = True Then
dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB("", Kdnrtext, {5})
ElseIf rbt_Erf.Checked = False And rbt_Freig.Checked = False And rbt_Ankunft.Checked = False And rbt_Vorb.Checked = False And rbt_Vorg.Checked = False Then
If pickdate1.Text = "TT.MM.JJJJ" And pickdate2.Text = "TT.MM.JJJJ" Then
MsgBox("Bitte ein Datum auswählen!", MsgBoxStyle.Information, "Information!")
pickdate1.Text = Date.ParseExact("01" + "-" + Date.Now.Month.ToString + "-" + Date.Now.Year.ToString, "dd-MM-yyyy", Nothing).ToString
pickdate2.Text = Date.Now.ParseExact(Date.Now.Day.ToString + "-" + Date.Now.Month.ToString + "-" + Date.Now.Year.ToString, "dd-MM-yyyy", Nothing).ToString
datevon = Date.ParseExact(pickdate1.Text, "dd-MM-yyyy", Nothing)
datebis = Date.ParseExact(pickdate2.Text, "dd-MM-yyyy", Nothing)
dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB("", Kdnrtext,, datevon, datebis)
Else
dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB("", Kdnrtext,, datevon, datebis)
End If
End If
If dt IsNot Nothing Then
@@ -166,9 +113,6 @@ Partial Class Kundenbereich_Default
'tr = New HtmlTableRow()
Dim tr = New TableRow
For Each d In dt.Rows
If i <= dt.Rows.Count Then
tbl_CellIndex.Text = i
tr.Controls.Add(tbl_CellIndex)
@@ -193,9 +137,6 @@ Partial Class Kundenbereich_Default
Case 5
tbl_CellStatus.Text = "Vorgeschrieben"
tr.Controls.Add(tbl_CellStatus)
Case Else
tbl_CellStatus.Text = "Undefiend"
tr.Controls.Add(tbl_CellStatus)
End Select
tbl_Cellvon.Text = d("AvisoEingang").ToString
tr.Controls.Add(tbl_Cellvon)
@@ -210,11 +151,8 @@ Partial Class Kundenbereich_Default
tbl_CellKundAuftNr.Text = d("KdAuftragsNr_Avisierer").ToString
tr.Controls.Add(tbl_CellKundAuftNr)
normaltable.Rows.Add(tr)
End If
i = i + 1
Next
End If
@@ -236,14 +174,14 @@ Partial Class Kundenbereich_Default
rbt_Vorg.Enabled = True
rbt_Vorb.Checked = False
rbt_Vorb.Enabled = True
txt_KdNr.Text = ""
txt_pickdate1.Text = ""
txt_pickdate2.Text = ""
'txt_KdNr.Text = ""
pickdate1.Text = ""
pickdate2.Text = ""
datevon = Nothing
datebis = Nothing
dt = Nothing
Kdnrtext = ""
txt_KdNr.Focus()
'txt_KdNr.Focus()
@@ -252,41 +190,6 @@ Partial Class Kundenbereich_Default
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
tbl_Header_row.TableSection = TableRowSection.TableHeader
End Sub
Protected Sub ckb_Uhrzeit1_CheckedChanged(sender As Object, e As EventArgs)
If ckb_Uhrzeit1.Checked = False Then
lbl_Uhrzeit1_von.ForeColor = Drawing.Color.LightGray
txt_Uhrzeit1_von.ReadOnly = True
lbl_Uhrzeit1_bis.ForeColor = Drawing.Color.LightGray
txt_Uhrzeit1_bis.Enabled = True
lbl_Uhrzeit2_von.ForeColor = Drawing.Color.LightGray
txt_Uhrzeit2_von.Enabled = True
lbl_Uhrzeit2_bis.ForeColor = Drawing.Color.LightGray
txt_Uhrzeit2_bis.Enabled = True
setuhrzeit1bool = True
ElseIf ckb_Uhrzeit2.Checked = False Then
lbl_Uhrzeit1_von.ForeColor = Drawing.Color.LightGray
txt_Uhrzeit1_von.ReadOnly = True
lbl_Uhrzeit1_bis.ForeColor = Drawing.Color.LightGray
txt_Uhrzeit1_bis.Enabled = True
lbl_Uhrzeit2_von.ForeColor = Drawing.Color.LightGray
txt_Uhrzeit2_von.Enabled = True
lbl_Uhrzeit2_bis.ForeColor = Drawing.Color.LightGray
txt_Uhrzeit2_bis.Enabled = True
setuhrzeit2bool = True
Else
lbl_Uhrzeit1_von.ForeColor = Drawing.Color.FromArgb(452129)
txt_Uhrzeit1_von.ReadOnly = False
lbl_Uhrzeit1_bis.ForeColor = Drawing.Color.FromArgb(452129)
txt_Uhrzeit1_bis.ReadOnly = False
lbl_Uhrzeit2_von.ForeColor = Drawing.Color.FromArgb(452129)
txt_Uhrzeit2_von.ReadOnly = False
lbl_Uhrzeit2_bis.ForeColor = Drawing.Color.FromArgb(452129)
txt_Uhrzeit2_bis.ReadOnly = False
setuhrzeit1bool = False
setuhrzeit2bool = False
End If
End Sub
End Class

64
css/Customers/CustomerAVISO.css Normal file
View File

@@ -0,0 +1,64 @@
#tableSearch {
width: 1250px;
}
h1 {
color: #043381;
font-size: 32px;
}
#normaltable {
width: 1500px;
}
#conovertab {
margin-left: 0px;
width: 1700px;
}
#cont1{
width:100%
}
@media (max-width: 558.98px) {
#conovertab {
margin-left: 0px;
width: 315px;
overflow-x: auto;
}
h1 {
color: #043381;
font-size: 22px;
}
#tableSearch {
width: 50%;
}
#containerseiterand {
width: 50%;
}
#txt_Absender {
width: 50%;
}
#txt_Empfaenger {
width: 50%;
}
#txt_LKWNr {
width: 50%;
}
#txt_KdNrAuftrag {
width: 50%;
}
}
@media (min-width: 558.98px) {
#txt_Absender {
width: 550px;
}
#txt_Empfaenger {
width: 550px;
}
#txt_LKWNr {
width: 550px;
}
#txt_KdNrAuftrag {
width: 550px;
}
}

37
css/Customers/CustomerIndex.css
View File

@@ -1,37 +0,0 @@
#tableSearch {
width: 1250px;
}
h1 {
color: #043381;
font-size: 32px;
}
#normaltable {
width: 1500px;
}
#conovertab {
margin-left: 0px;
width: 1700px;
}
@media (max-width: 558.98px) {
#conovertab {
margin-left: 0px;
width: 315px;
overflow-x: auto;
}
h1 {
color: #043381;
font-size: 22px;
}
#tableSearch {
width: 315px;
}
#containerseiterand {
width: 352px;
}
}

6
login/login_FLEX.aspx
View File

@@ -93,11 +93,11 @@
</tr>
<tr>
<td align="right">
<asp:Label ID="UserIDLabel" runat="server" AssociatedControlID="UserID" required="true">Kundennummer:</asp:Label>
<asp:Label ID="CustomerIDLabel" runat="server" AssociatedControlID="CustomerID" required="true">Kundennummer:</asp:Label>
</td>
<td>
<asp:TextBox ID="UserID" runat="server" TextMode="Number"></asp:TextBox>
<asp:RequiredFieldValidator ID="UserIDrequired" runat="server" ControlToValidate="UserID" ErrorMessage="Die Kundennummer ist erforderlich." ToolTip="Die Kundennummer ist erforderlich." ValidationGroup="Login1">*</asp:RequiredFieldValidator>
<asp:TextBox ID="CustomerID" runat="server" TextMode="Number"></asp:TextBox>
<asp:RequiredFieldValidator ID="CustomerIDrequired" runat="server" ControlToValidate="CustomerID" ErrorMessage="Die Kundennummer ist erforderlich." ToolTip="Die Kundennummer ist erforderlich." ValidationGroup="Login1">*</asp:RequiredFieldValidator>
</td>
</tr>
<tr>

8
login/login_FLEX.aspx.vb
View File

@@ -3,7 +3,7 @@ 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()
@@ -39,6 +39,12 @@ Partial Class login_login_TEST
Login1.FailureText = "Account has not been activated."
Exit Select
Case Else
Session.Add("test", Login1.UserName)
CustomerIDTextBox = Login1.FindControl("CustomerID")
Session.Add("CustomerID", CustomerIDTextBox.Text)
Session.Add("PW", Login1.Password)
FormsAuthentication.RedirectFromLoginPage(Login1.UserName, Login1.RememberMeSet)
'FormsAuthentication.SetAuthCookie(Login1.UserName, True)
'Response.Redirect("mypage.aspx")