Member 14077592 Ответов: 1

Отсутствует параметр средства просмотра отчетов - как я могу это решить?


Private Sub ReportViewer1_Load(sender As Object, e As EventArgs) обрабатывает ReportViewer1.Load

Попробуй



Если cn.State = ConnectionState.Тогда Закрыто
спицы.Открыть()
Конец, Если

Если cn.State <> ConnectionState.Тогда Открой
MsgBox("Ошибка Подключения К Базе Данных", MsgBoxStyle.Информация)
Меня.Рядом()

Конец, Если

ДС.Сбросить()
str = "select * from TabSales"
cmd = New SqlCommand(str, cn)
да.Команды selectcommand = ЦМД
да.Заполнить(ДС)
да.Распоряжаться()
УМК.Располагать()
спицы.Рядом()


Dim rds = New ReportDataSource("dsSales", ds.Tables(0))
MsgBox(ds.Таблицы(0, 1))
ReportViewer1.LocalReport.ReportEmbeddedResource = "Harsha_Bill.Счет-фактура.rdlc"
ReportViewer1.LocalReport.Источники Данных.Четкий()
ReportViewer1.LocalReport.Источники Данных.Добавить(rds)
ReportViewer1.RefreshReport()


Поймать ex как исключение
Ящик для сообщений.Показать(напр.сообщение, My.Application.Info.Название, MessageBoxButtons.Хорошо, MessageBoxIcon.Ошибка)
Конец Попытки
Конец Подводной Лодки


End Класса

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

Я очень Новичок в RDLC, и я не могу найти, в чем проблема

1 Ответов

Рейтинг:
2

OriginalGriff

На первый взгляд, это имя источника: я подозреваю, что "dsSales" - это не имя данных в самой таблице. Попробовать это:

Dim dt as DataTable = ds.Tables(0);
Dim rds = new ReportDataSource(dt.TableName, dt)

Я также настоятельно рекомендую вам использовать Using блоки, а не вручную закрывать и утилизировать - таким образом, даже если есть ошибка, система будет очищаться после вас.