Моя ошибка в средстве просмотра отчетов постоянно говорит, что
некоторые параметры или учетные данные не были указаны Это первая ошибка
и послеЯ нажал кнопку загрузки данных, программа просмотра отчетов сообщает, что
не может создать устройство чтения данных для набора данных 'LogHistoryDataSet' Это вторая ошибка после нажатия кнопки «Загрузить данные»
LogHistoryDataSet - это мой DataSet для отчета, а мой LogHistory_tbl - это моя DataTable в LogHistoryDataSet.
Try
Dim startDateParam As String = startDate.Value.ToString("yyyy-MM-dd")
Dim endDateParam As String = endDate.Value.ToString("yyyy-MM-dd")
Dim reportDataSource As ReportDataSource
ReportViewer1.RefreshReport()
With ReportViewer1.LocalReport
.ReportPath = Application.StartupPath & "\LogHistoryReport.rdlc"
.DataSources.Clear()
End With
Dim dataSet As New LogHistoryDataSet
Dim dataAdapter As New SqlDataAdapter
connection.Open()
dataAdapter.SelectCommand = New SqlCommand("Select logName, logType, logOperation, logDate from LogHistory_tbl where logDate between @startDateParam and @endDateParam", connection)
dataAdapter.SelectCommand.Parameters.AddWithValue("@startDateParam", startDateParam)
dataAdapter.SelectCommand.Parameters.AddWithValue("@endDateParam", endDateParam)
dataAdapter.Fill(dataSet.Tables("LogHistory_tbl"))
connection.Close()
reportDataSource = New ReportDataSource("LogHistoryDataSet", dataSet.Tables("LogHistory_tbl"))
ReportViewer1.LocalReport.DataSources.Add(reportDataSource)
Catch ex As Exception
connection.Close()
MessageBox.Show(ex.Message)
End Try