Click here to Skip to main content

Andrei Ramases asked:

Open original thread
i have this code that reflects datagrid values in crystal reports by using datasets. i commit error "The Report Has no Tables" thx in advance
 
Dim report As New CrystalReport1
       Dim ds As New DataSet
 

       'Take the data and structure from the datagridview and return it as a dataset.  You can use
       '"Imports System.Data" declaration at the top of your project/class and remove the system.data
       'from the various parts of this function.

       Try
           'Add a new table to the dataset
           ds.Tables.Add("Main")
 
           'Add the columns
           Dim col As DataColumn
 
           'For each colum in the datagridveiw add a new column to your table
           For Each dgvCol As DataGridViewColumn In ProductsDataGridView.Columns
               col = New DataColumn(dgvCol.Name)
               ds.Tables("Main").Columns.Add(col)
           Next
 
           'Add the rows from the datagridview
           Dim row As DataRow
           Dim colcount As Integer = ProductsDataGridView.Columns.Count - 1
 
           For i As Integer = 0 To ProductsDataGridView.Rows.Count - 1
               row = ds.Tables("Main").Rows.Add
 
               For Each column As DataGridViewColumn In ProductsDataGridView.Columns
                   row.Item(column.Index) = ProductsDataGridView.Rows.Item(i).Cells(column.Index).Value
               Next
 
           Next
 

       Catch ex As Exception
           'Catch any potential errors and display them to the user
           MessageBox.Show("Error Converting from DataGridView" & ex.InnerException.ToString, _
           "Error Converting from DataGridView", MessageBoxButtons.OK, MessageBoxIcon.Error)
 
       End Try
 
       report.SetDataSource(ds.Tables(0))
       CrystalReportViewer1.ReportSource = report
 
       Form2.Show()
       Form2.DataGridView1.DataSource = ds.Tables(0)
       ds.Dispose()
       ds = Nothing
Tags: VB.NET, printing, Reports, DataGrid

Preview



When answering a question please:
  1. Read the question carefully.
  2. Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
  3. If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Let's work to help developers, not make them feel stupid.
Please note that all posts will be submitted under the The Code Project Open License (CPOL).



Advertise | Privacy | Mobile
Web01 | 2.8.141015.1 | Last Updated 26 Mar 2009
Copyright © CodeProject, 1999-2014
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100