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

Fix für "verschwindende" Bereiche bzw wiederauftauchende.

Browse Source
This commit is contained in:
ja
2021-10-05 08:51:16 +02:00
parent b86004fde4
commit 4beb82c135
1 changed files with 29 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
Customers/CustomsAviso.aspx.vb
View File

@@ -20,8 +20,37 @@ Partial Class Kundenbereich_Default
' MsgBox(datebis) ' MsgBox(datebis)
If (Page.IsPostBack And normaltable.EnableViewState = False) Then If (Page.IsPostBack And normaltable.EnableViewState = False) Then
normaltable.EnableViewState = True normaltable.EnableViewState = True
If rbt_Alle.Checked = True Then
lbl_von.Visible = True
lbl_bis.Visible = True
pickdate1.Visible = True
pickdate2.Visible = True
ElseIf rbt_Alle_M.Checked = True Then
lbl_von.Visible = True
lbl_bis.Visible = True
pickdate1.Visible = True
pickdate2.Visible = True
ElseIf rbt_Freig.Checked = True Then
lbl_von.Visible = True
lbl_bis.Visible = True
pickdate1.Visible = True
pickdate2.Visible = True
ElseIf rbt_Freig_M.Checked = True Then
lbl_von.Visible = True
lbl_bis.Visible = True
pickdate1.Visible = True
pickdate2.Visible = True
Else
lbl_von.Visible = False
lbl_bis.Visible = False
pickdate1.Visible = False
pickdate2.Visible = False
End If
datevon = Date.Parse(pickdate1.Text) datevon = Date.Parse(pickdate1.Text)
datebis = Date.Parse(pickdate2.Text) datebis = Date.Parse(pickdate2.Text)
Else Else
normaltable.EnableViewState = True normaltable.EnableViewState = True
Dim erster = New Date(Now().Year, Now().Month, 1) Dim erster = New Date(Now().Year, Now().Month, 1)