Sicherheitsmaßnahme entschäfrft

This commit is contained in:
ja
2021-11-17 14:35:52 +01:00
parent da12fb5ce5
commit 9dfefd85a7
4 changed files with 239 additions and 230 deletions

View File

@@ -20,8 +20,8 @@ Partial Class CustomsAviso
VERAG_VARIABLES.initerrorcount() VERAG_VARIABLES.initerrorcount()
If Me.Page.User.Identity.IsAuthenticated Then If Me.Page.User.Identity.IsAuthenticated Then
If Me.Page.User.Identity.Name = "userwithlongername" Or Me.Page.User.Identity.Name = "test" Then
Try Try
Kdnrtext = Session.Item("CustomerID") Kdnrtext = Session.Item("CustomerID")
Catch A As UnauthorizedAccessException When String.IsNullOrEmpty(Kdnrtext) Catch A As UnauthorizedAccessException When String.IsNullOrEmpty(Kdnrtext)
MsgBox("Dieser Bereich ist nicht gestattet! Ein Fehler ist bei der Validierung der ID aufgetreten! Bitte erneut versuchen!", MsgBoxStyle.Information, "Error in User Area!") MsgBox("Dieser Bereich ist nicht gestattet! Ein Fehler ist bei der Validierung der ID aufgetreten! Bitte erneut versuchen!", MsgBoxStyle.Information, "Error in User Area!")
@@ -44,237 +44,233 @@ Partial Class CustomsAviso
End If End If
tbl_Header_row.TableSection = TableRowSection.TableHeader tbl_Header_row.TableSection = TableRowSection.TableHeader
' MsgBox(datebis) ' MsgBox(datebis)
If (Page.IsPostBack) Then If (Page.IsPostBack) Then
Page.MaintainScrollPositionOnPostBack = True Page.MaintainScrollPositionOnPostBack = True
If rbt_Alle.Checked = True Then
lbl_von.Visible = True
lbl_bis.Visible = True
valDateRange_1.Enabled = True
valDateRange_2.Enabled = True
valreqpickdate1.Enabled = True
valreqpickdate2.Enabled = True
valreqpickdate1.Validate()
valreqpickdate2.Validate()
pickdate1.Visible = True
pickdate2.Visible = True
If valreqpickdate1.IsValid = True And valreqpickdate2.IsValid = True Then
datevon = Date.Parse(pickdate1.Text)
datebis = Date.Parse(pickdate2.Text)
ElseIf pickdate1.Text = String.Empty And pickdate2.Text = String.Empty Then
datevon = Nothing
datebis = Nothing
End If
ElseIf rbt_Freig.Checked = True Then
lbl_von.Visible = True
lbl_bis.Visible = True
valreqpickdate1.Enabled = True
valreqpickdate2.Enabled = True
valreqpickdate1.Validate()
valreqpickdate2.Validate()
valDateRange_1.Enabled = True
valDateRange_2.Enabled = True
pickdate1.Visible = True
pickdate2.Visible = True
If valreqpickdate1.IsValid = True And valreqpickdate2.IsValid = True Then
datevon = Date.Parse(pickdate1.Text)
datebis = Date.Parse(pickdate2.Text)
ElseIf pickdate1.Text = String.Empty And pickdate2.Text = String.Empty Then
datevon = Nothing
datebis = Nothing
End If
ElseIf rbt_Ankunft.Checked = True Then
lbl_von.Visible = False
lbl_bis.Visible = False
valreqpickdate1.Enabled = False
valreqpickdate2.Enabled = False
valDateRange_1.Enabled = False
valDateRange_2.Enabled = False
pickdate1.Visible = False
pickdate2.Visible = False
datevon = Nothing
datebis = Nothing
ElseIf rbt_Erf.Checked = True Then
lbl_von.Visible = False
lbl_bis.Visible = False
valreqpickdate1.Enabled = False
valreqpickdate2.Enabled = False
valDateRange_1.Enabled = False
valDateRange_2.Enabled = False
pickdate1.Visible = False
pickdate2.Visible = False
datevon = Nothing
datebis = Nothing
ElseIf rbt_Vorb.Checked = True Then
lbl_von.Visible = False
lbl_bis.Visible = False
valreqpickdate1.Enabled = False
valreqpickdate2.Enabled = False
valDateRange_1.Enabled = False
valDateRange_2.Enabled = False
pickdate1.Visible = False
pickdate2.Visible = False
datevon = Nothing
datebis = Nothing
ElseIf rbt_Vorg.Checked = True Then
lbl_von.Visible = False
lbl_bis.Visible = False
valreqpickdate1.Enabled = False
valreqpickdate2.Enabled = False
valDateRange_1.Enabled = False
valDateRange_2.Enabled = False
pickdate1.Visible = False
pickdate2.Visible = False
datevon = Nothing
datebis = Nothing
End If
'Mobil
If rbt_Alle_M.Checked = True Then
lbl_von.Visible = True
lbl_bis.Visible = True
valreqpickdate1.Enabled = True
valreqpickdate2.Enabled = True
valreqpickdate1.Validate()
valreqpickdate2.Validate()
valDateRange_1.Enabled = True
valDateRange_2.Enabled = True
pickdate1.Visible = True
pickdate2.Visible = True
If valreqpickdate1.IsValid = True And valreqpickdate2.IsValid = True Then
datevon = Date.Parse(pickdate1.Text)
datebis = Date.Parse(pickdate2.Text)
ElseIf pickdate1.Text = String.Empty And pickdate2.Text = String.Empty Then
datevon = Nothing
datebis = Nothing
End If
ElseIf rbt_Freig_M.Checked = True Then
lbl_von.Visible = True
lbl_bis.Visible = True
valreqpickdate1.Enabled = True
valreqpickdate2.Enabled = True
valreqpickdate1.Validate()
valreqpickdate2.Validate()
valDateRange_1.Enabled = True
valDateRange_2.Enabled = True
pickdate1.Visible = True
pickdate2.Visible = True
If valreqpickdate1.IsValid = True And valreqpickdate2.IsValid = True Then
datevon = Date.Parse(pickdate1.Text)
datebis = Date.Parse(pickdate2.Text)
ElseIf pickdate1.Text = String.Empty And pickdate2.Text = String.Empty Then
datevon = Nothing
datebis = Nothing
End If
ElseIf rbt_Ankunft_M.Checked = True Then
lbl_von.Visible = False
lbl_bis.Visible = False
valreqpickdate1.Enabled = False
valreqpickdate2.Enabled = False
valDateRange_1.Enabled = False
valDateRange_2.Enabled = False
pickdate1.Visible = False
pickdate2.Visible = False
datevon = Nothing
datebis = Nothing
ElseIf rbt_Erf_M.Checked = True Then
lbl_von.Visible = False
lbl_bis.Visible = False
valreqpickdate1.Enabled = False
valreqpickdate2.Enabled = False
valDateRange_1.Enabled = False
valDateRange_2.Enabled = False
pickdate1.Visible = False
pickdate2.Visible = False
datevon = Nothing
datebis = Nothing
ElseIf rbt_Vorb_M.Checked = True Then
lbl_von.Visible = False
lbl_bis.Visible = False
valreqpickdate1.Enabled = False
valreqpickdate2.Enabled = False
valDateRange_1.Enabled = False
valDateRange_2.Enabled = False
pickdate1.Visible = False
pickdate2.Visible = False
datevon = Nothing
datebis = Nothing
ElseIf rbt_Vorg_M.Checked = True Then
lbl_von.Visible = False
lbl_bis.Visible = False
valreqpickdate1.Enabled = False
valreqpickdate2.Enabled = False
valDateRange_1.Enabled = False
valDateRange_2.Enabled = False
pickdate1.Visible = False
pickdate2.Visible = False
datevon = Nothing
datebis = Nothing
End If
If Not IsNothing(Session.Item("mytable")) Then
addrows()
End If
Else
Page.MaintainScrollPositionOnPostBack = False
rbt_Alle.Checked = True
normaltable.EnableViewState = True
If rbt_Alle.Checked = True Then
lbl_von.Visible = True lbl_von.Visible = True
lbl_bis.Visible = True lbl_bis.Visible = True
valDateRange_1.Enabled = True valDateRange_1.Enabled = True
valDateRange_2.Enabled = True valDateRange_2.Enabled = True
valreqpickdate1.Enabled = True
valreqpickdate2.Enabled = True
valreqpickdate1.Validate()
valreqpickdate2.Validate()
pickdate1.Visible = True pickdate1.Visible = True
pickdate2.Visible = True pickdate2.Visible = True
If valreqpickdate1.IsValid = True And valreqpickdate2.IsValid = True Then
If String.IsNullOrEmpty(txt_LKWNr.Text) Then datevon = Date.Parse(pickdate1.Text)
regexval_txt_LKW.Enabled = False datebis = Date.Parse(pickdate2.Text)
Else ElseIf pickdate1.Text = String.Empty And pickdate2.Text = String.Empty Then
regexval_txt_LKW.Enabled = True datevon = Nothing
datebis = Nothing
End If End If
If String.IsNullOrEmpty(txt_KdNrAuftrag.Text) = True Then ElseIf rbt_Freig.Checked = True Then
regexval_txt_KdNrAuftrag.Enabled = False lbl_von.Visible = True
Else lbl_bis.Visible = True
regexval_txt_KdNrAuftrag.Enabled = True valreqpickdate1.Enabled = True
End If valreqpickdate2.Enabled = True
If String.IsNullOrEmpty(txt_Empfaenger.Text) = True Then valreqpickdate1.Validate()
regexval_txt_Empfaenger.Enabled = False valreqpickdate2.Validate()
Else valDateRange_1.Enabled = True
regexval_txt_Empfaenger.Enabled = True valDateRange_2.Enabled = True
End If pickdate1.Visible = True
If String.IsNullOrEmpty(txt_Absender.Text) = True Then pickdate2.Visible = True
regexval_txt_Absender.Enabled = False If valreqpickdate1.IsValid = True And valreqpickdate2.IsValid = True Then
Else datevon = Date.Parse(pickdate1.Text)
regexval_txt_Absender.Enabled = True datebis = Date.Parse(pickdate2.Text)
End If ElseIf pickdate1.Text = String.Empty And pickdate2.Text = String.Empty Then
'Mobile datevon = Nothing
If String.IsNullOrEmpty(txt_LKWNr_M.Text) Then datebis = Nothing
regexval_txt_LKWNr_M.Enabled = False
Else
regexval_txt_LKWNr_M.Enabled = True
End If
If String.IsNullOrEmpty(txt_KdNrAuftrag_M.Text) = True Then
regval_txt_KdNrAuftrag_M.Enabled = False
Else
regval_txt_KdNrAuftrag_M.Enabled = True
End If
If String.IsNullOrEmpty(txt_Empfaenger_M.Text) = True Then
regval_txt_Empfaenger_M.Enabled = False
Else
regval_txt_Empfaenger_M.Enabled = True
End If
If String.IsNullOrEmpty(txt_Absender_M.Text) = True Then
regval_txt_Absender_M.Enabled = False
Else
regval_txt_Absender_M.Enabled = True
End If End If
ElseIf rbt_Ankunft.Checked = True Then
lbl_von.Visible = False
lbl_bis.Visible = False
valreqpickdate1.Enabled = False
valreqpickdate2.Enabled = False
valDateRange_1.Enabled = False
valDateRange_2.Enabled = False
pickdate1.Visible = False
pickdate2.Visible = False
datevon = Nothing
datebis = Nothing
ElseIf rbt_Erf.Checked = True Then
lbl_von.Visible = False
lbl_bis.Visible = False
valreqpickdate1.Enabled = False
valreqpickdate2.Enabled = False
valDateRange_1.Enabled = False
valDateRange_2.Enabled = False
pickdate1.Visible = False
pickdate2.Visible = False
datevon = Nothing
datebis = Nothing
ElseIf rbt_Vorb.Checked = True Then
lbl_von.Visible = False
lbl_bis.Visible = False
valreqpickdate1.Enabled = False
valreqpickdate2.Enabled = False
valDateRange_1.Enabled = False
valDateRange_2.Enabled = False
pickdate1.Visible = False
pickdate2.Visible = False
datevon = Nothing
datebis = Nothing
ElseIf rbt_Vorg.Checked = True Then
lbl_von.Visible = False
lbl_bis.Visible = False
valreqpickdate1.Enabled = False
valreqpickdate2.Enabled = False
valDateRange_1.Enabled = False
valDateRange_2.Enabled = False
pickdate1.Visible = False
pickdate2.Visible = False
datevon = Nothing
datebis = Nothing
End If End If
'Mobil
If rbt_Alle_M.Checked = True Then
lbl_von.Visible = True
lbl_bis.Visible = True
valreqpickdate1.Enabled = True
valreqpickdate2.Enabled = True
valreqpickdate1.Validate()
valreqpickdate2.Validate()
valDateRange_1.Enabled = True
valDateRange_2.Enabled = True
pickdate1.Visible = True
pickdate2.Visible = True
If valreqpickdate1.IsValid = True And valreqpickdate2.IsValid = True Then
datevon = Date.Parse(pickdate1.Text)
datebis = Date.Parse(pickdate2.Text)
ElseIf pickdate1.Text = String.Empty And pickdate2.Text = String.Empty Then
datevon = Nothing
datebis = Nothing
End If
ElseIf rbt_Freig_M.Checked = True Then
lbl_von.Visible = True
lbl_bis.Visible = True
valreqpickdate1.Enabled = True
valreqpickdate2.Enabled = True
valreqpickdate1.Validate()
valreqpickdate2.Validate()
valDateRange_1.Enabled = True
valDateRange_2.Enabled = True
pickdate1.Visible = True
pickdate2.Visible = True
If valreqpickdate1.IsValid = True And valreqpickdate2.IsValid = True Then
datevon = Date.Parse(pickdate1.Text)
datebis = Date.Parse(pickdate2.Text)
ElseIf pickdate1.Text = String.Empty And pickdate2.Text = String.Empty Then
datevon = Nothing
datebis = Nothing
End If
ElseIf rbt_Ankunft_M.Checked = True Then
lbl_von.Visible = False
lbl_bis.Visible = False
valreqpickdate1.Enabled = False
valreqpickdate2.Enabled = False
valDateRange_1.Enabled = False
valDateRange_2.Enabled = False
pickdate1.Visible = False
pickdate2.Visible = False
datevon = Nothing
datebis = Nothing
ElseIf rbt_Erf_M.Checked = True Then
lbl_von.Visible = False
lbl_bis.Visible = False
valreqpickdate1.Enabled = False
valreqpickdate2.Enabled = False
valDateRange_1.Enabled = False
valDateRange_2.Enabled = False
pickdate1.Visible = False
pickdate2.Visible = False
datevon = Nothing
datebis = Nothing
ElseIf rbt_Vorb_M.Checked = True Then
lbl_von.Visible = False
lbl_bis.Visible = False
valreqpickdate1.Enabled = False
valreqpickdate2.Enabled = False
valDateRange_1.Enabled = False
valDateRange_2.Enabled = False
pickdate1.Visible = False
pickdate2.Visible = False
datevon = Nothing
datebis = Nothing
ElseIf rbt_Vorg_M.Checked = True Then
lbl_von.Visible = False
lbl_bis.Visible = False
valreqpickdate1.Enabled = False
valreqpickdate2.Enabled = False
valDateRange_1.Enabled = False
valDateRange_2.Enabled = False
pickdate1.Visible = False
pickdate2.Visible = False
datevon = Nothing
datebis = Nothing
End If
If Not IsNothing(Session.Item("mytable")) Then
addrows()
End If
Else Else
VERAG_VARIABLES.seterrorcount(20)
Console.WriteLine(VERAG_VARIABLES.geterrornumb() + "The User is not authenticated to this page. Please login again!", vbAbort, "Error User") Page.MaintainScrollPositionOnPostBack = False
rbt_Alle.Checked = True
normaltable.EnableViewState = True
lbl_von.Visible = True
lbl_bis.Visible = True
valDateRange_1.Enabled = True
valDateRange_2.Enabled = True
pickdate1.Visible = True
pickdate2.Visible = True
If String.IsNullOrEmpty(txt_LKWNr.Text) Then
regexval_txt_LKW.Enabled = False
Else
regexval_txt_LKW.Enabled = True
End If
If String.IsNullOrEmpty(txt_KdNrAuftrag.Text) = True Then
regexval_txt_KdNrAuftrag.Enabled = False
Else
regexval_txt_KdNrAuftrag.Enabled = True
End If
If String.IsNullOrEmpty(txt_Empfaenger.Text) = True Then
regexval_txt_Empfaenger.Enabled = False
Else
regexval_txt_Empfaenger.Enabled = True
End If
If String.IsNullOrEmpty(txt_Absender.Text) = True Then
regexval_txt_Absender.Enabled = False
Else
regexval_txt_Absender.Enabled = True
End If
'Mobile
If String.IsNullOrEmpty(txt_LKWNr_M.Text) Then
regexval_txt_LKWNr_M.Enabled = False
Else
regexval_txt_LKWNr_M.Enabled = True
End If
If String.IsNullOrEmpty(txt_KdNrAuftrag_M.Text) = True Then
regval_txt_KdNrAuftrag_M.Enabled = False
Else
regval_txt_KdNrAuftrag_M.Enabled = True
End If
If String.IsNullOrEmpty(txt_Empfaenger_M.Text) = True Then
regval_txt_Empfaenger_M.Enabled = False
Else
regval_txt_Empfaenger_M.Enabled = True
End If
If String.IsNullOrEmpty(txt_Absender_M.Text) = True Then
regval_txt_Absender_M.Enabled = False
Else
regval_txt_Absender_M.Enabled = True
End If
End If End If
Dim erster = New Date(Now().Year, Now().Month, 1) Dim erster = New Date(Now().Year, Now().Month, 1)
datevon = erster datevon = erster
@@ -282,8 +278,10 @@ Partial Class CustomsAviso
pickdate1.Text = erster.ToUniversalTime.ToString("yyyy-MM-dd") pickdate1.Text = erster.ToUniversalTime.ToString("yyyy-MM-dd")
pickdate2.Text = Date.Now.ToUniversalTime.ToString("yyyy-MM-dd") pickdate2.Text = Date.Now.ToUniversalTime.ToString("yyyy-MM-dd")
Else Else
FormsAuthentication.RedirectToLoginPage() VERAG_VARIABLES.seterrorcount(20)
End If Console.WriteLine(VERAG_VARIABLES.geterrornumb() + "The User is not authenticated to this page. Please login again!", vbAbort, "Error User")
End If
End Sub End Sub
Protected Sub initcells(tr As TableRow, t1 As TableCell, t2 As TableCell, t3 As TableCell, t4 As TableCell, t5 As TableCell, t6 As TableCell, t7 As TableCell, t8 As TableCell, th1 As TableHeaderCell, th2 As TableHeaderCell, th3 As TableHeaderCell, th4 As TableHeaderCell, th5 As TableHeaderCell, th6 As TableHeaderCell, th7 As TableHeaderCell, th8 As TableHeaderCell) Protected Sub initcells(tr As TableRow, t1 As TableCell, t2 As TableCell, t3 As TableCell, t4 As TableCell, t5 As TableCell, t6 As TableCell, t7 As TableCell, t8 As TableCell, th1 As TableHeaderCell, th2 As TableHeaderCell, th3 As TableHeaderCell, th4 As TableHeaderCell, th5 As TableHeaderCell, th6 As TableHeaderCell, th7 As TableHeaderCell, th8 As TableHeaderCell)

View File

@@ -165,7 +165,18 @@ li {
font-size: 3.3769100169779285vw; font-size: 3.3769100169779285vw;
} }
} }
@media (max-width: 322.98px) {
table {
border-collapse: collapse;
border-spacing: 0.125em;
width: /*575px;*/ 126.65198237885463vw;
border: /*1px*/ 2.1744791666666665vw solid #ddd;
background-color: white;
color: #043381;
overflow-x: auto;
font-size: 3.3769100169779285vw;
}
}
@media (min-width: 575px) { @media (min-width: 575px) {
#offcanvasWithBothOptions { #offcanvasWithBothOptions {
min-width: 17.692852087756545vw; min-width: 17.692852087756545vw;

View File

@@ -43,14 +43,14 @@
width: 350px; width: 350px;
} }
} }
@media (max-width: 349.98px) { @media (max-width: 322.98px) {
#conovertab { #conovertab {
width: 348px; width: 322px;
overflow-x: auto; overflow-x: auto;
} }
body { body {
width: 348px; width: 322px;
} }
h1 { h1 {
@@ -70,6 +70,6 @@
#containerseiterand { #containerseiterand {
margin-left: 5px; margin-left: 5px;
margin-right: 5px; margin-right: 5px;
width: 348px; width: 322px;
} }
} }

View File

@@ -102,8 +102,8 @@ h1 {
width:400px; width:400px;
} }
} }
@media (max-width: 323px) { @media (max-width: 322.98px) {
#conovertab{ #conovertab {
width: 320px; width: 320px;
overflow-x: auto; overflow-x: auto;
} }