CommandType.StoredProcedure : CommandType « System.Data « VB.Net by API

1. VB.Net by API
2. System.Data
3. CommandType

CommandType.StoredProcedure

  
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.CommandText = "spRetrieveAuthor"
        cmd.CommandType = System.Data.CommandType.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

   
    
  

Related examples in the same category