PDA

View Full Version : چاپ از یک گزارش RDLC در حالت LOCAl



ardvisoor
چهارشنبه 03 خرداد 1385, 13:17 عصر
سلام
با اسفاده از ReportViewer به یک گزارش RDLC وصل می شوم، اما متاسفانه در حالت LOCAl دکمه Print وجو ندارد و این دکمه تنها زمانی فعال می گردد که به Reporting Service متصل شویم
کسی راه حلی برای این موضوع سراغ ندارد؟
با تشکر

fafan_iran
سه شنبه 16 خرداد 1385, 14:58 عصر
Protected Sub btnPrint_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnPrint.Click
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

lr.ReportPath = "c:\ReportBujet\repUser.rdlc"
lr.DataSources.Add(New Microsoft.Reporting.WebForms.ReportDataSource("DataSet1", dtblReport))
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()
End Sub

Arminizer_88
سه شنبه 16 خرداد 1385, 15:55 عصر
Protected Sub btnPrint_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnPrint.Click
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

lr.ReportPath = "c:\ReportBujet\repUser.rdlc"
lr.DataSources.Add(New Microsoft.Reporting.WebForms.ReportDataSource("DataSet1", dtblReport))
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()
End Sub
مرسی. لطفا از تگ های شکننده استفاده کنید.

PrinceDotNet
سه شنبه 16 خرداد 1385, 21:38 عصر
می بخشید این سوال رو می کنم ولی برای من جای سوال داره !!!!!!

میشه در مورد کارایی کنترل ReportViewer یک توضیح کوچیک بدید یا یک مقاله معرفی کنید.