Добавить параметр в dataAdapter.fill ()

Question

Я пытаюсь добавить параметр в sqlDataAdapter. Я пытался использовать параметры .add (), но адаптер не является sqlCommand. Вот часть моего кода.

Private Sub convertToCSV(ByVal SqlQuery As String)
        Dim Dt As New DataTable()
        Dim SqlCon As New SqlConnection("Data Source=db;Initial Catalog=productionservicereminder;User Id=id;Password=pass;")
        Dim Ada As New SqlDataAdapter(SqlQuery, SqlCon)

        Ada.Fill(Dt)

  Public Sub excSP(ByVal ReprtID As Integer, ByVal pgid As Integer)

 convertToCSV(sql4)

End Sub

В основном я пытаюсь сделать что-то вроде этого:

Ada.Parameters.Add(New SqlParameter("@pgid", pgid))

Answer 1

Используйте команду SelectCommand:

ADA.SelectCommand.Parameters.Add (New SqlParameter ("@ pgid", pgid))

http://msdn.microsoft.com/en-us/library/system.data.sqlclient.sqldataadapter.selectcommand.aspx