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（新SqlParameter（ "@のPGID"、PGID） ）

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