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

Init mit gewählter Alle-Kategorie

Browse Source
This commit is contained in:
ja
2021-09-20 09:11:50 +02:00
parent 8dd2afd6c4
commit a2dfda5746
2 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
Customers/CustomsAviso.aspx
View File

@@ -218,8 +218,7 @@
</div> </div>
</div>--%> </div>--%>
<script src="//code.jquery.com/jquery-1.11.1.min.js"></script> <script src="//code.jquery.com/jquery-1.11.1.min.js"></script>
<script> <script>
$('#accordion').on('shown.bs.collapse', function (e) { $('#accordion').on('shown.bs.collapse', function (e) {
$(e.target).data('bs.collapse').$trigger.attr('src', 'https://s22.postimg.org/hkrauaofx/Mathematic_Minus2.png'); $(e.target).data('bs.collapse').$trigger.attr('src', 'https://s22.postimg.org/hkrauaofx/Mathematic_Minus2.png');

7
Customers/CustomsAviso.aspx.vb
View File

@@ -12,6 +12,9 @@ Partial Class Kundenbereich_Default
If (Page.IsPostBack And normaltable.EnableViewState = False) Then If (Page.IsPostBack And normaltable.EnableViewState = False) Then
normaltable.EnableViewState = True normaltable.EnableViewState = True
End If End If
rbt_Alle.Selected = True
rbt_Alle_M.Selected = True
End Sub End Sub
Protected Sub LogOutBtn1_Click(sender As Object, e As EventArgs) Protected Sub LogOutBtn1_Click(sender As Object, e As EventArgs)
@@ -145,7 +148,6 @@ Partial Class Kundenbereich_Default
th8.Font.Bold = True th8.Font.Bold = True
th8.BackColor = darkblue th8.BackColor = darkblue
th8.ForeColor = white th8.ForeColor = white
End Sub End Sub
Protected Sub btn_Auftraege_Click(sender As Object, e As EventArgs) Protected Sub btn_Auftraege_Click(sender As Object, e As EventArgs)
'MsgBox(Session.Item("test").ToString) 'MsgBox(Session.Item("test").ToString)
@@ -191,7 +193,6 @@ Partial Class Kundenbereich_Default
ElseIf rbt_Erf.Selected = True Or rbt_Erf_M.Selected Then ElseIf rbt_Erf.Selected = True Or rbt_Erf_M.Selected Then
dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB("", Kdnrtext, {0},,, Absender, Empfaenger, LKWNR, KDNAFNR) dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB("", Kdnrtext, {0},,, Absender, Empfaenger, LKWNR, KDNAFNR)
ElseIf rbt_Freig.Selected = True Or rbt_Freig_M.Selected = True Then ElseIf rbt_Freig.Selected = True Or rbt_Freig_M.Selected = True Then
If Date.Parse(pickdate2.Text) > Date.Parse(pickdate1.Text) Then If Date.Parse(pickdate2.Text) > Date.Parse(pickdate1.Text) Then
Try Try
pickdate1.ValidateRequestMode = UI.ValidateRequestMode.Enabled pickdate1.ValidateRequestMode = UI.ValidateRequestMode.Enabled
@@ -219,6 +220,7 @@ Partial Class Kundenbereich_Default
Dim i As Integer = 0 Dim i As Integer = 0
For Each d In dt.Rows For Each d In dt.Rows
Dim tr = New TableRow
Dim Cell = New TableCell Dim Cell = New TableCell
Dim tbl_CellIndex = New TableCell Dim tbl_CellIndex = New TableCell
Dim tbl_CellStatus = New TableCell Dim tbl_CellStatus = New TableCell
@@ -228,7 +230,6 @@ Partial Class Kundenbereich_Default
Dim tbl_CellLKWs = New TableCell Dim tbl_CellLKWs = New TableCell
Dim tbl_CellKundAuftNr = New TableCell Dim tbl_CellKundAuftNr = New TableCell
Dim tbl_CellInfo = New TableCell Dim tbl_CellInfo = New TableCell
Dim tr = New TableRow
Dim zahl = i + 1 Dim zahl = i + 1
tbl_CellIndex.ValidateRequestMode = UI.ValidateRequestMode.Enabled tbl_CellIndex.ValidateRequestMode = UI.ValidateRequestMode.Enabled