Report Processing

Imports Microsoft.Reporting.WebForms
Dim datasourceid As New Microsoft.Reporting.WebForms.ReportDataSource
Dim strdatasource As String
Select Case op_level_selection.SelectedValue
Case 1
strdatasource = "reports/Main.rdlc"
With ReportViewer1
.Reset()
.ProcessingMode = ProcessingMode.Local
.LocalReport.ReportPath = strdatasource
.LocalReport.DataSources.Clear()
datasourceid.DataSourceId = "ods_main_data"
datasourceid.Name = "DS_MAIN"
.LocalReport.DataSources.Add(datasourceid)
.DocumentMapCollapsed = True
.LocalReport.Refresh()
.Visible = True
End With