Please help i wanted to get the grand total of the list below in RDLC report.
The value fee in the code below is passed from the webpage as a parameter value. i wanted to use that value and get the overall total i tried the sum value function but is gives me empty textbox.
No. |
Account |
Name |
Class |
Charge |
1 |
1 |
AHURIRA EBENEZER |
P1 |
40000 |
2 |
23 |
AINEMBABAZI THALMA ETHEL |
P1 |
40000 |
3 |
32 |
BWANGO AALIYAH |
P1 |
40000 |
4 |
28 |
ITUNGO MANUELLA |
P1 |
40000 |
5 |
11 |
KARUNGI RABIB SALIM |
P1 |
40000 |
6 |
36 |
KYOBUTUNGI DORIS |
P1 |
40000 |
7 |
22-00039 |
MAKUMBI SULAIMAN |
P1 |
40000 |
8 |
24 |
MUKASA SWAIBU |
P1 |
40000 |
9 |
26 |
MUSIIME JORDAN |
P1 |
40000 |
10 |
22-00040 |
MUSOKE RASHID |
P1 |
40000 |
11 |
20 |
MUZIRAGA FABIAN |
P1 |
40000 |
12 |
38 |
NABAASA JOELLEN |
P1 |
40000 |
13 |
13 |
NABAASA JOELLEN |
P1 |
40000 |
Private Sub Report()
'Dim dt As DataTable = GetData(DateTime.Parse(txtFrom.Text), DateTime.Parse(txtTo.Text))
' Try
' ReportViewer1.ProcessingMode = ProcessingMode.Local
Dim fee As String = Request.QueryString("formfee")
Dim classr As String = Request.QueryString("class")
Dim intake As String = Request.QueryString("intake")
Dim froms As String = Request.QueryString("From")
Dim Tos As String = Request.QueryString("Tos")
ReportViewer1.ProcessingMode = ProcessingMode.Local
Dim dt As DataTable = GetData()
' If dt.Rows.Count > 0 Then
'do stuff
'gBox("dddd")
'End If
'calls the GetDate function which receives the from date and todate ,which are fetched from textboxs.
Dim dt2 As DataTable = GetSPResult2022()
Dim rds As New ReportDataSource("DataSet1", dt)
'load the dataset and the datatable to reportDataSource.
ReportViewer1.Visible = True
'bind the reportDataSource with the report.
ReportViewer1.LocalReport.ReportPath = Server.MapPath("~/Reports/StudentCollection.rdlc")
'Dim rpt As ReportParameter() = New ReportParameter() {New ReportParameter("From", froms), New ReportParameter("To", Tos), New ReportParameter("Fee", fee)}
'just to display in textboxes from date and to date ,pass the parameters .
'Note:the first parameter of the ReportParameter() should be same as parameter in the report.rdlc
Dim param As ReportParameter() = New ReportParameter(2) {}
param(0) = New ReportParameter("Fees", fee)
param(1) = New ReportParameter("Intake", intake)
param(2) = New ReportParameter("Class", classr)
' param(0) = New ReportParameter("param2", Textbox2)
' ReportViewer1.LocalReport.DataSources.Clear()
ReportViewer1.LocalReport.DataSources.Clear()
ReportViewer1.LocalReport.SetParameters(param)
'ReportViewer1.LocalReport.SetParameters(rpt)
ReportViewer1.LocalReport.DataSources.Add(rds)
ReportViewer1.LocalReport.DataSources.Add(New Microsoft.Reporting.WebForms.ReportDataSource("DataSet2", dt2))
ReportViewer1.LocalReport.Refresh()
' Catch ex As Exception
'End Try
End Sub