Member 14197412 Ответов: 2

Crystal report не отображает данные, которые находятся в таблице данных.

я работаю над приложением window form и добавляю Crystal Report в проект под названием "crystalreport1", а в form1(window form) беру CrystalReportViewer1.я хочу заполнить crystal report с помощью программы. следующим образом я даю datatable crystalreport. затем error araised,что "отчет не имеет таблиц", как я могу решить эту проблему.

Что я уже пробовал:

Dim dt As New DataTable
dt.Columns.Add("id")
dt.Columns.Add("name")
dt.Columns.Add("address")
dt.Rows.Add(1, "ali", "lhr")
dt.Rows.Add(2, "nomi", "mul")
Dim rpt As New CrystalReport1
rpt.SetDataSource(dt)
CrystalReportViewer1.ReportSource = rpt
CrystalReportViewer1.RefreshReport()
CrystalReportViewer1.Show()

2 Ответов

Рейтинг:
1

Nirav Prabtani

1) назовите этот DataTable
2) Добавьте его в набор данных
3) Добавить набор данных в качестве источника отчета crystal

Рейтинг:
1

Kenjiro Aikawa

Привет! Если вы используете Datagridview, поместите этот код на кнопку печати.

Dim dt As New DataTable

       With dt
           .Columns.Add("id")
           .Columns.Add("name")
           .Columns.Add("address")
       End With


       For Each dr As DataGridViewRow In Me.dgv_list.Rows
           dt.Rows.Add(dr.Cells("id").Value, dr.Cells("name").Value, dr.Cells("address").Value)

       Next

       Dim rptDoc As CrystalDecisions.CrystalReports.Engine.ReportDocument
       rptDoc = New cr_logslist
       rptDoc.SetDataSource(dt)

       frm_report_viewer.CrystalReportViewer1.ReportSource = rptDoc
       frm_report_viewer.ShowDialog()
       frm_report_viewer.Refresh()
       frm_report_viewer.Dispose()

Примечание: измените cr_loglist с именем файла отчета Crystal.

Надеюсь, это поможет.

Member 14197412

спасибо...я пробовал, но та же ошибка, что и "отчет не имеет таблиц"..