How can I take my stored procedure, execute it, and put the recordset from the stored procedure into a dataset? I tried the below way but I am having no luck. I'm passing in my procedures parameters via another form (fAppResearch). I ultimately want to use this created dataset as a crystal report source. Any help would be greatly appreciated. Thanks!!
Code:
Dim dsDataSet As New DataSet()
Dim _cmdSqlCommand As New SqlCommand()
Dim _adpAdapter As New SqlDataAdapter()
Dim rpt As New rResearch() 'my crystal report
With _cmdSqlCommand
.Connection = New SqlClient.SqlConnection("Server=blah blah blah connection info;")
'Declare command type
.CommandType = CommandType.StoredProcedure
'Declare what procedure to execute
.CommandText = "sPAP_ResearchReport"
'Define parameter name used in actual procedure and what size/type it is
.Parameters.Add(New SqlClient.SqlParameter("@i_postcompanyid", Data.SqlDbType.Char, 3))
'Set procedure's parameter value
.Parameters.Item("@i_postcompanyid").Value = fAppResearch.cmbCompany.SelectedValue
'Define parameter name #2 used in actual procedure and what size/type it is
.Parameters.Add(New SqlClient.SqlParameter("@i_BatchNo", Data.SqlDbType.VarChar, 20))
'Set procedure's parameter #2 value
.Parameters.Item("@i_BatchNo").Value = fAppResearch.txtBatchNo.Text
End With
' Configure Adapter to use newly created command object and fill the dataset.
_adpAdapter.SelectCommand = _cmdSqlCommand
_adpAdapter.Fill(dsDataSet)
rpt.SetDataSource(dsDataSet)
CrystalReportViewer1.ReportSource = rpt