Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
Dim rptPath As String
rptPath = Server.MapPath("rptStudentApplicationForm.rpt")
rptDoc.Load(rptPath)
rptRegister_Report.ReportSource = rptDoc
End If
End Sub
Line 30: Protected Sub btnExport_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnExport.Click
=> Line 31: rptDoc.ExportToHttpResponse(ExportFormatType.PortableDocFormat, Response, True, "ExportedReport")
Line 32: End Sub