Moin zusammen,
ich stoße hier gerade an meine grenzen. In einem Programm, welches von Mitarbeitern getätigte Bestellungen erfasst und dann nach SAP importiert werden kommt es immer wieder dazu, das der Report nicht gedruckt werden kann. Anbei der Ausschnitt des Codes wo der Debugger immer stehen bleibt. Vielleicht fällt euch was dazu ein wie das Problem gelöst werden könnte:
ich stoße hier gerade an meine grenzen. In einem Programm, welches von Mitarbeitern getätigte Bestellungen erfasst und dann nach SAP importiert werden kommt es immer wieder dazu, das der Report nicht gedruckt werden kann. Anbei der Ausschnitt des Codes wo der Debugger immer stehen bleibt. Vielleicht fällt euch was dazu ein wie das Problem gelöst werden könnte:
VB.NET-Quellcode
- Private Structure stServiceMaterial
- Public Anzahl As Integer
- Public ArtikelBezeichnung As String
- Public ArtikelNummer As String
- Public Sub New(p_Anzahl As Integer, p_ArtikelBezeichnung As String, p_ArtikelNummer As String)
- Me.Anzahl = p_Anzahl
- Me.ArtikelBezeichnung = p_ArtikelBezeichnung
- Me.ArtikelNummer = p_ArtikelNummer
- End Sub
- End Structure
- Private Sub printDocServiceMaterialBestellung(p_Sender As Printing.PrintDocument, p_e As Printing.PrintPageEventArgs)
- p_e.Graphics.FillRectangle(Brushes.White, Me.pdServiceMaterialBestellung.DefaultPageSettings.Bounds)
- Dim colBestellListe As New List(Of stServiceMaterial)
- Dim myDataTableUnterartikel As DataTable = Nothing
- Dim Anzahl As Int32 = 0
- For index As Int32 = 1 To 26
- colBestellListe.Add(New stServiceMaterial(Me.Controls(5).Controls(1).Controls.Item("txtAnzahl" + index.ToString).Text,
- Me.Controls(5).Controls(1).Controls.Item("txtArtikel" + index.ToString).Text,
- Me.Controls(5).Controls(1).Controls.Item("txtArtikelNummer" + index.ToString).Text)) '<---- Abbruch mit Fehler: Index 5 außerhalb vom Bereich von index
- Next