diff --git a/App_Code/VERAG_VARIABLES.vb b/App_Code/VERAG_VARIABLES.vb index c1e3403..ae16048 100644 --- a/App_Code/VERAG_VARIABLES.vb +++ b/App_Code/VERAG_VARIABLES.vb @@ -6,7 +6,7 @@ Public Class VERAG_VARIABLES errornumb = 0 End Sub Shared Sub seterrorcount(var As Integer) - errornumb = 1 + errornumb = var End Sub Shared Function geterrornumb() As String Return Environment.NewLine + "Error:" + Space(1) + VERAG_PROG_ALLGEMEIN.cCryptography3.Encrypt(errornumb.ToString) + Space(1) diff --git a/Customers/Default2.aspx.vb b/Customers/Default2.aspx.vb index 73204c5..7810f98 100644 --- a/Customers/Default2.aspx.vb +++ b/Customers/Default2.aspx.vb @@ -1,7 +1,8 @@  Partial Class Customers_Default2 Inherits System.Web.UI.Page - Protected Sub Page_Load(ByVal sender As Object, e As EventArgs) + Protected Sub Page_Load(ByVal sender As Object, e As EventArgs) Handles Me.Load + If Page.IsPostBack Then Page.MaintainScrollPositionOnPostBack = True VERAG_VARIABLES.initerrorcount() @@ -15,7 +16,7 @@ Partial Class Customers_Default2 VERAG_VARIABLES.initerrorcount() Dim vals As New List(Of String) Dim finalstr As String = "" - For i As Integer = Integer.Parse(TextBox1.Text) To Integer.Parse(TextBox2.Text) + For i As Integer = Integer.Parse(TextBox1.Text)+1 To Integer.Parse(TextBox2.Text) Dim strtemp As String = "" VERAG_VARIABLES.seterrorcount(Integer.Parse(i)) diff --git a/Fehlermeldungen_Auflistung.xlsx b/Fehlermeldungen_Auflistung.xlsx index a269849..25fa37c 100644 Binary files a/Fehlermeldungen_Auflistung.xlsx and b/Fehlermeldungen_Auflistung.xlsx differ