diff --git a/Customers/CustomsAviso.aspx.vb b/Customers/CustomsAviso.aspx.vb index 966ecb9..0800b94 100644 --- a/Customers/CustomsAviso.aspx.vb +++ b/Customers/CustomsAviso.aspx.vb @@ -636,8 +636,9 @@ Partial Class CustomsAviso dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB(Art, Integer.Parse(Kdnrtext), {5}, Nothing, Nothing, Absender, Empfaenger, LKWNR, KDNAFNR) End If End If - addrows() + addrows() + Session.Item("mytable") = normaltable End Sub Protected Sub btn_resetForm_Click(sender As Object, e As EventArgs) diff --git a/Customers/Invoices.aspx b/Customers/Invoices.aspx index c50e0f9..e814418 100644 --- a/Customers/Invoices.aspx +++ b/Customers/Invoices.aspx @@ -1,4 +1,4 @@ -<%@ Page Title="" Language="VB" MasterPageFile="~/Customers/Customers.master" AutoEventWireup="false" CodeFile="Invoices.aspx.vb" Inherits="Customers_Default3" %> +<%@ Page Title="" Language="VB" MasterPageFile="~/Customers/Customers.master" CodeFile="Invoices.aspx.vb" Inherits="Customers_Default3" %> @@ -221,7 +221,7 @@
- +
diff --git a/Customers/Invoices.aspx.vb b/Customers/Invoices.aspx.vb index fe364f7..aa13e8b 100644 --- a/Customers/Invoices.aspx.vb +++ b/Customers/Invoices.aspx.vb @@ -20,7 +20,7 @@ Partial Class Customers_Default3 Dim reNr As String = "-1" Dim provider As CultureInfo = CultureInfo.InvariantCulture - Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Load + Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) VERAG_VARIABLES.initerrorcount() If Not Me.Page.User.Identity.IsAuthenticated Then @@ -37,7 +37,7 @@ Partial Class Customers_Default3 'Script für Schließen wirklich verlassen Meldung auf der Masterseite für diese Seite zu registrieren und nicht ueberall Dim csm1 As ClientScriptManager = Page.ClientScript Dim cstype As Type = Page.GetType - + Dim erster As Date If Not csm1.IsStartupScriptRegistered(cstype, "Startup") Then Dim string1 As String = "