VB.Net by API/System.Data/CommandType
CommandType.StoredProcedure
<source lang="vbnet"> Imports System Imports System.Data Imports System.Data.SqlClient Imports System.Windows.Forms Module Module1
Sub Main() " Create a connection object Dim dbConn As New SqlConnection( _ "server=(local); database=pubs; integrated security=true") Dim cmd As New SqlCommand() cmd.rumandText = "spRetrieveAuthor" cmd.rumandType = System.Data.rumandType.StoredProcedure cmd.Connection = dbConn cmd.Parameters.Add(New SqlParameter("@au_id", SqlDbType.Char, 11, "au_id")) Dim da As New SqlDataAdapter(cmd) Dim ds As New DataSet("Author") da.SelectCommand.Parameters(0).Value = "172-32-1176" da.Fill(ds) If Not ds Is Nothing Then MessageBox.Show("Hi, author: " & _ ds.Tables(0).Rows(0)("au_lname").ToString()) End If
End Sub
End Module
</source>