VB code to query a stored procedure parameters

Tech Talk vb.Net
1

VB code to query a stored procedure parameters:

Public Shared Function GetStoredProcParams(ByVal spName As String, ByVal dataAction As Aptify.Framework.DataServices.DataAction) As List(Of String)

     Dim reader As SqlDataReader

     Dim params As New List(Of String)

  

     ' build the SQL query

     Dim sql As String = String.Format("select parameter_name from information_schema.parameters where specific_name = '{0}'", spName)

     Try

         reader = dataAction.ExecuteDataReader(sql)

         While reader.Read

             params.Add(reader.GetString(0))

         End While

         reader.Close

     Catch ex As Exception

         Return Nothing

     End Try

  

     Return params

 End Function
2 
SqlCommand cmd = conn.CreateCommand();
cmd.CommandType = CommandType.StoredProcedure;
cmd.CommandText = "dbo.spGetSomething";

SqlCommandBuilder.DeriveParameters(cmd);
Console.WriteLine("Count = " + cmd.Parameters.Count);