Zapisz raporty RDLC jako programowo w formacie PDF
Mam raport, który muszę uruchomić wiele razy i zapisać jako pliki PDF. Obecnie programowo generuję raport jako plik PDF, ale chcę zapisać raporty bez konieczności ręcznego wybierania opcji zapisywania za każdym razem.
Kod, którego używam do renderowania pojedynczego raportu w formacie PDF, to:
Dim warnings As Microsoft.Reporting.WebForms.Warning() = Nothing
Dim streamids As String() = Nothing
Dim mimeType As String = Nothing
Dim encoding As String = Nothing
Dim extension As String = Nothing
Dim deviceInfo As String
Dim bytes As Byte()
Dim lr As New Microsoft.Reporting.WebForms.LocalReport
deviceInfo = "<DeviceInfo><SimplePageHeaders>True</SimplePageHeaders></DeviceInfo>"
bytes = ReportViewer1.LocalReport.Render("PDF", deviceInfo, mimeType, encoding, extension, streamids, warnings)
Response.ClearContent()
Response.ClearHeaders()
Response.ContentType = "application/pdf"
Response.BinaryWrite(bytes)
Response.Flush()
Response.Close()
Myślałem, że mogę uruchomić go w pętli i zapisać plik PDF za każdym razem.