On-screen guidance at the moment of need enables you & your employees to focus on the core, you can now boost your adoption rates swiftly and simply with one easy tool.
Dim report As New LocalReport() report.ReportPath = "Reports\myReport.rdlc" report.Refresh() ' Export the report to an EMF file export(report, "test") ' Print the report print("test") <snip>
Private Function export(ByVal report As LocalReport, ByVal pApp As String) As String ' gets printer device info, orientation & page size etc.... Dim deviceInfo As String = getPrinterDeviceInfo(pApp) Dim warnings As Warning() mStreams = New List(Of Stream)() Try <THE NEXT LINE THROWS THE ERROR> report.Render("Image", deviceInfo, AddressOf createStream, warnings) Catch ex As Exception Dim a As String = ex.Message End Try For Each stream As Stream In mStreams stream.Position = 0 Next Return "SUCCESS" End Function
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|HIghlights of SSIS?||3||45|
|Help with viewing images in an MSReport using a Dataset using VB.NET||29||32|
|Group Gridview Data and bold 1st line of new item type||1||10|
|VB.net SQL Connection String Read Only||4||23|
Join the community of 500,000 technology professionals and ask your questions.