向 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

使用選擇命令：

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

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