the report requested requires further information
myRrpt.Load(Server.MapPath("~\Reporting\CrystalReport15.rpt")) connect_EWS.ConnectionString = Constr_EWS Dim con As New SqlCommand Dim query As String = "SELECT * from Report_BT where Number=@num" con.CommandText = query con.Connection = connect_EWS con.Parameters.AddWithValue("@num", txtNumber.Text.Trim) connect_EWS.Open() ' Dim dsCustomers As New ISAE_BankTransfer Dim da As New SqlDataAdapter(con) Dim dsCustomers As DataSet4 = New DataSet4 da.Fill(dsCustomers, "Report_BT") connect_EWS.Close() myRrpt.SetDataSource(dsCustomers) CrystalReportViewer1.DisplayPage = True CrystalReportViewer1.ReportSource = myRrpt
Quote:The DataSet, which is an in-memory cache of data retrieved from a data source, is a major component of the ADO.NET architecture. The DataSet consists of a collection of DataTable objects that you can relate to each other with DataRelation objects.
Private Sub PrintRows(ByVal dataSet As DataSet) Dim table As DataTable Dim row As DataRow Dim column As DataColumn ' For each table in the DataSet, print the row values. For Each table in dataSet.Tables For Each row In table.Rows For Each column in table.Columns Console.WriteLine(row(column)) Next column Next row Next table End Sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)