Hallo Zusammen,
ich habe nun in den letzten Stunden versucht mit Hilfe ReportViewer-Tutorial für Anfänger von @VB1963 einen direkten Ausdruck anzustoßen.
Im Link ist es möglich eine ReportViewerDirectPrinting Projekt herunterzuladen. In diesem Projekt konnte ich meinen Bericht importieren und der Druck hat funktioniert.
In meinem Projekt habe ich die Dll hinzugefügt und DirectPrinting.vb importiert.
-->
--> Fehlermeldung = Microsoft.Reporting.WinForms.LocalProcessingException {"Fehler bei der lokalen Berichtsverarbeitung."}
im Reportviewer funktioniert der Bericht....
Ich bitte um Hilfe.
Vielen Dank
Viele Grüße
Frostbeule
ich habe nun in den letzten Stunden versucht mit Hilfe ReportViewer-Tutorial für Anfänger von @VB1963 einen direkten Ausdruck anzustoßen.
Im Link ist es möglich eine ReportViewerDirectPrinting Projekt herunterzuladen. In diesem Projekt konnte ich meinen Bericht importieren und der Druck hat funktioniert.
In meinem Projekt habe ich die Dll hinzugefügt und DirectPrinting.vb importiert.
VB.NET-Quellcode
- Imports Microsoft.Reporting.WinForms
- Imports System.Reflection
- Imports System.Security.Permissions
- Imports System.IO
- Imports System.Drawing.Imaging
- Imports System.Text
- Public Class Navigation
- Dim Berichte As New List(Of String) From {{"Mein erster Bericht"}, {"TEST"}}
- Dim Bericht As String = String.Empty
- ....
- Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
- Bericht = "TEST"
- Dim rep As New LocalReport
- With rep
- .ReportEmbeddedResource = String.Concat("ReportViewerDirectPrinting.Report ", Bericht, ".rdlc")
- .DisplayName = Bericht
- Select Case Bericht
- Case Is = "Mein erster Bericht"
- .SetParameters(New ReportParameter("rpAlter", 47.ToString))
- .SetParameters(New ReportParameter("rpVorName", "Max"))
- .SetParameters(New ReportParameter("rpNachName", "Mustermann"))
- Case Is = "TEST"
- .SetParameters(New ReportParameter("Adresse", "Hauptstraße 30"))
- .SetParameters(New ReportParameter("PLZ", "94560"))
- Case Is = "Report1"
- .SetParameters(New ReportParameter("TEST", "Haupt"))
- End Select
- End With
- StatusText.Text = String.Empty
- Dim prt = DirectPrinting.getInstance
- StatusText.Text = prt.DirectPrint(rep, False)
- End Sub
- End Class
-->
--> Fehlermeldung = Microsoft.Reporting.WinForms.LocalProcessingException {"Fehler bei der lokalen Berichtsverarbeitung."}
im Reportviewer funktioniert der Bericht....
Ich bitte um Hilfe.
Vielen Dank
Viele Grüße
Frostbeule