I am trying to use the Microsoft report viewer for the first time and I am having problems. For now I am just trying to put a text box on the report with the value coming from a dataset. I have a reportviewer on my form. Here is the code I have so far. I am getting results from the database, I just don't know how to get it to the report.
Code:Private Sub ReportViewer1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles ReportViewer1.Load ' Dim cstring As String cstring = "XXXXXXXX" Dim cnOrderinfo As SqlConnection = New SqlConnection(cstring) Dim sqlstring As String sqlstring = "Select * from Spa_Orderinfo where SerialNumber = '0800016'" cnOrderinfo.Open() Dim cmdOrderinfo As SqlCommand = New SqlCommand(sqlstring, cnOrderinfo) cmdOrderinfo.CommandType = CommandType.Text ' Dim ds As ReportDataSource = Nothing Dim lr As New LocalReport Dim ta As ClassicSpaCoversDataSetTableAdapters.csc_OrderInfo Dim dt As ClassicSpaCoversDataSet.DataTable1DataTable = New ClassicSpaCoversDataSet.DataTable1DataTable ' ta = New ClassicSpaCoversDataSetTableAdapters.csc_OrderInfo ta.Fill(dt) ds = New ReportDataSource("test", dt) lr.ReportPath = "c:\TestPrograms\ClassicSpaCovers_OrderEntry\Order.rdlc" lr.DataSources.Add(ds) MsgBox(dt.Rows(0).Item(0), MsgBoxStyle.Information) Me.ReportViewer1.RefreshReport() End Sub


Reply With Quote