将参数添加到dataAdapter.fill()

Question

我正在尝试将参数添加到sqlDataAdapter.我试过使用parameters.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